diff options
| -rw-r--r-- | tests/func5.bth | 8 | ||||
| -rw-r--r-- | tests/func5.out | 6 |
2 files changed, 14 insertions, 0 deletions
diff --git a/tests/func5.bth b/tests/func5.bth new file mode 100644 index 0000000..890e706 --- /dev/null +++ b/tests/func5.bth @@ -0,0 +1,8 @@ +(set f (fn (a) (say (* a a)))) +(f 2) +(f 4) +(f 6) +(f 8) +(let (a 5) + (f a) + (f (* 2 a))) diff --git a/tests/func5.out b/tests/func5.out new file mode 100644 index 0000000..e58888d --- /dev/null +++ b/tests/func5.out @@ -0,0 +1,6 @@ +4 +16 +36 +64 +25 +100 |