From 203222f4ffbdaf23a30ab390a7ad765cfef0c008 Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Sun, 16 Nov 2025 20:09:18 +1300
Subject: Variable counting handled properly on a per-State basis

---
 test/pprint.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'test/pprint.adb')

diff --git a/test/pprint.adb b/test/pprint.adb
index c42b2c8..2003238 100644
--- a/test/pprint.adb
+++ b/test/pprint.adb
@@ -50,7 +50,7 @@ begin
 
     TIO.New_Line;
 
-    TIO.Put_Line (Image (Empty_World));
+    TIO.Put_Line (Image_Constant (Empty_World));
 
 end PPrint;
 
-- 
cgit