diff options
| author | simonmar <unknown> | 2000-03-21 17:41:02 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2000-03-21 17:41:02 +0000 |
| commit | b0caf11c7f8761fd604e2cf9d0c363b9ccb7736f (patch) | |
| tree | 71014d766af2bf6e2b7e22e76a294eb5cda19d7c /ghc/lib/std/cbits/readFile.c | |
| parent | 550a9948f3fc2b67f880852ee64dada530136521 (diff) | |
| download | haskell-b0caf11c7f8761fd604e2cf9d0c363b9ccb7736f.tar.gz | |
[project @ 2000-03-21 17:41:02 by simonmar]
What happened to gcc's "uninitialised variable" warnings when I needed
them?
Diffstat (limited to 'ghc/lib/std/cbits/readFile.c')
| -rw-r--r-- | ghc/lib/std/cbits/readFile.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/lib/std/cbits/readFile.c b/ghc/lib/std/cbits/readFile.c index 69e608b672..ee968ff855 100644 --- a/ghc/lib/std/cbits/readFile.c +++ b/ghc/lib/std/cbits/readFile.c @@ -1,7 +1,7 @@ /* * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998 * - * $Id: readFile.c,v 1.12 2000/03/21 11:22:35 simonmar Exp $ + * $Id: readFile.c,v 1.13 2000/03/21 17:41:02 simonmar Exp $ * * hGetContents Runtime Support */ @@ -120,7 +120,7 @@ StgInt readChunk(StgForeignPtr ptr, StgAddr buf, StgInt off, StgInt len) { IOFileObject* fo = (IOFileObject*)ptr; - int count=0,rc=0, total_count; + int count, rc=0, total_count=0; int fd; char* p; |