From db58f43065c3b397754bb9efcb4a7376b2538131 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Fri, 23 Oct 2026 20:47:43 -0400 Subject: pit: Add tests, fix binding bug --- pit/examples/bif.pit | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 pit/examples/bif.pit (limited to 'pit/examples/bif.pit') diff --git a/pit/examples/bif.pit b/pit/examples/bif.pit new file mode 100644 index 0000000..81a1248 --- /dev/null +++ b/pit/examples/bif.pit @@ -0,0 +1,12 @@ +(print! nil) +(print! nil) +(print! t) +(print! (eq? 1 1)) +(diagnostics!) +(defun! bif (x) + (cons x x)) +(diagnostics!) +(setq! foo (print! (bif (bif (bif 67))))) +(print! (eq? (car foo) (cdr foo))) +(diagnostics!) +(print! foo) -- cgit v1.3.1