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/gc.pit | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 pit/examples/gc.pit (limited to 'pit/examples/gc.pit') diff --git a/pit/examples/gc.pit b/pit/examples/gc.pit new file mode 100644 index 0000000..28eed50 --- /dev/null +++ b/pit/examples/gc.pit @@ -0,0 +1,13 @@ +(diagnostics!) +(setq! foo (cons 1 2)) +(setq! bar (cons foo 3)) +(setq! baz (cons bar foo)) +(diagnostics!) +(print! foo) +(setcar! foo baz) +(print! (cdr (car (car foo)))) +(diagnostics!) +(setq! foo nil) +(setq! bar nil) +(setq! baz nil) +(diagnostics!) -- cgit v1.3.1