Daily bump.

[pf3gnuchains/gcc-fork.git] / gcc / gdbinit.in

diff --git a/gcc/gdbinit.in b/gcc/gdbinit.in
index ccc3ad8..d1ae46d 100644 (file)
--- a/gcc/gdbinit.in
+++ b/gcc/gdbinit.in
@@ -1,3 +1,22 @@
+# Copyright (C) 2001, 2002, 2003, 2004, 2006,
+# 2008, 2010 Free Software Foundation, Inc.
+#
+# This file is part of GCC.
+#
+# GCC is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3, or (at your option)
+# any later version.
+#
+# GCC is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with GCC; see the file COPYING3.  If not see
+# <http://www.gnu.org/licenses/>.
+
 define pr
 set debug_rtx ($)
 end
@@ -31,6 +50,51 @@ Print the full structure of the tree that is $.
 Works only when an inferior is executing.
 end
 
+define pct
+set debug_c_tree ($)
+end
+
+document pct
+Print the tree that is $ in C syntax.
+Works only when an inferior is executing.
+end
+
+define pgg
+set debug_gimple_stmt ($)
+end
+
+document pgg
+Print the Gimple statement that is $ in C syntax.
+Works only when an inferior is executing.
+end
+
+define pgq
+set debug_gimple_seq ($)
+end
+
+document pgq
+Print the Gimple sequence that is $ in C syntax.
+Works only when an inferior is executing.
+end
+
+define pgs
+set debug_generic_stmt ($)
+end
+
+document pgs
+Print the statement that is $ in C syntax.
+Works only when an inferior is executing.
+end
+
+define pge
+set debug_generic_expr ($)
+end
+
+document pge
+Print the expression that is $ in C syntax.
+Works only when an inferior is executing.
+end
+
 define ptc
 output (enum tree_code) $.common.code
 echo \n
@@ -41,7 +105,7 @@ Print the tree-code of the tree node that is $.
 end
 
 define pdn
-output $.decl.name->identifier.pointer
+output $.decl_minimal.name->identifier.id.str
 echo \n
 end
 
@@ -50,7 +114,7 @@ Print the name of the decl-node that is $.
 end
 
 define ptn
-output $.type.name->decl.name->identifier.pointer
+output $.type.name->decl_minimal.name->identifier.id.str
 echo \n
 end
 
@@ -58,6 +122,22 @@ document ptn
 Print the name of the type-node that is $.
 end
 
+define pvt
+set debug_vec_tree ($)
+end
+
+document pvt
+Print the VEC(tree) that is in $.
+end
+
+define pdd
+set debug_dwarf_die ($)
+end
+
+document pdd
+Print the dw_die_ref that is in $.
+end
+
 define prc
 output (enum rtx_code) $.code
 echo \ (
@@ -70,7 +150,7 @@ Print the rtx-code and machine mode of the rtx that is $.
 end
 
 define pi
-print $.fld[0].rtx@7
+print $.u.fld[0].rt_rtx@7
 end
 
 document pi
@@ -86,17 +166,33 @@ In cc1plus, print the current binding stack, frame by frame, up to and
 including the global binding level.
 end
 
+define pbb
+set dump_bb ($, stderr, 0)
+end
+
+document pbb
+Dump the basic block that is in $, including rtx.
+end
+
+define pbm
+set bitmap_print (stderr, $, "", "\n")
+end
+
+document pbm
+Dump the bitmap that is in $ as a comma-separated list of numbers.
+end
+
 # Put breakpoints at exit and fancy_abort in case abort is mapped
 # to either fprintf/exit or fancy_abort.
-b exit
 b fancy_abort
 
-# Make gdb complain about symbol reading errors.  This is so that gcc
-# developers can see and fix bugs in gcc debug output.
-set complaints 20
+# Put a breakpoint on internal_error to help with debugging ICEs.
+b internal_error
 
+set complaints 0
 # Don't let abort actually run, as it will make
 # stdio stop working and therefore the `pr' command above as well.
 # Put this last because gcc does not reference it any more unless
 # USE_SYSTEM_ABORT is defined, so gdb may complain and bail out.
+b exit
 b abort