c-lang.c (lang_print_xnode): New function.

	* c-lang.c (lang_print_xnode): New function.
	* objc/objc-act.c (lang_print_xnode): Likewise.
	* print-tree.c (print_node): Call it
	* com.c (lang_print_xnode): New function.

From-SVN: r18789

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 32846c4..896f0be 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+1998-03-24  Martin von Loewis  <loewis@informatik.hu-berlin.de>
+
+       * c-lang.c (lang_print_xnode): New function.
+       * objc/objc-act.c (lang_print_xnode): Likewise.
+       * print-tree.c (print_node): Call it
+
 Mon Mar 23 23:59:11 1998  H.J. Lu  (hjl@gnu.org)
 
        * c-parse.in: Recognize protocol qualifiers in class

diff --git a/gcc/c-lang.c b/gcc/c-lang.c
index 4b4a684..326b97f 100644 (file)
--- a/gcc/c-lang.c
+++ b/gcc/c-lang.c
@@ -61,6 +61,16 @@ print_lang_statistics ()
 {
 }
 
+/* used by print-tree.c */
+
+void
+lang_print_xnode (file, node, indent)
+     FILE *file;
+     tree node;
+     int indent;
+{
+}
+
 /* Used by c-lex.c, but only for objc.  */
 
 tree

diff --git a/gcc/f/ChangeLog.egcs b/gcc/f/ChangeLog.egcs
index f39a6f7..ead0d0d 100644 (file)
--- a/gcc/f/ChangeLog.egcs
+++ b/gcc/f/ChangeLog.egcs
@@ -1,3 +1,7 @@
+1998-03-24  Martin von Loewis  <loewis@informatik.hu-berlin.de>
+
+       * com.c (lang_print_xnode): New function.
+
 Sun Mar 22 00:50:42 1998  Nick Clifton  <nickc@cygnus.com>
                           Geoff Noer    <noer@cygnus.com>
 

diff --git a/gcc/f/com.c b/gcc/f/com.c
index 0f895a9..5e5d4ef 100644 (file)
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -14842,6 +14842,16 @@ lang_decode_option (p)
   return ffe_decode_option (p);
 }
 
+/* used by print-tree.c */
+
+void
+lang_print_xnode (file, node, indent)
+     FILE *file UNUSED;
+     tree node UNUSED;
+     int indent UNUSED;
+{
+}
+
 void
 lang_finish ()
 {

diff --git a/gcc/objc/objc-act.c b/gcc/objc/objc-act.c
index f997ecb..1f755c8 100644 (file)
--- a/gcc/objc/objc-act.c
+++ b/gcc/objc/objc-act.c
@@ -694,6 +694,17 @@ lang_decode_option (p)
 
   return 1;
 }
+
+/* used by print-tree.c */
+
+void
+lang_print_xnode (file, node, indent)
+     FILE *file;
+     tree node;
+     int indent;
+{
+}
+
 \f
 static tree
 define_decl (declarator, declspecs)

diff --git a/gcc/print-tree.c b/gcc/print-tree.c
index 3d43d18..7f37e82 100644 (file)
--- a/gcc/print-tree.c
+++ b/gcc/print-tree.c
@@ -672,6 +672,8 @@ print_node (file, prefix, node, indent)
          break;
 
        default:
+         if (TREE_CODE_CLASS (TREE_CODE (node)) == 'x')
+           lang_print_xnode (file, node, indent);
          break;
        }