OSDN Git Service

* ipa-struct-reorg.c (update_cgraph_with_malloc_call): Fix profile
[pf3gnuchains/gcc-fork.git] / gcc / gimple-pretty-print.c
index 70ab4e1..4f6c447 100644 (file)
@@ -254,6 +254,7 @@ dump_unary_rhs (pretty_printer *buffer, gimple gs, int spc, int flags)
       break;
 
     case FIXED_CONVERT_EXPR:
+    case ADDR_SPACE_CONVERT_EXPR:
     case FIX_TRUNC_EXPR:
     case FLOAT_EXPR:
     CASE_CONVERT:
@@ -626,6 +627,8 @@ dump_gimple_label (pretty_printer *buffer, gimple gs, int spc, int flags)
     }
   if (DECL_NONLOCAL (label))
     pp_string (buffer, " [non-local]");
+  if ((flags & TDF_EH) && EH_LANDING_PAD_NR (label))
+    pp_printf (buffer, " [LP %d]", EH_LANDING_PAD_NR (label));
 }
 
 /* Dump a GIMPLE_GOTO tuple on the pretty_printer BUFFER, SPC
@@ -766,6 +769,21 @@ dump_gimple_eh_filter (pretty_printer *buffer, gimple gs, int spc, int flags)
 }
 
 
+/* Dump a GIMPLE_EH_MUST_NOT_THROW tuple.  */
+
+static void
+dump_gimple_eh_must_not_throw (pretty_printer *buffer, gimple gs,
+                              int spc, int flags)
+{
+  if (flags & TDF_RAW)
+    dump_gimple_fmt (buffer, spc, flags, "%G <%T>", gs,
+                    gimple_eh_must_not_throw_fndecl (gs));
+  else
+    dump_gimple_fmt (buffer, spc, flags, "<<<eh_must_not_throw (%T)>>>",
+                    gimple_eh_must_not_throw_fndecl (gs));
+}
+
+
 /* Dump a GIMPLE_RESX tuple on the pretty_printer BUFFER, SPC spaces of
    indent.  FLAGS specifies details to show in the dump (see TDF_* in
    tree-pass.h).  */
@@ -775,11 +793,49 @@ dump_gimple_resx (pretty_printer *buffer, gimple gs, int spc, int flags)
 {
   if (flags & TDF_RAW)
     dump_gimple_fmt (buffer, spc, flags, "%G <%d>", gs,
-                     gimple_resx_region (gs));
+                    gimple_resx_region (gs));
   else
     dump_gimple_fmt (buffer, spc, flags, "resx %d", gimple_resx_region (gs));
 }
 
+/* Dump a GIMPLE_EH_DISPATCH tuple on the pretty_printer BUFFER.  */
+
+static void
+dump_gimple_eh_dispatch (pretty_printer *buffer, gimple gs, int spc, int flags)
+{
+  if (flags & TDF_RAW)
+    dump_gimple_fmt (buffer, spc, flags, "%G <%d>", gs,
+                    gimple_eh_dispatch_region (gs));
+  else
+    dump_gimple_fmt (buffer, spc, flags, "eh_dispatch %d",
+                    gimple_eh_dispatch_region (gs));
+}
+
+/* Dump a GIMPLE_DEBUG tuple on the pretty_printer BUFFER, SPC spaces
+   of indent.  FLAGS specifies details to show in the dump (see TDF_*
+   in tree-pass.h).  */
+
+static void
+dump_gimple_debug (pretty_printer *buffer, gimple gs, int spc, int flags)
+{
+  switch (gs->gsbase.subcode)
+    {
+    case GIMPLE_DEBUG_BIND:
+      if (flags & TDF_RAW)
+       dump_gimple_fmt (buffer, spc, flags, "%G BIND <%T, %T>", gs,
+                        gimple_debug_bind_get_var (gs),
+                        gimple_debug_bind_get_value (gs));
+      else
+       dump_gimple_fmt (buffer, spc, flags, "# DEBUG %T => %T",
+                        gimple_debug_bind_get_var (gs),
+                        gimple_debug_bind_get_value (gs));
+      break;
+
+    default:
+      gcc_unreachable ();
+    }
+}
+
 /* Dump a GIMPLE_OMP_FOR tuple on the pretty_printer BUFFER.  */
 static void
 dump_gimple_omp_for (pretty_printer *buffer, gimple gs, int spc, int flags)
