1999-04-16 03:35:26 +02:00
|
|
|
echo Setting up the environment for debugging gdb.\n
|
|
|
|
|
2013-02-15 21:28:24 +01:00
|
|
|
if !$gdb_init_done
|
|
|
|
set variable $gdb_init_done = 1
|
1999-04-16 03:35:26 +02:00
|
|
|
|
2013-02-15 21:28:24 +01:00
|
|
|
set complaints 1
|
1999-04-16 03:35:26 +02:00
|
|
|
|
2013-02-15 21:28:24 +01:00
|
|
|
b internal_error
|
|
|
|
|
|
|
|
dir @srcdir@/../libiberty
|
|
|
|
dir @srcdir@/../bfd
|
|
|
|
dir @srcdir@
|
|
|
|
dir .
|
|
|
|
|
|
|
|
# Commands below are not fully compatible with wrapping into an 'if' block.
|
1999-04-16 03:35:26 +02:00
|
|
|
end
|
|
|
|
|
|
|
|
set prompt (top-gdb)
|
2008-10-07 00:23:18 +02:00
|
|
|
|
|
|
|
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
|