From 9b67daa7f538e8a63ec9ffe8c485f6c6bf722b49 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Thu, 6 Jan 2000 04:34:37 +0000 Subject: [PATCH] Work around a bug in the Watcom runtime library. --- v7/src/microcode/option.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v7/src/microcode/option.c b/v7/src/microcode/option.c index a582af0e4..c3c4ac57d 100644 --- a/v7/src/microcode/option.c +++ b/v7/src/microcode/option.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: option.c,v 1.50 2000/01/06 04:22:28 cph Exp $ +$Id: option.c,v 1.51 2000/01/06 04:34:37 cph Exp $ Copyright (c) 1990-2000 Massachusetts Institute of Technology @@ -1051,7 +1051,7 @@ DEFUN (read_band_header, (filename, header), FILE * stream = (fopen (filename, "r")); if (stream == 0) return (0); - if ((fread ((&header), (sizeof (SCHEME_OBJECT)), FASL_HEADER_LENGTH, stream)) + if ((fread (header, (sizeof (SCHEME_OBJECT)), FASL_HEADER_LENGTH, stream)) != FASL_HEADER_LENGTH) { fclose (stream); -- 2.25.1