summaryrefslogtreecommitdiff
path: root/ghc/lib/std/cbits/getLock.c
diff options
context:
space:
mode:
authorsimonmar <unknown>1999-12-08 15:47:08 +0000
committersimonmar <unknown>1999-12-08 15:47:08 +0000
commit4ee0f622625f8e7cc76488e99762a323c46df952 (patch)
tree3aea37e6a21b358e8cbadffab6f3594b64e81f3a /ghc/lib/std/cbits/getLock.c
parent9c370d695ac7b7b7108440b028b017459ae5ef02 (diff)
downloadhaskell-4ee0f622625f8e7cc76488e99762a323c46df952.tar.gz
[project @ 1999-12-08 15:47:06 by simonmar]
misc ansification and -Wall cleanup
Diffstat (limited to 'ghc/lib/std/cbits/getLock.c')
-rw-r--r--ghc/lib/std/cbits/getLock.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/lib/std/cbits/getLock.c b/ghc/lib/std/cbits/getLock.c
index 9d392c3ea7..748ff6562b 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.6 1999/05/05 10:33:16 sof Exp $
+ * $Id: getLock.c,v 1.7 1999/12/08 15:47:07 simonmar Exp $
*
* stdin/stout/stderr Runtime Support
*/
@@ -134,7 +134,7 @@ int
unlockFile(fd)
int fd;
{
- int i, rc;
+ int i;
for (i = 0; i < readLocks; i++)
if (readLock[i].fd == fd) {