continued work on pattern matching v2
This commit is contained in:
parent
c3ea343d00
commit
9cd2cdb511
3 changed files with 279 additions and 60 deletions
11
test_program
11
test_program
|
|
@ -1,2 +1,9 @@
|
|||
id : 'a -> 'a ;
|
||||
id = \x. x ;
|
||||
data Bool () where {
|
||||
True : Bool ()
|
||||
False : Bool ()
|
||||
};
|
||||
|
||||
main : Bool () -> _Int ;
|
||||
main x = case x of {
|
||||
1 => 0
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue