Updated bug list & started working on more tests

This commit is contained in:
sebastianselander 2023-03-06 13:04:07 +01:00
parent f5b5f11903
commit 6947614fba
11 changed files with 80 additions and 59 deletions

View file

@ -1,2 +1,2 @@
f = \x. x+1;
f : _Int -> _Int ;
f = \x. x+1 ;

View file

@ -1,3 +1,5 @@
add : _Int -> _Int -> _Int ;
add x = \y. x+y;
main = (\z. z+z) ((add 4) 6);
main : _Int ;
main = (\z. z+z) ((add 4) 6) ;

View file

@ -1,2 +1,2 @@
main = (\x. x+x+3) ((\x. x) 2)
main : _Int ;
main = (\x. x+x+3) ((\x. x) 2) ;

View file

@ -1,2 +1,2 @@
f : _Int -> _Int ;
f x = let g = (\y. y+1) in g (g x)

View file

@ -1,9 +1,14 @@
id x = x;
-- double : _Int -> _Int ;
-- double n = n + n;
add x y = x + y;
apply : ('a -> 'b -> 'c) -> 'a -> 'b -> 'c ;
apply f x = \y. f x y ;
double n = n + n;
id : 'a -> 'a ;
id x = x ;
apply f x = \y. f x y;
add : _Int -> _Int -> _Int ;
add x y = x + y ;
main = apply (id add) ((\x. x + 1) 1) (double 3);
main : _Int -> _Int -> _Int ;
main = (id add) 1 2 ;