fork download
  1. import Data.IORef
  2.  
  3. main = do
  4. xs <- newIORef []
  5. modifyIORef xs (1:)
  6. modifyIORef xs (2:)
  7. xs <- readIORef xs
  8. print xs
Success #stdin #stdout 0s 4652KB
stdin
Standard input is empty
stdout
[2,1]