diff options
| author | simonmar <unknown> | 1999-12-08 14:04:32 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 1999-12-08 14:04:32 +0000 |
| commit | 14a15152e2ae117777a8303e5589fc03bdb2e682 (patch) | |
| tree | ec7cf6844745c139909620d73b42a1a27da95abe /ghc/lib/std/cbits/openFile.c | |
| parent | 57df281fe0077e0ae398def98c1255f354aefd73 (diff) | |
| download | haskell-14a15152e2ae117777a8303e5589fc03bdb2e682.tar.gz | |
[project @ 1999-12-08 14:04:32 by simonmar]
oops, forgot to initialize bufStart in openStdFile.
Diffstat (limited to 'ghc/lib/std/cbits/openFile.c')
| -rw-r--r-- | ghc/lib/std/cbits/openFile.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ghc/lib/std/cbits/openFile.c b/ghc/lib/std/cbits/openFile.c index 90ae2d8d95..5be41540e0 100644 --- a/ghc/lib/std/cbits/openFile.c +++ b/ghc/lib/std/cbits/openFile.c @@ -1,7 +1,7 @@ /* * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998 * - * $Id: openFile.c,v 1.12 1999/11/26 16:25:56 simonmar Exp $ + * $Id: openFile.c,v 1.13 1999/12/08 14:04:32 simonmar Exp $ * * openFile Runtime Support */ @@ -46,6 +46,7 @@ StgInt rd; fo->buf = NULL; fo->bufWPtr = 0; fo->bufRPtr = 0; + fo->bufStart = 0; fo->flags = FILEOBJ_STD | ( rd ? FILEOBJ_READ : FILEOBJ_WRITE); fo->connectedTo = NULL; |