diff options
| author | Jedidiah Barber <contact@jedbarber.id.au> | 2025-11-15 21:33:25 +1300 |
|---|---|---|
| committer | Jedidiah Barber <contact@jedbarber.id.au> | 2025-11-15 21:33:25 +1300 |
| commit | 0195650243cf9396ca96a9ae201c5e0d4aee165e (patch) | |
| tree | 7425608843f5d711fcca73a30a3c4caaa1e6bdee /test/pprint.adb | |
| parent | 69514149fb1ddc17be744a883806e8bc3c8ebb7a (diff) | |
GNAT bug workaround
Diffstat (limited to 'test/pprint.adb')
| -rw-r--r-- | test/pprint.adb | 2 |
1 files changed, 1 insertions, 1 deletions
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 |