main is not found ------------ desugared source code value = _lhs value (_rhs let a = _lhs x (case'Bool (\(_ :: _) -> _) (_rhs ()) (_rhs ()) True) in ()) ------------ core code value :: () value = _rhs () ------------ tooltips testdata/language-features/guard/guard15.lc 1:1-1:6 () testdata/language-features/guard/guard15.lc 1:9-1:11 () testdata/language-features/guard/guard15.lc 2:13-2:17 Bool testdata/language-features/guard/guard15.lc 2:13-3:27 () testdata/language-features/guard/guard15.lc 2:20-2:22 () testdata/language-features/guard/guard15.lc 2:20-3:27 Bool -> () testdata/language-features/guard/guard15.lc 3:25-3:27 ()