Updated the monomorphizer to the new tree.

This commit is contained in:
Samuel Hammersberg 2023-03-24 17:13:56 +01:00
parent 3c2cb1a713
commit b1209b3353
4 changed files with 34 additions and 40 deletions

View file

@ -1,8 +1,5 @@
posMul: _Int - > _Int - > _Int;
posMul a b = a + b; {
-
case b of {
0 => 0;
_ => a + posMul a(b - 1)
}; -
}
add : Int -> Int -> Int ;
add x y = x + y;
main : Int ;
main = add 4 6 ;