Commit 583d44b2 authored by Ian Lynagh's avatar Ian Lynagh

Update output for GHC 6.8

parent ef76ff8f
Foo.hs:1:0: file name does not match module name `Main'
......@@ -67,7 +67,7 @@ test('set', normal, compile, [''])
test('scoped', expect_broken(1823), compile, [''])
test('gadt-escape1', normal, compile_fail, [''])
test('gadt-escape1', if_compiler_lt('ghc', '6.9', skip), compile_fail, [''])
# New ones from Dimitrios
......
Stopped at dynbrk007.hs:(2,4)-(6,10)
_result :: Maybe Int = _
Stopped at dynbrk007.hs:3:8-15
_result :: Maybe Int = _
Stopped at dynbrk007.hs:4:8-15
_result :: Maybe Integer = _
Stopped at dynbrk007.hs:5:8-15
_result :: Maybe Integer = _
Stopped at dynbrk007.hs:6:3-10
_result :: Maybe Int = _
i :: Int = _
t = O (_t1::t)
_t1 :: t = _
t :: Opaque = O _
()
t = O ((_t2::a) : (_t3::[a]))
_t1 :: [a] = _ : _
_t2 :: a = _
_t3 :: [a] = _
it :: () = ()
t :: Opaque = O (_ : _)
()
t = O (Just [(_t4::a),(_t5::a)] : (_t6::[Maybe [a]]))
()
t = O (Just [1,1] : (_t7::[Maybe [Integer]]))
_t7 :: [Maybe [Integer]]
t = O (_t1::t)
()
t = O ((_t2::a) : (_t3::[a]))
()
t = O ((_t4::a1) : (_t5::a1) : (_t6::[a1]))
()
t = O ((_t7::Maybe [a]) : Just [(_t8::a),(_t9::a)] : (_t10::[Maybe [a]]))
()
t = O ((_t11::Maybe [Integer]) : Just [2,2] : (_t12::[Maybe [Integer]]))
()
t = O (Just [(_t13::Integer),(_t14::Integer)] : Just [2,2] :
(_t15::[Maybe [Integer]]))
......@@ -42,6 +42,6 @@ test('ghci028', normal, ghci_script, ['ghci028.script'])
test('ghci029', normal, ghci_script, ['ghci029.script'])
test('ghci030', expect_broken(2082), ghci_script, ['ghci030.script'])
test('ghci031', expect_broken(2138), ghci_script, ['ghci031.script'])
test('ghci032', normal, ghci_script, ['ghci032.script'])
test('ghci032', if_compiler_lt('ghc', '6.9', skip), ghci_script, ['ghci032.script'])
test('1914', normal, ghci_script, ['1914.script'])
($$$) :: [a -> b] -> [a] -> [b] -- Defined at <interactive>:1:7-9
Mod178_2.hs:1:0: file name does not match module name `Main'
mod45.hs:5:2:
Misplaced type signature: == :: T -> T -> Bool
You cannot give a type signature for an imported value
read029.hs:1:13: cannot parse LANGUAGE pragma
......@@ -15,7 +15,7 @@ test('rebindable5', normal, compile_and_run, [''])
# rebindable6 has become expected failures
# following Trac #1537
test('rebindable6', normal, compile_fail, [''])
test('rebindable6', if_compiler_lt('ghc', '6.9', skip), compile_fail, [''])
test('rebindable7', normal, compile_and_run, [''])
test('rebindable8', if_compiler_lt('ghc', '6.9', expect_broken(1537)),
......
......@@ -72,9 +72,9 @@ clean(['Rn059_A.hi', 'Rn059_A.o', 'Rn059_B.hi', 'Rn059_B.o'])
test('rn060', normal, compile, [''])
test('rn061', normal, compile, [''])
test('rn062', normal, compile, [''])
test('rn063', normal, compile, [''])
test('rn063', if_compiler_lt('ghc', '6.9', expect_fail), compile, [''])
test('rn064', normal, compile, [''])
test('rn065', normal, multimod_compile, ['rn065', '-v0'])
test('rn065', if_compiler_lt('ghc', '6.9', expect_fail), multimod_compile, ['rn065', '-v0'])
test('T1972', if_compiler_lt('ghc', '6.9', expect_fail), compile, [''])
test('T2205', normal, compile, [''])
......
rn_dup.hs:9:9:
Multiple declarations of `Dup.MkT'
Declared at: rn_dup.hs:7:15
rn_dup.hs:9:9
rn_dup.hs:9:9:
Multiple declarations of `Dup.MkT'
Declared at: rn_dup.hs:7:9
rn_dup.hs:9:9
rn_dup.hs:12:15:
Multiple declarations of `Dup.rf'
Declared at: rn_dup.hs:11:15
rn_dup.hs:12:15
rn_dup.hs:12:15:
Multiple declarations of `Dup.rf'
Declared at: rn_dup.hs:11:26
rn_dup.hs:12:15
rn_dup.hs:17:7:
Multiple declarations of `Dup.CT'
Declared at: rn_dup.hs:15:7
rn_dup.hs:17:7
rn_dup.hs:18:2:
Multiple declarations of `Dup.f'
Declared at: rn_dup.hs:16:2
rn_dup.hs:18:2
rnfail023.hs:7:0: Not in scope: `f'
rnfail023.hs:8:11: Not in scope: `f'
rnfail023.hs:14:6: Not in scope: `g'
rnfail024.hs:3:0: Not in scope: `sig_without_a_defn'
rnfail024.hs:6:4: Not in scope: `sig_without_a_defn'
rnfail025.hs:3:0: Not in scope: `sig_without_a_defn'
rnfail041.hs:4:0: Not in scope: `h'
rnfail041.hs:5:0: Not in scope: `j'
......@@ -188,7 +188,7 @@ test('tcfail196', if_compiler_lt('ghc', '6.9', skip), compile_fail, [''])
test('tcfail197', if_compiler_lt('ghc', '6.9', skip), compile_fail, [''])
test('tcfail198', normal, compile_fail, [''])
test('tcfail199', normal, compile_fail, [''])
test('tcfail200', normal, compile_fail, [''])
test('tcfail200', if_compiler_lt('ghc', '6.9', skip), compile_fail, [''])
test('T1899', normal, compile_fail, [''])
test('T2126', normal, compile_fail, [''])
tcfail016.hs:9:17:
Couldn't match expected type `AnnExpr t'
against inferred type `Expr t'
Expected type: AnnExpr t -> [a]
Inferred type: Expr t -> [[Char]]
In the first argument of `(++)', namely `(g e1)'
In the expression: (g e1) ++ (g e2)
tcfail186.hs:7:8:
Couldn't match expected type `PhantomSyn a'
against inferred type `[Char]'
Expected type: PhantomSyn a
Inferred type: [Char]
In the first argument of `f', namely `"hoo"'
In the expression: f "hoo"
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