parsing cleaner
[minfp.git] / tests / preamble.mfp
index d89ffff..be7ee13 100644 (file)
@@ -4,4 +4,5 @@ $ ifxr 0 x y = x y;
 * ifxl 7 x y = mul x y;
 - ifxl 6 x y = sub x y;
 + ifxl 6 x y = add x y;
-start = 3 - 2 - 1;
+fac i = if (i == 0) 1 (i * fac (i - 1));
+start = fac 5;