[commit: ghc] wip/T15578: Fix test for #15578 (0540854)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/T15578
Link       : http://ghc.haskell.org/trac/ghc/changeset/05408545992751d37b8a9f61ebb4ffc348dc081f/ghc

>---------------------------------------------------------------

commit 05408545992751d37b8a9f61ebb4ffc348dc081f
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.


>---------------------------------------------------------------

05408545992751d37b8a9f61ebb4ffc348dc081f
 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.() }