* .gdbinit: Add list-objfiles command.

diff --git a/gdb/.gdbinit b/gdb/.gdbinit
index f60802e50093650d65d2377048f0eca9121fc528..2140f7f384e7c5f5b4ebb9cb56d58d2680e2d352 100644 (file)
--- a/gdb/.gdbinit
+++ b/gdb/.gdbinit
@@ -14,3 +14,13 @@ dir ../mmalloc
 dir ../libiberty
 dir ../bfd
 set prompt (top-gdb) 
+
+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