summaryrefslogtreecommitdiff
path: root/tests/func3.bth
diff options
context:
space:
mode:
Diffstat (limited to 'tests/func3.bth')
-rw-r--r--tests/func3.bth17
1 files changed, 8 insertions, 9 deletions
diff --git a/tests/func3.bth b/tests/func3.bth
index 2da8cc9..59392e1 100644
--- a/tests/func3.bth
+++ b/tests/func3.bth
@@ -1,9 +1,8 @@
-(do
- (set f1 (fn (a b) (* a b)))
- (set f2 (fn (x)
- (set xx x)
- (let (a 3
- g (fn (y) (+ y 7)))
- (* (g a) (g xx)))))
- (puts (f1 6 6))
- (f2 7))
+(set f1 (fn (a b) (* a b)))
+(set f2 (fn (x)
+ (set xx x)
+ (let (a 3
+ g (fn (y) (+ y 7)))
+ (* (g a) (g xx)))))
+(puts (f1 6 6))
+(f2 7)