Deleted bad sample programs, added polymorphic call in polymorphic function test

This commit is contained in:
Rakarake 2023-03-08 17:38:50 +01:00
parent 63f9689f38
commit d377ded7e1
10 changed files with 50 additions and 41 deletions

View file

@ -1,2 +0,0 @@
f = \x. x+1;

View file

@ -1,3 +0,0 @@
add x = \y. x+y;
main = (\z. z+z) ((add 4) 6);

View file

@ -1,2 +0,0 @@
main = (\x. x+x+3) ((\x. x) 2)

View file

@ -1,2 +0,0 @@
f x = let g = (\y. y+1) in g (g x)

View file

@ -1,9 +0,0 @@
id x = x;
add x y = x + y;
double n = n + n;
apply f x = \y. f x y;
main = apply (id add) ((\x. x + 1) 1) (double 3);

6
sample-programs/good1 Normal file
View file

@ -0,0 +1,6 @@
main : _Int ;
main = (id : _Int -> _Int) 5 ;
id : 'a -> 'a ;
id x = (x : 'a);