old-cross-binutils/gdb/gdbinit.in
Doug Evans d97bc12be0 * dwarf2read.c (dwarf2_die_debug): New static global.
(dump_die_shallow): Renamed from dump_die, New args f, indent.
	Print to specified file, indented by the specified amount.
	(dump_die_for_error): New fn.  Point all existing callers of
	dump_die here.
	(dump_die_die_1,dump_die): New fns, replaces ...
	(dump_die_list): ... deleted.
	(read_die_and_children_1): Old contents of read_die_and_children
	moved here.
	(read_die_and_children): Rewrite.
	(read_die_and_siblings): Call read_die_and_children_1 instead of
	read_die_and_children.
	(_initialize_dwarf2_read): New option "debug dwarf2-die".
	* gdbinit.in (pdie): New macro.

	* doc/gdb.texinfo (set debug dwarf2-die): Document it.
2008-10-06 22:23:18 +00:00

34 lines
479 B
Text

echo Setting up the environment for debugging gdb.\n
set complaints 1
b internal_error
b info_command
commands
silent
return
end
dir @srcdir@/../libiberty
dir @srcdir@/../bfd
dir @srcdir@
dir .
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