diff options
author | Joachim Breitner <mail@joachim-breitner.de> | 2016-03-23 13:38:34 +0100 |
---|---|---|
committer | Joachim Breitner <mail@joachim-breitner.de> | 2016-03-29 16:53:14 +0200 |
commit | c8138c8505cd5f7f1b9ef33580a443a5c2c4f928 (patch) | |
tree | e27ff0e0a761a89dcbf49422281ca0a36e155cac /testsuite/tests/numeric | |
parent | e6e17a095f68509d60b06202e49daaf275b7c320 (diff) | |
download | haskell-c8138c8505cd5f7f1b9ef33580a443a5c2c4f928.tar.gz |
Do not print DmdType in Core output
too verbose, and usualy preceded by Str= anyways.
Diffstat (limited to 'testsuite/tests/numeric')
-rw-r--r-- | testsuite/tests/numeric/should_compile/T7116.stdout | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/testsuite/tests/numeric/should_compile/T7116.stdout b/testsuite/tests/numeric/should_compile/T7116.stdout index 7853fa128b..4bbd50e716 100644 --- a/testsuite/tests/numeric/should_compile/T7116.stdout +++ b/testsuite/tests/numeric/should_compile/T7116.stdout @@ -6,7 +6,7 @@ Result size of Tidy Core = {terms: 32, types: 17, coercions: 0} T7116.$trModule2 :: GHC.Types.TrName [GblId, Caf=NoCafRefs, - Str=DmdType m1, + Str=m1, Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 30 20}] T7116.$trModule2 = GHC.Types.TrNameS "main"# @@ -15,7 +15,7 @@ T7116.$trModule2 = GHC.Types.TrNameS "main"# T7116.$trModule1 :: GHC.Types.TrName [GblId, Caf=NoCafRefs, - Str=DmdType m1, + Str=m1, Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 40 20}] T7116.$trModule1 = GHC.Types.TrNameS "T7116"# @@ -24,7 +24,7 @@ T7116.$trModule1 = GHC.Types.TrNameS "T7116"# T7116.$trModule :: GHC.Types.Module [GblId, Caf=NoCafRefs, - Str=DmdType m, + Str=m, Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 30}] T7116.$trModule = @@ -35,7 +35,7 @@ dr :: Double -> Double [GblId, Arity=1, Caf=NoCafRefs, - Str=DmdType <S(S),1*U(U)>m, + Str=<S(S),1*U(U)>m, Unf=Unf{Src=InlineStable, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=False) @@ -54,7 +54,7 @@ dl :: Double -> Double [GblId, Arity=1, Caf=NoCafRefs, - Str=DmdType <S(S),1*U(U)>m, + Str=<S(S),1*U(U)>m, Unf=Unf{Src=InlineStable, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=False) @@ -69,7 +69,7 @@ fr :: Float -> Float [GblId, Arity=1, Caf=NoCafRefs, - Str=DmdType <S(S),1*U(U)>m, + Str=<S(S),1*U(U)>m, Unf=Unf{Src=InlineStable, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=False) @@ -88,7 +88,7 @@ fl :: Float -> Float [GblId, Arity=1, Caf=NoCafRefs, - Str=DmdType <S(S),1*U(U)>m, + Str=<S(S),1*U(U)>m, Unf=Unf{Src=InlineStable, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=False) |