Updated the monomorphizer to the new tree.
This commit is contained in:
parent
3c2cb1a713
commit
b1209b3353
4 changed files with 34 additions and 40 deletions
|
|
@ -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 ;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue