Fix bug in apply checking
[minfp.git] / tests / preamble.mfp
index b06bc68..8f579a1 100644 (file)
@@ -10,6 +10,7 @@ $ ifxr 0 x y = x y;
 + ifxl 6 = code add;
 
 on f g a b = f (g a) (g b);
+onn = \f. \g. \a. \b. f (g a) (g b);
 
 //Conditional operators
 if = code if;
@@ -20,4 +21,5 @@ id x = x;
 even i = if (i == 0) True (odd (i - 1));
 odd i = if (i == 0) False (even (i - 1));
 
-start = on;
+//start = on;
+start = \f. \g. \a. \b. f (g a) (g b);