From d9d307bc676387ab8894f9fb1ee722db8ecf7272 Mon Sep 17 00:00:00 2001 From: ubq323 Date: Thu, 11 Jul 2024 15:43:18 +0100 Subject: set -> set! --- tests/flet.bth | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tests/flet.bth') diff --git a/tests/flet.bth b/tests/flet.bth index 102fc34..b4f955c 100644 --- a/tests/flet.bth +++ b/tests/flet.bth @@ -1,5 +1,5 @@ -(set f1 (fn (a b c) (say (* a (+ b c))))) -(set f2 (fn (a) (say (* a a)))) +(set! f1 (fn (a b c) (say (* a (+ b c))))) +(set! f2 (fn (a) (say (* a a)))) (if true (f1 6 2 4) (f2 7)) -- cgit v1.2.3