re PR middle-end/60147 (ICE with -fdump-tree-original and NAMELIST)

2014-02-28  Tobias Burnus  <burnus@net-b.de>

        PR middle-end/60147
        * tree-pretty-print.c (dump_generic_node, print_declaration):
        Handle NAMELIST_DECL.

From-SVN: r208209

gcc/ChangeLog

+2014-02-28  Tobias Burnus  <burnus@net-b.de>
+
+	PR middle-end/60147
+	* tree-pretty-print.c (dump_generic_node, print_declaration): Handle
+	NAMELIST_DECL.
+
 2014-02-27  H.J. Lu  <hongjiu.lu@intel.com>
 
 	* doc/tm.texi.in (Condition Code Status): Update documention for

gcc/tree-pretty-print.c

@@ -1390,6 +1390,7 @@ dump_generic_node (pretty_printer *buffer, tree node, int spc, int flags,
     case FIELD_DECL:
     case DEBUG_EXPR_DECL:
     case NAMESPACE_DECL:
+    case NAMELIST_DECL:
       dump_decl_name (buffer, node, flags);
       break;
 
@@ -2686,6 +2687,14 @@ print_declaration (pretty_printer *buffer, tree t, int spc, int flags)
 {
   INDENT (spc);
 
+  if (TREE_CODE(t) == NAMELIST_DECL)
+    {
+      pp_string(buffer, "namelist ");
+      dump_decl_name (buffer, t, flags);
+      pp_semicolon (buffer);
+      return;
+    }
+
   if (TREE_CODE (t) == TYPE_DECL)
     pp_string (buffer, "typedef ");