cvs commit: hugs98/libraries/Hugs LazyST.hs

[ross@glass.cse.ogi.edu]

ross        2003/01/30 05:25:42 PST

  Modified files:
    libraries/Hugs       LazyST.hs 
  Log:
  sequence unsafeIOToST with (lazy) ST operations, so that
  
  	runST (do {r <- newSTRef 'a'; unsafeIOToST (putStrLn "foo"); readSTRef r})
  
  produces output.
  
  Revision  Changes    Path
  1.7       +1 -1      hugs98/libraries/Hugs/LazyST.hs