From d9d307bc676387ab8894f9fb1ee722db8ecf7272 Mon Sep 17 00:00:00 2001
From: ubq323 <ubq323@ubq323.website>
Date: Thu, 11 Jul 2024 15:43:18 +0100
Subject: set -> set!

---
 tests/sumrec_local.bth | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tests/sumrec_local.bth')

diff --git a/tests/sumrec_local.bth b/tests/sumrec_local.bth
index b40418b..e81eeb9 100644
--- a/tests/sumrec_local.bth
+++ b/tests/sumrec_local.bth
@@ -2,7 +2,7 @@
 	(if (< x 1)
 		acc
 		(f' (- x 1) (+ acc x))))
-(set _global_f' f')
+(set! _global_f' f')
 (defn (f x) (_global_f' x 0))
 (say (f 10))
 (say (f 1000))
-- 
cgit v1.2.3