From eb08f1300df3840dd4db6ff5ca894f6fd684b691 Mon Sep 17 00:00:00 2001 From: Joseph Ferano Date: Fri, 25 Sep 2026 22:40:04 +0700 Subject: [PATCH] dev-parity keeps its pointer global named beside the prints, since a pointer prints without reading it --- test/programs/dev-parity.flan | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/test/programs/dev-parity.flan b/test/programs/dev-parity.flan index 277838a6..f079ec36 100644 --- a/test/programs/dev-parity.flan +++ b/test/programs/dev-parity.flan @@ -56,6 +56,8 @@ ;; The innermost frame names every global above, so the break loop's section ;; holds all of them; then it stops. It prints them, and a frame whose only ;; slots are the printer's temporaries is still attributed its globals. +;; [nowhere] is stored to itself as well: a pointer prints as without +;; reading the variable, so printing it alone would not name it. (defn inner [] i64 (print small) (print mid) (print large) (print huge) (print neg) (print ratio) (print far) (print odd) (print yes) @@ -63,7 +65,7 @@ (print some) (print none) (print wide) (print deep) (print dot) (print empty) (print row) (print words) (print nums) (print live) (print dead) (print nowhere) - (print un) (print anything) (print pair) + (print un) (print anything) (print pair) (set nowhere nowhere) (println "") (error (Boom {.why 3})) 0)