summaryrefslogtreecommitdiff
path: root/testsuite/tests/numeric
diff options
context:
space:
mode:
authorJoachim Breitner <mail@joachim-breitner.de>2016-03-23 13:38:34 +0100
committerJoachim Breitner <mail@joachim-breitner.de>2016-03-29 16:53:14 +0200
commitc8138c8505cd5f7f1b9ef33580a443a5c2c4f928 (patch)
treee27ff0e0a761a89dcbf49422281ca0a36e155cac /testsuite/tests/numeric
parente6e17a095f68509d60b06202e49daaf275b7c320 (diff)
downloadhaskell-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.stdout14
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)