summaryrefslogtreecommitdiff
path: root/test/thebug2.lisp
diff options
context:
space:
mode:
authorLLLL Colonq <llll@colonq>2026-03-27 17:23:26 -0400
committerLLLL Colonq <llll@colonq>2026-03-27 17:23:26 -0400
commit4b294e47144da00ae4b9568fed39569d187ce07e (patch)
tree179222746330c25fa4f0dfdb03e0fc0a15ad7c9b /test/thebug2.lisp
parent3707dfaa64715c8fb1ba8a23f9762fef174538d8 (diff)
Fix doubles
Diffstat (limited to 'test/thebug2.lisp')
-rw-r--r--test/thebug2.lisp13
1 files changed, 13 insertions, 0 deletions
diff --git a/test/thebug2.lisp b/test/thebug2.lisp
new file mode 100644
index 0000000..2376ff8
--- /dev/null
+++ b/test/thebug2.lisp
@@ -0,0 +1,13 @@
+
+(setq! z 40)
+(setq! f
+ (lambda (x)
+ (lambda (y)
+ (lambda (w)
+ (+
+ (funcall (lambda (z) (+ x y z)) 3)
+ w
+ z)))))
+(let ((z 20))
+ (print! (funcall (funcall (funcall f 1) 2) 3)))
+