1991-03-28 16:28:29 +00:00
|
|
|
echo Setting up the environment for debugging gdb.\n
|
|
|
|
|
|
1991-09-20 19:26:09 +00:00
|
|
|
set complaints 1
|
|
|
|
|
|
1991-03-28 16:28:29 +00:00
|
|
|
b fatal
|
|
|
|
|
|
|
|
|
|
b info_command
|
|
|
|
|
commands
|
|
|
|
|
silent
|
|
|
|
|
return
|
|
|
|
|
end
|
|
|
|
|
|
1992-03-15 01:13:26 +00:00
|
|
|
dir ../mmalloc
|
|
|
|
|
dir ../libiberty
|
|
|
|
|
dir ../bfd
|
1994-03-26 15:15:00 +00:00
|
|
|
set prompt (top-gdb)
|
1994-09-21 03:23:28 +00:00
|
|
|
|
1994-10-13 20:36:04 +00:00
|
|
|
# This only works with recent (post-4.13) GDB's, but there is no way to
|
|
|
|
|
# tell what version we are. So leave it commented out for now.
|
|
|
|
|
#define list-objfiles
|
|
|
|
|
# set $obj = object_files
|
|
|
|
|
# printf "objfile bfd msyms name\n"
|
|
|
|
|
# while $obj != 0
|
|
|
|
|
# printf "0x%-8x 0x%-8x %6d %s\n", $obj, $obj->obfd, \
|
|
|
|
|
# $obj->minimal_symbol_count, $obj->name
|
|
|
|
|
# set var $obj = $obj->next
|
|
|
|
|
# end
|
|
|
|
|
#end
|
