Commit 20948b3b authored by mnislaih's avatar mnislaih
Browse files

Added test for :print of a reference

parent 5280b38e
......@@ -26,6 +26,7 @@ test('print024', normal, ghci_script, ['print024.script'])
test('print025', normal, ghci_script, ['print025.script'])
test('print026', normal, ghci_script, ['print026.script'])
test('print027', normal, ghci_script, ['print027.script'])
test('print028', normal, ghci_script, ['print028.script'])
test('break001', normal, ghci_script, ['break001.script'])
......
:m + Data.IORef
let l = map Just [1..10]
:p l
head l
r <- newIORef l
:p r
:sp r
\ No newline at end of file
l = (_t1::[Maybe Integer])
Just 1
r = GHC.IOBase.IORef (GHC.STRef.STRef {(Just 1 : (_t2::[Maybe Integer]))})
r = GHC.IOBase.IORef (GHC.STRef.STRef {(Just 1 : _)})
Supports Markdown
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