From 6deeb9630d4b4e7d672ab851dcd4fe3d0d3d2865 Mon Sep 17 00:00:00 2001 From: ubq323 Date: Wed, 26 Jun 2024 14:51:01 +0100 Subject: func5 test --- tests/func5.bth | 8 ++++++++ tests/func5.out | 6 ++++++ 2 files changed, 14 insertions(+) create mode 100644 tests/func5.bth create mode 100644 tests/func5.out 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 -- cgit v1.2.3