[project @ 1997-05-18 04:11:48 by sof]

[ghc-hetmet.git] / ghc / lib / glaExts / MutVar.lhs

diff --git a/ghc/lib/glaExts/MutVar.lhs b/ghc/lib/glaExts/MutVar.lhs
index e3778e9..c0a0f2a 100644 (file)
--- a/ghc/lib/glaExts/MutVar.lhs
+++ b/ghc/lib/glaExts/MutVar.lhs
@@ -14,7 +14,7 @@ module MutVar
        newVar,      -- :: a -> IO (MutVar a)
        readVar,     -- :: MutVar a -> IO a
        writeVar,    -- :: MutVar a -> a -> IO ()
-       sameVar      -- :: MutVar a -> MutVar a -> Bool
+       sameVar      -- :: MutVar a -> MutVar a -> Bool
 
        ) where