Commit c150f76e authored by simonmar's avatar simonmar
Browse files

[project @ 2002-12-13 15:18:55 by simonmar]

use Data.IORef rather than IORef with -package lang
parent fd17f7a3
test('ioref001', extra_run_opts('+RTS -K16m -RTS'), \ test('ioref001', extra_run_opts('+RTS -K16m -RTS'), \
compile_and_run, ['-package lang +RTS -K16m -RTS']) compile_and_run, ['+RTS -K16m -RTS'])
# need to add -K16m to the compiler opts, so that GHCi gets it too # need to add -K16m to the compiler opts, so that GHCi gets it too
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
module Main where module Main where
import IORef import Data.IORef
loop r 0 = return () loop r 0 = return ()
loop r c = loop r (c-1) >> writeIORef r 42 loop r c = loop r (c-1) >> writeIORef r 42
......
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