1*ef5ccd6cSJohn Marinoecho Setting up the environment for debugging gdb.\n 2*ef5ccd6cSJohn Marino 3*ef5ccd6cSJohn Marinoif !$gdb_init_done 4*ef5ccd6cSJohn Marino set variable $gdb_init_done = 1 5*ef5ccd6cSJohn Marino 6*ef5ccd6cSJohn Marino set complaints 1 7*ef5ccd6cSJohn Marino 8*ef5ccd6cSJohn Marino b internal_error 9*ef5ccd6cSJohn Marino 10*ef5ccd6cSJohn Marino b info_command 11*ef5ccd6cSJohn Marino commands 12*ef5ccd6cSJohn Marino silent 13*ef5ccd6cSJohn Marino return 14*ef5ccd6cSJohn Marino end 15*ef5ccd6cSJohn Marino 16*ef5ccd6cSJohn Marino dir @srcdir@/../libiberty 17*ef5ccd6cSJohn Marino dir @srcdir@/../bfd 18*ef5ccd6cSJohn Marino dir @srcdir@ 19*ef5ccd6cSJohn Marino dir . 20*ef5ccd6cSJohn Marino 21*ef5ccd6cSJohn Marino # Commands below are not fully compatible with wrapping into an 'if' block. 22*ef5ccd6cSJohn Marinoend 23*ef5ccd6cSJohn Marino 24*ef5ccd6cSJohn Marinoset prompt (top-gdb) 25*ef5ccd6cSJohn Marino 26*ef5ccd6cSJohn Marinodefine pdie 27*ef5ccd6cSJohn Marino if $argc == 1 28*ef5ccd6cSJohn Marino call dump_die ($arg0, 1) 29*ef5ccd6cSJohn Marino else 30*ef5ccd6cSJohn Marino if $argc == 2 31*ef5ccd6cSJohn Marino call dump_die ($arg0, $arg1) 32*ef5ccd6cSJohn Marino else 33*ef5ccd6cSJohn Marino printf "Syntax: pdie die [depth]\n" 34*ef5ccd6cSJohn Marino end 35*ef5ccd6cSJohn Marino end 36*ef5ccd6cSJohn Marinoend 37*ef5ccd6cSJohn Marino 38*ef5ccd6cSJohn Marinodocument pdie 39*ef5ccd6cSJohn MarinoPretty print a DWARF DIE. 40*ef5ccd6cSJohn MarinoSyntax: pdie die [depth] 41*ef5ccd6cSJohn Marinoend 42