[project @ 1998-06-29 14:51:03 by sof]

comment typo

diff --git a/ghc/lib/std/cbits/closeFile.lc b/ghc/lib/std/cbits/closeFile.lc
index 6118574..4fac27b 100644 (file)
--- a/ghc/lib/std/cbits/closeFile.lc
+++ b/ghc/lib/std/cbits/closeFile.lc
@@ -17,7 +17,7 @@ StgForeignObj fp;
 
     if ( unlockFile(fileno((FILE *) fp)) ) {
       /* If the file has already been unlocked (or an entry
-         for it in the locking tables couldn't be fond), could
+         for it in the locking tables couldn't be found), could
          mean two things:
 
            - we're repeating an hClose on an already