Commit d4e0231e authored by sof's avatar sof
Browse files

[project @ 1997-05-26 05:14:14 by sof]

Fluff
parent 36c67e39
......@@ -43,9 +43,11 @@ instance Monad (ST s) where
case (k r) of { ST k2 ->
(k2 new_s) }}
{-# INLINE returnST #-}
-- here for backward compatibility:
{-# INLINE returnST #-}
returnST :: a -> ST s a
thenST :: ST s a -> (a -> ST s b) -> ST s b
seqST :: ST s a -> ST s b -> ST s b
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment