diff options
Diffstat (limited to 'ghc/lib/std/cbits/fileGetc.c')
| -rw-r--r-- | ghc/lib/std/cbits/fileGetc.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/lib/std/cbits/fileGetc.c b/ghc/lib/std/cbits/fileGetc.c index 0be92e7a10..3a74020f73 100644 --- a/ghc/lib/std/cbits/fileGetc.c +++ b/ghc/lib/std/cbits/fileGetc.c @@ -1,7 +1,7 @@ /* * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998 * - * $Id: fileGetc.c,v 1.4 1999/11/26 16:25:55 simonmar Exp $ + * $Id: fileGetc.c,v 1.5 1999/12/08 15:47:07 simonmar Exp $ * * hGetChar Runtime Support */ @@ -17,7 +17,7 @@ fileGetc(ptr) StgForeignPtr ptr; { IOFileObject* fo = (IOFileObject*)ptr; - int l,rc=0; + int rc=0; unsigned char c; #if 0 |