From 2bdcaf319b1d74ffbaccf08a58336f804761beab Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Thu, 9 Jul 2026 23:51:55 -0400 Subject: Refactor into monorepo --- pit/test/thebug2.lisp | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 pit/test/thebug2.lisp (limited to 'pit/test/thebug2.lisp') diff --git a/pit/test/thebug2.lisp b/pit/test/thebug2.lisp new file mode 100644 index 0000000..2376ff8 --- /dev/null +++ b/pit/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))) + -- cgit v1.3.1