From 0195650243cf9396ca96a9ae201c5e0d4aee165e Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Sat, 15 Nov 2025 21:33:25 +1300
Subject: GNAT bug workaround

---
 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 b34f255..c42b2c8 100644
--- a/test/pprint.adb
+++ b/test/pprint.adb
@@ -33,7 +33,7 @@ procedure PPrint is
     Term_One   : constant Term := T (+"Hello");
     Term_Two   : constant Term := T (T (+"One") & T (+"Two") & T (+"Three"));
     Term_Three : constant Term := T (Term_One & Term_Two & T (+"World"));
-    Term_Four  : constant Term := T (Null_Term & Null_Term);
+    Term_Four  : constant Term := T (Empty_Term & Empty_Term);
     Term_Five  : constant Term := T (T (+"Goodbye"), T (+"World"));
 
 begin
-- 
cgit