diff options
author | Niklas Hallqvist <niklas@cvs.openbsd.org> | 1999-05-31 21:21:32 +0000 |
---|---|---|
committer | Niklas Hallqvist <niklas@cvs.openbsd.org> | 1999-05-31 21:21:32 +0000 |
commit | 0ca1a3e102af657b7471370f3cac666106b2b430 (patch) | |
tree | b4edcd4521d5e8a2d4ccb1ad0d05080b4d750bb9 /gnu/egcs | |
parent | c1b6dd453998806456231eb0dd0a8d9dc59b71da (diff) |
Add back lost .gdbinit
Diffstat (limited to 'gnu/egcs')
-rw-r--r-- | gnu/egcs/gcc/.gdbinit | 102 |
1 files changed, 102 insertions, 0 deletions
diff --git a/gnu/egcs/gcc/.gdbinit b/gnu/egcs/gcc/.gdbinit new file mode 100644 index 00000000000..ccc3ad8787f --- /dev/null +++ b/gnu/egcs/gcc/.gdbinit @@ -0,0 +1,102 @@ +define pr +set debug_rtx ($) +end + +document pr +Print the full structure of the rtx that is $. +Works only when an inferior is executing. +end + +define prl +set debug_rtx_list ($, debug_rtx_count) +end + +document prl +Print the full structure of all rtx insns beginning at $. +Works only when an inferior is executing. +Uses variable debug_rtx_count to control number of insns printed: + debug_rtx_count > 0: print from $ on. + debug_rtx_count < 0: print a window around $. + +There is also debug_rtx_find (rtx, uid) that will scan a list for UID and print +it using debug_rtx_list. Usage example: set $foo=debug_rtx_find(first, 42) +end + +define pt +set debug_tree ($) +end + +document pt +Print the full structure of the tree that is $. +Works only when an inferior is executing. +end + +define ptc +output (enum tree_code) $.common.code +echo \n +end + +document ptc +Print the tree-code of the tree node that is $. +end + +define pdn +output $.decl.name->identifier.pointer +echo \n +end + +document pdn +Print the name of the decl-node that is $. +end + +define ptn +output $.type.name->decl.name->identifier.pointer +echo \n +end + +document ptn +Print the name of the type-node that is $. +end + +define prc +output (enum rtx_code) $.code +echo \ ( +output $.mode +echo )\n +end + +document prc +Print the rtx-code and machine mode of the rtx that is $. +end + +define pi +print $.fld[0].rtx@7 +end + +document pi +Print the fields of an instruction that is $. +end + +define pbs +set print_binding_stack () +end + +document pbs +In cc1plus, print the current binding stack, frame by frame, up to and +including the global binding level. +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 + +# 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 abort |