summaryrefslogtreecommitdiff
path: root/ghc/lib/std/cbits/getLock.c
diff options
context:
space:
mode:
authorrrt <unknown>2001-04-02 16:10:33 +0000
committerrrt <unknown>2001-04-02 16:10:33 +0000
commiteb256e9af970565f79a66f8731bdaeddcc96a3a6 (patch)
treeaf3cf1f66b01322f35a7e971af38b6ff9b08731b /ghc/lib/std/cbits/getLock.c
parentc69fc1ae9231717e81f268d4d522c1770d9fdb14 (diff)
downloadhaskell-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/getLock.c')
-rw-r--r--ghc/lib/std/cbits/getLock.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/lib/std/cbits/getLock.c b/ghc/lib/std/cbits/getLock.c
index 143da77aed..7a82fbeb70 100644
--- a/ghc/lib/std/cbits/getLock.c
+++ b/ghc/lib/std/cbits/getLock.c
@@ -1,7 +1,7 @@
/*
* (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
*
- * $Id: getLock.c,v 1.8 2001/03/01 12:25:33 rrt Exp $
+ * $Id: getLock.c,v 1.9 2001/04/02 16:10:32 rrt Exp $
*
* stdin/stout/stderr Runtime Support
*/
@@ -48,9 +48,9 @@ int for_writing;
int exclusive;
{
int i;
- struct Stat sb;
+ struct stat sb;
- while (Fstat(fd, &sb) < 0) {
+ while (fstat(fd, &sb) < 0) {
if (errno != EINTR) {
#ifndef _WIN32
return -1;