diff options
author | Stan Shebs <shebs@codesourcery.com> | 1999-04-16 01:34:07 +0000 |
---|---|---|
committer | Stan Shebs <shebs@codesourcery.com> | 1999-04-16 01:34:07 +0000 |
commit | 071ea11e85eb9d529cc5eb3d35f6247466a21b99 (patch) | |
tree | 5deda65b8d7b04d1f4cbc534c3206d328e1267ec /gdb/gdb.gdb | |
parent | 1730ec6b1848f0f32154277f788fb29f88d8475b (diff) | |
download | gdb-071ea11e85eb9d529cc5eb3d35f6247466a21b99.zip gdb-071ea11e85eb9d529cc5eb3d35f6247466a21b99.tar.gz gdb-071ea11e85eb9d529cc5eb3d35f6247466a21b99.tar.bz2 |
Initial creation of sourceware repository
Diffstat (limited to 'gdb/gdb.gdb')
-rw-r--r-- | gdb/gdb.gdb | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/gdb/gdb.gdb b/gdb/gdb.gdb deleted file mode 100644 index 4377841..0000000 --- a/gdb/gdb.gdb +++ /dev/null @@ -1,35 +0,0 @@ -# Examples of using gdb's command language to print out various gdb data -# structures. - -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 -document list-objfiles -Print a table of the current objfiles. -end - -define print-values - printf "Location Offset Size Lazy Contents0-3 Lval\n" - set $val = $arg0 - while $val != 0 - printf "%8x %6d %10d %4d %12x ", $val->location.address, \ - $val->offset, \ - $val->type->length, $val->lazy, $val->aligner.contents[0] - output $val->lval - printf "\n" - set $val = $val->next - end -end -document print-values -Print a list of values. -Takes one argument, the value to print, and prints all the values which -are chained through the next field. Thus the most recently created values -will be listed first. The "Contents0-3" field gives the first "int" -of the VALUE_CONTENTS; not the entire contents. -end |