repositories
/
minfp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1f5d6dc
)
problematic testcase
author
Mart Lubbers
<mart@martlubbers.net>
Mon, 18 Mar 2019 15:21:34 +0000
(16:21 +0100)
committer
Mart Lubbers
<mart@martlubbers.net>
Mon, 18 Mar 2019 15:21:34 +0000
(16:21 +0100)
tests/preamble.mfp
patch
|
blob
|
history
diff --git
a/tests/preamble.mfp
b/tests/preamble.mfp
index
cae72d6
..
b06bc68
100644
(file)
--- 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 = o
dd
;
+start = o
n
;