From: panne Date: Mon, 4 Mar 2002 17:25:36 +0000 (+0000) Subject: [project @ 2002-03-04 17:25:36 by panne] X-Git-Tag: nhc98-1-18-release~1094 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=f408d28c5dfbaee92e6fc4c2876f5c791d11fb80;p=ghc-base.git [project @ 2002-03-04 17:25:36 by panne] Export modifySTRef, too --- diff --git a/Data/STRef.hs b/Data/STRef.hs index 747d5ba..c60b299 100644 --- a/Data/STRef.hs +++ b/Data/STRef.hs @@ -8,7 +8,7 @@ -- Stability : experimental -- Portability : non-portable (requires non-portable module ST) -- --- $Id: STRef.hs,v 1.2 2001/07/03 11:37:50 simonmar Exp $ +-- $Id: STRef.hs,v 1.3 2002/03/04 17:25:36 panne Exp $ -- -- Mutable references in the ST monad. -- @@ -18,7 +18,8 @@ module Data.STRef ( STRef, -- abstract, instance Eq newSTRef, -- :: a -> ST s (STRef s a) readSTRef, -- :: STRef s a -> ST s a - writeSTRef -- :: STRef s a -> a -> ST s () + writeSTRef, -- :: STRef s a -> a -> ST s () + modifySTRef -- :: STRef s a -> (a -> a) -> ST s () ) where import Prelude