blob: 7d7f8a4d170fc0666075c240a592a8d789dd0b91 (
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
|
------------ desugared source code
value
= case'Bool
(\_ -> _)
(case'Bool (\_ -> _) (_rhs undefined) (_rhs "False") False)
(_rhs "True")
True
main is not found
------------ trace
value :: String
------------ tooltips
testdata/language-features/guard/guard03.lc 1:1-1:6
String
testdata/language-features/guard/guard03.lc 2:5-2:9
Bool
testdata/language-features/guard/guard03.lc 2:5-3:20
String
testdata/language-features/guard/guard03.lc 2:12-2:18
String
testdata/language-features/guard/guard03.lc 2:12-3:20
Bool -> String
testdata/language-features/guard/guard03.lc 3:5-3:10
Bool
testdata/language-features/guard/guard03.lc 3:5-3:20
String
testdata/language-features/guard/guard03.lc 3:13-3:20
String
|