summaryrefslogtreecommitdiff
path: root/testdata/language-features/recursion/simplerec02.out
blob: 21d25b22705b487e7c14083e49f4af251c980f20 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
main is not found
------------ desugared source code
value
  = _lhs
    value
    (_rhs
      let
        a
          = primFix
            \(b :: _) -> _lhs
              fun
              \(c :: _) -> case'Bool
                (\(_ :: _) -> _)
                (_rhs (b (fromInt 0)))
                (_rhs 'a')
                (fromInt 0 == c)
        in ())
------------ core code
value :: ()
value = _rhs ()
------------ tooltips
simplerec02.lc 1:1-1:6
    ()
simplerec02.lc 1:21-1:24
    Char
simplerec02.lc 1:21-2:26
    Bool -> Char
simplerec02.lc 2:21-2:24
    _e
simplerec02.lc 2:25-2:26
    _b
simplerec02.lc 3:12-3:14
    ()