Type inference/checking on ADTs mostly complete(?). Still have to test
This commit is contained in:
parent
2f45f39435
commit
bbf6e159c7
8 changed files with 563 additions and 467 deletions
16
test_program
16
test_program
|
|
@ -1,2 +1,14 @@
|
|||
main : _Int ;
|
||||
main = 3 + 3 ;
|
||||
data List ('a) where;
|
||||
Nil : List ('a),
|
||||
Cons : 'a -> List ('a) -> List ('a) ;
|
||||
|
||||
main : List (_Int) ;
|
||||
main = Cons 1 (Cons 0 Nil) ;
|
||||
|
||||
data Bool () where;
|
||||
True : Bool (),
|
||||
False : Bool ();
|
||||
|
||||
boolean : Bool (_Int);
|
||||
boolean = True ;
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue