From c1ad2da9bd1497737c46c53e27f915cc26bc49a6 Mon Sep 17 00:00:00 2001 From: ubq323 Date: Wed, 26 Jun 2024 13:11:00 +0100 Subject: remove explicit toplevel (do ...) from tests --- tests/func2.bth | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'tests/func2.bth') diff --git a/tests/func2.bth b/tests/func2.bth index fd16eda..14f0799 100644 --- a/tests/func2.bth +++ b/tests/func2.bth @@ -1,6 +1,5 @@ -(do - (set f1 (fn (a) (* a a))) - (set f2 (fn (a b) (+ a b))) - (puts (f1 6)) - (puts (f2 20 40)) - (f1 (f2 2 1))) +(set f1 (fn (a) (* a a))) +(set f2 (fn (a b) (+ a b))) +(puts (f1 6)) +(puts (f2 20 40)) +(f1 (f2 2 1)) -- cgit v1.2.3