Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/5725ac06e1722652a21d7a192f99a8d3cbea44d8

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

commit 5725ac06e1722652a21d7a192f99a8d3cbea44d8
Author: Simon Peyton Jones <simo...@microsoft.com>
Date:   Fri Oct 19 02:26:43 2012 +0100

    Adapt to fix in exprIsWorkFree

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

 tests/simplCore/should_compile/spec-inline.stderr |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/simplCore/should_compile/spec-inline.stderr 
b/tests/simplCore/should_compile/spec-inline.stderr
index e639507..2cff9e3 100644
--- a/tests/simplCore/should_compile/spec-inline.stderr
+++ b/tests/simplCore/should_compile/spec-inline.stderr
@@ -109,7 +109,7 @@ Roman.foo2 :: GHC.Types.Int
  Caf=NoCafRefs,
  Str=DmdType m,
  Unf=Unf{Src=<vanilla>, TopLvl=True, Arity=0, Value=True,
-         ConLike=True, WorkFree=False, Expandable=True,
+         ConLike=True, WorkFree=True, Expandable=True,
          Guidance=IF_ARGS [] 10 20}]
 Roman.foo2 = GHC.Types.I# 6
 
@@ -118,7 +118,7 @@ Roman.foo1 :: Data.Maybe.Maybe GHC.Types.Int
  Caf=NoCafRefs,
  Str=DmdType,
  Unf=Unf{Src=<vanilla>, TopLvl=True, Arity=0, Value=True,
-         ConLike=True, WorkFree=False, Expandable=True,
+         ConLike=True, WorkFree=True, Expandable=True,
          Guidance=IF_ARGS [] 10 20}]
 Roman.foo1 = Data.Maybe.Just @ GHC.Types.Int Roman.foo2
 



_______________________________________________
Cvs-ghc mailing list
Cvs-ghc@haskell.org
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to