Commit | Line | Data |
---|---|---|
c906108c SS |
1 | echo Setting up the environment for debugging gdb.\n |
2 | ||
edceb2a9 JK |
3 | if !$gdb_init_done |
4 | set variable $gdb_init_done = 1 | |
c906108c | 5 | |
edceb2a9 | 6 | set complaints 1 |
c906108c | 7 | |
edceb2a9 JK |
8 | b internal_error |
9 | ||
edceb2a9 JK |
10 | dir @srcdir@/../libiberty |
11 | dir @srcdir@/../bfd | |
12 | dir @srcdir@ | |
13 | dir . | |
14 | ||
15 | # Commands below are not fully compatible with wrapping into an 'if' block. | |
c906108c SS |
16 | end |
17 | ||
c906108c | 18 | set prompt (top-gdb) |
d97bc12b DE |
19 | |
20 | define pdie | |
21 | if $argc == 1 | |
22 | call dump_die ($arg0, 1) | |
23 | else | |
24 | if $argc == 2 | |
25 | call dump_die ($arg0, $arg1) | |
26 | else | |
27 | printf "Syntax: pdie die [depth]\n" | |
28 | end | |
29 | end | |
30 | end | |
31 | ||
32 | document pdie | |
33 | Pretty print a DWARF DIE. | |
34 | Syntax: pdie die [depth] | |
35 | end |