diff options
Diffstat (limited to 'testsuite/tests/stranal/should_compile/T20817.stderr')
-rw-r--r-- | testsuite/tests/stranal/should_compile/T20817.stderr | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/testsuite/tests/stranal/should_compile/T20817.stderr b/testsuite/tests/stranal/should_compile/T20817.stderr index ba364234db..c113c3c2d1 100644 --- a/testsuite/tests/stranal/should_compile/T20817.stderr +++ b/testsuite/tests/stranal/should_compile/T20817.stderr @@ -234,10 +234,10 @@ Rec { -- RHS size: {terms: 34, types: 36, coercions: 0, joins: 0/0} $wg [InlPrag=[2], Occ=LoopBreaker, - Dmd=LCL(C1(C1(C1(C1(C1(C1(!L)))))))] + Dmd=LCS(C1(C1(C1(C1(C1(C1(L)))))))] :: forall {a} {b} {c} {d} {e} {t} {t} {t}. Bool -> a -> b -> c -> t -> t -> t -> (# a, b, c, t, t, t #) -[LclId[StrictWorker([!, ~, ~, ~, ~, ~, ~])], +[LclId[StrictWorker([])], Arity=7, Str=<1L><L><L><L><L><L><L>, Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True, @@ -252,9 +252,7 @@ $wg (@t) (@t) (@t) - (ds [Dmd=1L] - :: Bool - Unf=OtherCon []) + (ds [Dmd=1L] :: Bool) (ww :: a) (ww :: b) (ww :: c) |