(print_node): Print the chain of a STRING_CST.

From-SVN: r3799

diff --git a/gcc/print-tree.c b/gcc/print-tree.c
index 9b3881883b43943aea73a3a3d8db15e92952242f..cb8df0c6b49768bc63e3b5292096e86df3acf6bb 100644 (file)
--- a/gcc/print-tree.c
+++ b/gcc/print-tree.c
@@ -586,6 +586,11 @@ print_node (file, prefix, node, indent)
 
        case STRING_CST:
          fprintf (file, " \"%s\"", TREE_STRING_POINTER (node));
+         /* Print the chain at second level.  */
+         if (indent == 4)
+           print_node (file, "chain", TREE_CHAIN (node), indent + 4);
+         else
+           print_node_brief (file, "chain", TREE_CHAIN (node), indent + 4);
          break;
 
        case IDENTIFIER_NODE: