From cec7ab58906a8a6ad7ae19e527e106d71dbc7151 Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Thu, 21 Jun 1990 03:50:30 +0000 Subject: [PATCH] Fix bogus type declaration in Load_Data (FILE * -> SCHEME_OBJECT *). --- v7/src/microcode/ppband.c | 4 ++-- v8/src/microcode/ppband.c | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/v7/src/microcode/ppband.c b/v7/src/microcode/ppband.c index 8a91d00c7..28d72aca3 100644 --- a/v7/src/microcode/ppband.c +++ b/v7/src/microcode/ppband.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/ppband.c,v 9.38 1990/06/20 17:37:59 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/ppband.c,v 9.39 1990/06/21 03:50:30 jinx Exp $ Copyright (c) 1987, 1989, 1990 Massachusetts Institute of Technology @@ -51,7 +51,7 @@ static SCHEME_OBJECT * memory_base; long Load_Data(Count, To_Where) long Count; - FILE *To_Where; + SCHEME_OBJECT *To_Where; { return (fread (To_Where, (sizeof (SCHEME_OBJECT)), Count, stdin)); } diff --git a/v8/src/microcode/ppband.c b/v8/src/microcode/ppband.c index 647a6472b..962b530fa 100644 --- a/v8/src/microcode/ppband.c +++ b/v8/src/microcode/ppband.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/ppband.c,v 9.38 1990/06/20 17:37:59 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/ppband.c,v 9.39 1990/06/21 03:50:30 jinx Exp $ Copyright (c) 1987, 1989, 1990 Massachusetts Institute of Technology @@ -51,7 +51,7 @@ static SCHEME_OBJECT * memory_base; long Load_Data(Count, To_Where) long Count; - FILE *To_Where; + SCHEME_OBJECT *To_Where; { return (fread (To_Where, (sizeof (SCHEME_OBJECT)), Count, stdin)); } -- 2.25.1