[project @ 2002-05-09 13:16:29 by simonmar]
[haskell-directory.git] / Control / Monad / ST / Lazy.hs
index 8b2f41b..adaca1a 100644 (file)
@@ -2,14 +2,12 @@
 -- |
 -- Module      :  Control.Monad.ST.Lazy
 -- Copyright   :  (c) The University of Glasgow 2001
--- License     :  BSD-style (see the file libraries/core/LICENSE)
+-- License     :  BSD-style (see the file libraries/base/LICENSE)
 -- 
 -- Maintainer  :  libraries@haskell.org
 -- Stability   :  provisional
 -- Portability :  non-portable (requires universal quantification for runST)
 --
--- $Id: Lazy.hs,v 1.5 2002/04/24 16:31:39 simonmar Exp $
---
 -- This module presents an identical interface to Control.Monad.ST,
 -- but the underlying implementation of the state thread is lazy.
 --
@@ -73,9 +71,9 @@ fixST :: (a -> ST s a) -> ST s a
 fixST m = ST (\ s -> 
                let 
                   ST m_r = m r
-                  (r,s)  = m_r s
+                  (r,s') = m_r s
                in
-                  (r,s))
+                  (r,s'))
 #endif
 
 -- ---------------------------------------------------------------------------