From: Mart Lubbers <mart@martlubbers.net>
Date: Mon, 18 Mar 2019 15:21:34 +0000 (+0100)
Subject: problematic testcase
X-Git-Url: https://git.martlubbers.net/?a=commitdiff_plain;h=16bc9440b84b05155d175bd137b236eec095d811;p=minfp.git

problematic testcase
---

diff --git a/tests/preamble.mfp b/tests/preamble.mfp
index cae72d6..b06bc68 100644
--- a/tests/preamble.mfp
+++ b/tests/preamble.mfp
@@ -9,13 +9,15 @@ $ ifxr 0 x y = x y;
 - ifxl 6 = code sub;
 + ifxl 6 = code add;
 
+on f g a b = f (g a) (g b);
+
 //Conditional operators
 if = code if;
 
-fac i = if (i == 0) 1 $ i * fac (i - 1);
+//fac i = if (i == 0) 1 $ i * fac (i - 1);
 id x = x;
 
 even i = if (i == 0) True (odd (i - 1));
 odd i = if (i == 0) False (even (i - 1));
 
-start = odd;
+start = on;