Add a test for partial evaluation

This is mostly in case I actually implement better functions of arity
>1, but forget to add this test.
This commit is contained in:
Théophile Bastian 2018-02-16 02:58:08 +01:00
parent 9a1b6fb177
commit 5c6f538f9e
2 changed files with 7 additions and 0 deletions

View file

@ -0,0 +1,2 @@
42
42

View file

@ -0,0 +1,5 @@
let sum = fun x -> fun y -> fun z -> x + y + z in
let plus2 = sum 1 1 in
let _ = print (sum 30 10 2) in
print (plus2 40)