Commit abb9e342 authored by Ian Lynagh's avatar Ian Lynagh

Tweak #2174, which we now expect to pass again

parent aad83cd1
setTestOpts(composes([extra_run_opts('-ignore-dot-ghci'), normalise_slashes]))
test('print001', normal, ghci_script, ['print001.script'])
test('print002', if_compiler_ge('ghc','6.9', expect_broken(2174)), ghci_script, ['print002.script'])
test('print002', normal, ghci_script, ['print002.script'])
test('print003', normal, ghci_script, ['print003.script'])
test('print004', normal, ghci_script, ['print004.script'])
test('print005', normal, ghci_script, ['print005.script'])
......
......@@ -8,6 +8,9 @@ f
let i = Just (10::Integer)
:p i
case i of Just j -> Control.Exception.evaluate j
:p i
:l ../Test.hs
let s = S1 'a' 'b' 'c'
......
Just 1.2
f = Just 1.2
i = Just (_t1::Integer)
10
i = Just 10
'a'
s = S1 'a' 'b' 'c'
......
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