[commit: ghc] wip/T15578: Fix test for #15578 (848a7e9)
git at git.haskell.org
git at git.haskell.org
Fri Sep 7 11:15:50 UTC 2018
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/T15578
Link : http://ghc.haskell.org/trac/ghc/changeset/848a7e971179f376c11890c83a51f56f6754ac52/ghc
>---------------------------------------------------------------
commit 848a7e971179f376c11890c83a51f56f6754ac52
Author: Tobias Dammers <tdammers at gmail.com>
Date: Fri Sep 7 13:02:49 2018 +0200
Fix test for #15578
By allowing 0-arity values to be inlined, we end up changing boringness
annotations, and this gets reflected in the Core output for this
particular test.
>---------------------------------------------------------------
848a7e971179f376c11890c83a51f56f6754ac52
testsuite/tests/simplCore/should_compile/T7360.stderr | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/testsuite/tests/simplCore/should_compile/T7360.stderr b/testsuite/tests/simplCore/should_compile/T7360.stderr
index f310e8f..5332a3e 100644
--- a/testsuite/tests/simplCore/should_compile/T7360.stderr
+++ b/testsuite/tests/simplCore/should_compile/T7360.stderr
@@ -26,7 +26,7 @@ fun1 [InlPrag=NOINLINE] :: Foo -> ()
Str=<S,1*U>,
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)
+ Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=True)
Tmpl= \ (x [Occ=Once] :: Foo) ->
case x of { __DEFAULT -> GHC.Tuple.() }}]
fun1 = \ (x :: Foo) -> case x of { __DEFAULT -> GHC.Tuple.() }
More information about the ghc-commits
mailing list