ghc/tests/stranal/should_compile/fun.stderr

   1
   2
   3 ================================================================================
   4 Simplified:
   5 `$d1'  ::  `{PrelBase.Eval (LList a)}'
   6 `$d1' =
   7     _/\_ `$x0' -> `PrelBase.void'
   8 `MkFun'  ::  `(Fun -> Fun) -> Fun'
   9 `MkFun' =
  10     \ `$x0'  ::  `Fun -> Fun'
  11       `$x0' ->
  12         `MkFun' {`$x0'}
  13 `Nill'  ::  `LList a'
  14 `Nill' =
  15     _/\_ `$x0' -> `Nill' {_@_ `$x0'}
  16 `Conss'  ::  `a -> LList a -> LList a'
  17 `Conss' =
  18     _/\_ `$x0' -> \ `$x1'  ::  `$x0'
  19                     `$x1' `$x2'  ::  `LList $x0'
  20                           `$x2' ->
  21         `Conss' {_@_ `$x0' `$x1' `$x2'}
  22 `$d2'  ::  `{PrelBase.Eval Fun}'
  23 `$d2' =
  24     `PrelBase.void'
  25 `g'  ::  `Fun -> Fun'
  26 `g' =
  27     \ `$x0'  ::  `Fun'
  28       `$x0' ->
  29         `$x0'