[COMMITTED] algol68: print NSYMBOL for defining operators and bold tags in a68_dump_parse_tree

Jose E. Marchesi jemarch@gnu.org
Tue Apr 22 00:23:01 GMT 2025


---
 gcc/algol68/a68-parser-debug.cc | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gcc/algol68/a68-parser-debug.cc b/gcc/algol68/a68-parser-debug.cc
index be7c7cdc109..fb862407d2d 100644
--- a/gcc/algol68/a68-parser-debug.cc
+++ b/gcc/algol68/a68-parser-debug.cc
@@ -41,7 +41,9 @@ a68_dump_parse_tree_1 (NODE_T *p, int level)
 	      a68_attribute_name (ATTRIBUTE (p)));
 
       if (ATTRIBUTE (p) == IDENTIFIER
-	  || ATTRIBUTE (p) == DEFINING_IDENTIFIER)
+	  || ATTRIBUTE (p) == DEFINING_IDENTIFIER
+	  || ATTRIBUTE (p) == DEFINING_OPERATOR
+	  || ATTRIBUTE (p) == BOLD_TAG)
 	printf (" %s", NSYMBOL (p));
 
       if (MOID (p) != NO_MOID)
-- 
2.30.2



More information about the Algol68 mailing list