binutils-gdb/gdb/gdb-gdb.gdb.in

45 lines
776 B
Plaintext
Raw Normal View History

echo Setting up the environment for debugging gdb.\n
if !$gdb_init_done
set variable $gdb_init_done = 1
set complaints 1
b internal_error
# This provides an easy way to break into the top-level GDB by
# typing "info".
b info_command
commands
silent
# This avoids the voluminous output of "info".
return
end
dir @srcdir@/../libiberty
dir @srcdir@/../bfd
dir @srcdir@
dir .
# Commands below are not fully compatible with wrapping into an 'if' block.
end
set prompt (top-gdb)
define pdie
if $argc == 1
call dump_die ($arg0, 1)
else
if $argc == 2
call dump_die ($arg0, $arg1)
else
printf "Syntax: pdie die [depth]\n"
end
end
end
document pdie
Pretty print a DWARF DIE.
Syntax: pdie die [depth]
end