Move tests from tests/ghc-regress/* to just tests/*
[ghc.git] / testsuite / tests / simplCore / should_compile / T3717.stderr
1
2 ==================== Tidy Core ====================
3 Rec {
4 T3717.$wfoo [Occ=LoopBreaker] :: GHC.Prim.Int# -> GHC.Prim.Int#
5 [GblId, Arity=1, Caf=NoCafRefs, Str=DmdType L]
6 T3717.$wfoo =
7   \ (ww :: GHC.Prim.Int#) ->
8     case ww of ds {
9       __DEFAULT -> T3717.$wfoo (GHC.Prim.-# ds 1);
10       0 -> 0
11     }
12 end Rec }
13
14 T3717.foo [InlPrag=INLINE[0]] :: GHC.Types.Int -> GHC.Types.Int
15 [GblId,
16  Arity=1,
17  Caf=NoCafRefs,
18  Str=DmdType U(L)m,
19  Unf=Unf{Src=Worker=T3717.$wfoo, TopLvl=True, Arity=1, Value=True,
20          ConLike=True, Cheap=True, Expandable=True,
21          Guidance=ALWAYS_IF(unsat_ok=True,boring_ok=False)
22          Tmpl= \ (w [Occ=Once!] :: GHC.Types.Int) ->
23                  case w of _ { GHC.Types.I# ww [Occ=Once] ->
24                  case T3717.$wfoo ww of ww1 { __DEFAULT -> GHC.Types.I# ww1 }
25                  }}]
26 T3717.foo =
27   \ (w :: GHC.Types.Int) ->
28     case w of _ { GHC.Types.I# ww ->
29     case T3717.$wfoo ww of ww1 { __DEFAULT -> GHC.Types.I# ww1 }
30     }
31
32
33