🎉

tests/fib.plthy

@@ -0,0 +1,12 @@
+hello|
+define fib<1> as [
+    return 1 if argument #1 = 1|
+    return 1 if argument #1 = 2|
+    return do "fib"<argument #1-1;> + do "fib"<argument #1-2;>|
+]|
+do print<do "fib"<1;>;>|
+do print<do "fib"<2;>;>|
+do print<do "fib"<3;>;>|
+do print<do "fib"<6;>;>|
+do print<do "fib"<10;>;>|
+goodbye|

tests/function.plthy

@@ -0,0 +1,4 @@
+hello|
+define five<0> as return 5|
+do print<do "five"<>;>|
+goodbye|

tests/if.plthy

@@ -0,0 +1,5 @@
+hello|
+$2 -> x|
+do print<'a';> if variable x = 1|
+do print<'b';> if variable x = 2|
+goodbye|

tests/math.plthy

@@ -0,0 +1,10 @@
+hello|
+$1 -> x|
+$2 -> y|
+$5 -> z|
+$variable x+variable y -> z| // 3
+$5-variable z -> z| // 2
+$2*variable z -> x| // 4
+$variable x/variable y -> y| // 2
+do print<variable x;variable y;variable z;>|
+goodbye|

tests/maybe.plthy

@@ -0,0 +1,5 @@
+hello|
+$1 -> x|
+maybe $variable x + 1 -> x|
+do print<variable x;>|
+goodbye|

tests/none.plthy

@@ -0,0 +1,2 @@
+hello|
+goodbye|

tests/precedence.plthy

@@ -0,0 +1,6 @@
+hello|
+$ 1 + 2 * 3 -> x|
+do print<variable x;>|
+$ 5 -> y if variable x = 7|
+do print<variable y;>|
+goodbye|

tests/scope.plthy

@@ -0,0 +1,6 @@
+hello|
+[
+    $5 -> x|
+    do print<variable x;>|
+]|
+goodbye|

tests/variable.plthy

@@ -0,0 +1,4 @@
+hello|
+$2 -> x|
+do print<variable x;>|
+goodbye|