@@ -1046,89 +1102,151 @@ dump_gimple_omp_return (pretty_printer *buffer, gimple gs, int spc, int flags)
 static void
 dump_gimple_asm (pretty_printer *buffer, gimple gs, int spc, int flags)
 {
-  unsigned int i;
+  unsigned int i, n, f, fields;
 
   if (flags & TDF_RAW)
-    dump_gimple_fmt (buffer, spc, flags, "%G <%+STRING <%n%s%n>", gs,
-                     gimple_asm_string (gs));
+    {
+      dump_gimple_fmt (buffer, spc, flags, "%G <%+STRING <%n%s%n>", gs,
+                       gimple_asm_string (gs));
+
+      n = gimple_asm_noutputs (gs);
+      if (n)
+       {
+         newline_and_indent (buffer, spc + 2);
+         pp_string (buffer, "OUTPUT: ");
+         for (i = 0; i < n; i++)
+           {
+             dump_generic_node (buffer, gimple_asm_output_op (gs, i),
+                                spc, flags, false);
+             if (i < n - 1)
+               pp_string (buffer, ", ");
+           }
+       }
+
+      n = gimple_asm_ninputs (gs);
+      if (n)
+       {
+         newline_and_indent (buffer, spc + 2);
+         pp_string (buffer, "INPUT: ");
+         for (i = 0; i < n; i++)
+           {
+             dump_generic_node (buffer, gimple_asm_input_op (gs, i),
+                                spc, flags, false);
+             if (i < n - 1)
+               pp_string (buffer, ", ");
+           }
+       }
+
+      n = gimple_asm_nclobbers (gs);
+      if (n)
+       {
+         newline_and_indent (buffer, spc + 2);
+         pp_string (buffer, "CLOBBER: ");
+         for (i = 0; i < n; i++)
+           {
+             dump_generic_node (buffer, gimple_asm_clobber_op (gs, i),
+                                spc, flags, false);
+             if (i < n - 1)
+               pp_string (buffer, ", ");
+           }
+       }
+
+      n = gimple_asm_nlabels (gs);
+      if (n)
+       {
+         newline_and_indent (buffer, spc + 2);
+         pp_string (buffer, "LABEL: ");
+         for (i = 0; i < n; i++)
+           {
+             dump_generic_node (buffer, gimple_asm_label_op (gs, i),
+                                spc, flags, false);
+             if (i < n - 1)
+               pp_string (buffer, ", ");
+           }
+       }
+
+      newline_and_indent (buffer, spc);
+      pp_character (buffer, '>');
+    }
   else
     {
       pp_string (buffer, "__asm__");
       if (gimple_asm_volatile_p (gs))
        pp_string (buffer, " __volatile__");
+      if (gimple_asm_nlabels (gs))
+       pp_string (buffer, " goto");
       pp_string (buffer, "(\"");
       pp_string (buffer, gimple_asm_string (gs));
       pp_string (buffer, "\"");
-    }
 
-  if (gimple_asm_ninputs (gs)
-     || gimple_asm_noutputs (gs) 
-     || gimple_asm_nclobbers (gs))
-    {
-      if (gimple_asm_noutputs (gs))
-        {
-          if (flags & TDF_RAW)
-            {
-              newline_and_indent (buffer, spc + 2);
-              pp_string (buffer, "OUTPUT: ");
-            }
-          else
-            pp_string (buffer, " : ");
-        }
+      if (gimple_asm_nlabels (gs))
+       fields = 4;
+      else if (gimple_asm_nclobbers (gs))
+       fields = 3;
+      else if (gimple_asm_ninputs (gs))
+       fields = 2;
+      else if (gimple_asm_noutputs (gs))
+       fields = 1;
+      else
+       fields = 0;
 
-      for (i = 0; i < gimple_asm_noutputs (gs); i++)
-        {
-          dump_generic_node (buffer, gimple_asm_output_op (gs, i), spc, flags,
-                             false);
-          if ( i < gimple_asm_noutputs (gs) -1)
-            pp_string (buffer, ", ");
-        }
+      for (f = 0; f < fields; ++f)
+       {
+         pp_string (buffer, " : ");
 
-      if (gimple_asm_ninputs (gs))
-        {
-          if (flags & TDF_RAW)
-            {
-              newline_and_indent (buffer, spc + 2);
-              pp_string (buffer, "INPUT: ");
-            }
-          else
-            pp_string (buffer, " : ");
-        }
+         switch (f)
+           {
+           case 0:
+             n = gimple_asm_noutputs (gs);
+             for (i = 0; i < n; i++)
+               {
+                 dump_generic_node (buffer, gimple_asm_output_op (gs, i),
+                                    spc, flags, false);
+                 if (i < n - 1)
+                   pp_string (buffer, ", ");
+               }
+             break;
 
-      for (i = 0; i < gimple_asm_ninputs (gs); i++)
-        {
-          dump_generic_node (buffer, gimple_asm_input_op (gs, i), spc, flags,
-                             false);
-          if (i < gimple_asm_ninputs (gs) -1)
-            pp_string (buffer, " : ");
-        }
+           case 1:
+             n = gimple_asm_ninputs (gs);
+             for (i = 0; i < n; i++)
+               {
+                 dump_generic_node (buffer, gimple_asm_input_op (gs, i),
+                                    spc, flags, false);
+                 if (i < n - 1)
+                   pp_string (buffer, ", ");
+               }
+             break;
 
-      if (gimple_asm_nclobbers (gs))
-        {
-          if (flags & TDF_RAW)
-            {
-              newline_and_indent (buffer, spc + 2);
-              pp_string (buffer, "CLOBBER: ");
-            }
-          else
-            pp_string (buffer, " : ");
-        }
+           case 2:
+             n = gimple_asm_nclobbers (gs);
+             for (i = 0; i < n; i++)
+               {
+                 dump_generic_node (buffer, gimple_asm_clobber_op (gs, i),
+                                    spc, flags, false);
+                 if (i < n - 1)
+                   pp_string (buffer, ", ");
+               }
+             break;
 
-      for (i = 0; i < gimple_asm_nclobbers (gs); i++)
-        {
-          dump_generic_node (buffer, gimple_asm_clobber_op (gs, i), spc, flags,
-                             false);
-          if ( i < gimple_asm_nclobbers (gs) -1)
-            pp_string (buffer, ", ");
-        }
-    }
-  if (flags & TDF_RAW)
-    {
-      newline_and_indent (buffer, spc);
-      pp_character (buffer, '>');
+           case 3:
+             n = gimple_asm_nlabels (gs);
+             for (i = 0; i < n; i++)
+               {
+                 dump_generic_node (buffer, gimple_asm_label_op (gs, i),
+                                    spc, flags, false);
+                 if (i < n - 1)
+                   pp_string (buffer, ", ");
+               }
+             break;
+
+           default:
+             gcc_unreachable ();
+           }
+       }
+
+      pp_string (buffer, ");");
     }
-  else
-    pp_string (buffer, ");");
 }
 
 
