diff options
Diffstat (limited to 'testsuite/tests/simplCore/should_compile/T3717.stderr')
| -rw-r--r-- | testsuite/tests/simplCore/should_compile/T3717.stderr | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T3717.stderr b/testsuite/tests/simplCore/should_compile/T3717.stderr index 6e8fe19294..bd6417b729 100644 --- a/testsuite/tests/simplCore/should_compile/T3717.stderr +++ b/testsuite/tests/simplCore/should_compile/T3717.stderr @@ -61,15 +61,15 @@ foo [InlPrag=[2]] :: Int -> Int 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) - Tmpl= \ (w [Occ=Once1!] :: Int) -> - case w of { GHC.Types.I# ww [Occ=Once1] -> + Tmpl= \ (ds [Occ=Once1!] :: Int) -> + case ds of { GHC.Types.I# ww [Occ=Once1] -> case T3717.$wfoo ww of ww1 [Occ=Once1] { __DEFAULT -> GHC.Types.I# ww1 } }}] foo - = \ (w :: Int) -> - case w of { GHC.Types.I# ww -> + = \ (ds :: Int) -> + case ds of { GHC.Types.I# ww -> case T3717.$wfoo ww of ww1 { __DEFAULT -> GHC.Types.I# ww1 } } |