Commit 670b3550 authored by Ian Lynagh's avatar Ian Lynagh

Use -v0 in TH tests to avoid package versions getting into stderr

parent ed3903dc
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -3,5 +3,3 @@ TH_dupdecl.hs:10:3:
Multiple declarations of `x'
Declared at: TH_dupdecl.hs:8:3
TH_dupdecl.hs:10:3
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -7,5 +7,3 @@ TH_exn1.hs:1:0:
[]
-> return @ [Language.Haskell.TH.Syntax.Dec]
(GHC.Base.[] @ Language.Haskell.TH.Syntax.Dec)
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -11,5 +11,3 @@ TH_exn2.hs:1:0:
do ds <- [d| |]
return @ [Language.Haskell.TH.Syntax.Dec]
(tail @ Language.Haskell.TH.Syntax.Dec ds)
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
TH_fail.hs:1:0: Code not written yet...
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -26,5 +26,3 @@ TH_reifyDecl1.hs:33:9:
Class op from TH_reifyDecl1.C: TH_reifyDecl1.m :: forall a_0 . TH_reifyDecl1.C a_0 => a_0 ->
GHC.Base.Int
infixl 3 TH_reifyDecl1.m
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -5,5 +5,3 @@ bar :: Data.Maybe.Maybe GHC.Base.Int -> GHC.Base.Int
bar x_0 | Data.Maybe.Just y_1 <- x_0
= y_1
bar _ = 9
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -4,5 +4,3 @@ AppE (ConE GHC.Float.F#) (LitE (FloatPrimL (123%10)))
GHC.Float.F# 12.3#
AppE (ConE GHC.Float.D#) (LitE (DoublePrimL (123%5)))
GHC.Float.D# 24.6##
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
Loading package base ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -7,14 +7,14 @@ setTestOpts(f)
setTestOpts(only_compiler_types(['ghc']))
setTestOpts(only_ways(['normal']));
test('TH_mkName', normal, compile, [''])
test('TH_mkName', normal, compile, ['-v0'])
test('TH_repE1', normal, compile, [''])
test('TH_repE2', normal, compile_and_run, [''])
test('TH_repE3', normal, compile, [''])
test('TH_repPrim', normal, compile, [''])
test('TH_repPrim', normal, compile, ['-v0'])
test('TH_repPrimOutput', normal, compile_and_run, [''])
test('TH_repGuard', normal, compile, [''])
test('TH_repGuard', normal, compile, ['-v0'])
test('TH_repGuardOutput', normal, compile_and_run, [''])
test('TH_repPatSig', normal, compile_fail, [''])
......@@ -34,7 +34,7 @@ clean(['TH_spliceD1_Lib.hi', 'TH_spliceD1_Lib.o'])
test('TH_spliceD2', normal, multimod_compile, ['TH_spliceD2', '-v0'])
clean(['TH_spliceD2_Lib.hi', 'TH_spliceD2_Lib.o'])
test('TH_reifyDecl1', normal, compile, [''])
test('TH_reifyDecl1', normal, compile, ['-v0'])
test('TH_reifyDecl2', normal, compile, ['-v0'])
test('TH_reifyType1', normal, compile, [''])
......@@ -49,30 +49,30 @@ clean(['TH_spliceDecl4_Lib.hi', 'TH_spliceDecl4_Lib.o'])
test('TH_spliceE1', normal, compile_and_run, [''])
test('TH_spliceExpr1', normal, compile, ['-v0'])
test('TH_spliceE3', normal, compile, [''])
test('TH_spliceE3', normal, compile, ['-v0'])
test('TH_spliceE4', normal, compile_and_run, [''])
test('TH_bracket1', normal, compile, [''])
test('TH_bracket2', normal, compile, [''])
test('TH_bracket3', normal, compile, [''])
test('TH_class1', normal, compile, [''])
test('TH_tuple1', normal, compile, [''])
test('TH_class1', normal, compile, ['-v0'])
test('TH_tuple1', normal, compile, ['-v0'])
test('TH_genEx', normal, multimod_compile, ['TH_genEx', '-v0'])
clean(['TH_genExLib.hi', 'TH_genExLib.o'])
test('TH_where', normal, compile_and_run, [''])
test('TH_spliceInst', normal, compile, [''])
test('TH_spliceInst', normal, compile, ['-v0'])
test('TH_exn1', normal, compile_fail, [''])
test('TH_exn1', normal, compile_fail, ['-v0'])
test('TH_dupdecl', normal, compile_fail, [''])
test('TH_exn2', normal, compile_fail, [''])
test('TH_dupdecl', normal, compile_fail, ['-v0'])
test('TH_exn2', normal, compile_fail, ['-v0'])
test('TH_recover', normal, compile_and_run, [''])
test('TH_dataD1', normal, compile_fail, ['-v0'])
test('TH_ppr1', normal, compile_and_run, ['-fglasgow-exts'])
test('TH_fail', normal, compile_fail, [''])
test('TH_fail', normal, compile_fail, ['-v0'])
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