@@ -1402,9 +1520,11 @@ dump_gimple_stmt (pretty_printer *buffer, gimple gs, int spc, int flags)
 
   if (flags & TDF_EH)
     {
-      int eh_region = lookup_stmt_eh_region_fn (cfun, gs);
-      if (eh_region >= 0)
-       pp_printf (buffer, "[EH #%d] ", eh_region);
+      int lp_nr = lookup_stmt_eh_lp (gs);
+      if (lp_nr > 0)
+       pp_printf (buffer, "[LP %d] ", lp_nr);
+      else if (lp_nr < 0)
+       pp_printf (buffer, "[MNT %d] ", -lp_nr);
     }
 
   if ((flags & (TDF_VOPS|TDF_MEMSYMS))
@@ -1520,10 +1640,22 @@ dump_gimple_stmt (pretty_printer *buffer, gimple gs, int spc, int flags)
       dump_gimple_eh_filter (buffer, gs, spc, flags);
       break;
 
+    case GIMPLE_EH_MUST_NOT_THROW:
+      dump_gimple_eh_must_not_throw (buffer, gs, spc, flags);
+      break;
+
     case GIMPLE_RESX:
       dump_gimple_resx (buffer, gs, spc, flags);
       break;
 
+    case GIMPLE_EH_DISPATCH:
+      dump_gimple_eh_dispatch (buffer, gs, spc, flags);
+      break;
+
+    case GIMPLE_DEBUG:
+      dump_gimple_debug (buffer, gs, spc, flags);
+      break;
+
     case GIMPLE_PREDICT:
       pp_string (buffer, "// predicted ");
       if (gimple_predict_outcome (gs))
@@ -1577,7 +1709,8 @@ dump_bb_header (pretty_printer *buffer, basic_block bb, int indent, int flags)
          gimple_stmt_iterator gsi;
 
          for (gsi = gsi_start_bb (bb); !gsi_end_p (gsi); gsi_next (&gsi))
-           if (get_lineno (gsi_stmt (gsi)) != -1)
+           if (!is_gimple_debug (gsi_stmt (gsi))
+               && get_lineno (gsi_stmt (gsi)) != UNKNOWN_LOCATION)
              {
                pp_string (buffer, ", starting at line ");
                pp_decimal_int (buffer, get_lineno (gsi_stmt (gsi)));