diff options
| author | rrt <unknown> | 2001-04-02 16:10:33 +0000 |
|---|---|---|
| committer | rrt <unknown> | 2001-04-02 16:10:33 +0000 |
| commit | eb256e9af970565f79a66f8731bdaeddcc96a3a6 (patch) | |
| tree | af3cf1f66b01322f35a7e971af38b6ff9b08731b /ghc/lib/std/cbits/getBufferMode.c | |
| parent | c69fc1ae9231717e81f268d4d522c1770d9fdb14 (diff) | |
| download | haskell-eb256e9af970565f79a66f8731bdaeddcc96a3a6.tar.gz | |
[project @ 2001-04-02 16:10:32 by rrt]
Remove old mingwin kludgery; using the latest version of mingwin from CVS,
things now work.
Diffstat (limited to 'ghc/lib/std/cbits/getBufferMode.c')
| -rw-r--r-- | ghc/lib/std/cbits/getBufferMode.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/lib/std/cbits/getBufferMode.c b/ghc/lib/std/cbits/getBufferMode.c index c80290989a..8ce42f9f42 100644 --- a/ghc/lib/std/cbits/getBufferMode.c +++ b/ghc/lib/std/cbits/getBufferMode.c @@ -1,7 +1,7 @@ /* * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998 * - * $Id: getBufferMode.c,v 1.4 2001/03/01 12:25:33 rrt Exp $ + * $Id: getBufferMode.c,v 1.5 2001/04/02 16:10:32 rrt Exp $ * * hIs...Buffered Runtime Support */ @@ -32,11 +32,11 @@ getBufferMode(ptr) StgForeignPtr ptr; { IOFileObject* fo = (IOFileObject*)ptr; - struct Stat sb; + struct stat sb; int fd = fo->fd; /* Try to find out the file type */ - while (Fstat(fd, &sb) < 0) { + while (fstat(fd, &sb) < 0) { /* highly unlikely */ if (errno != EINTR) { cvtErrno(); |