summaryrefslogtreecommitdiff
path: root/testdata/language-features/recursion/mutualRec.lc
blob: c9ae613554f99692cb0b65b56242423869042f44 (plain)
1
2
3
4
5
6
7
8

x = 2: y
y = 1: x

main = case (x :: [Int]) of
    2: 1: 2: _ -> True