diff options
| author | LLLL Colonq <llll@colonq> | 2026-10-23 20:47:43 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2026-10-23 20:48:45 -0400 |
| commit | db58f43065c3b397754bb9efcb4a7376b2538131 (patch) | |
| tree | 81452d262163237e82821e0eb5e518e581fa9276 /pit/examples/gc.pit | |
| parent | 62ab8e0b42a57bd794941f030b4c3140d6f7c744 (diff) | |
Diffstat (limited to 'pit/examples/gc.pit')
| -rw-r--r-- | pit/examples/gc.pit | 13 |
1 files changed, 13 insertions, 0 deletions
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!) |