diff options
| author | Mark Kettenis <kettenis@gnu.org> | 2002-07-08 20:53:45 +0000 |
|---|---|---|
| committer | Mark Kettenis <kettenis@gnu.org> | 2002-07-08 20:53:45 +0000 |
| commit | 55f432330f921c5ebc05615843fdfec5c1e0167e (patch) | |
| tree | 91a521609bee1b19e9adc7e38ce73c9f11523883 /gdb | |
| parent | e3fd1d51f897009a05a8008b7417f5050e6dc3f7 (diff) | |
| download | gdb-55f432330f921c5ebc05615843fdfec5c1e0167e.tar.gz | |
* dwarf2cfi.c: Include "gcore.h".
(execute_stack_op): Fix implementation of the
DW_OP_deref and DW_OP_deref_size operators by letting do their
lookup in the target.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/ChangeLog | 7 | ||||
| -rw-r--r-- | gdb/dwarf2cfi.c | 32 |
2 files changed, 18 insertions, 21 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 2515ed1948c..eb6b039fc22 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,10 @@ +2002-07-08 Mark Kettenis <kettenis@gnu.org> + + * dwarf2cfi.c: Include "gcore.h". + (execute_stack_op): Fix implementation of the + DW_OP_deref and DW_OP_deref_size operators by letting do their + lookup in the target. + 2002-07-07 Mark Kettenis <kettenis@gnu.org> From Peter Schauer <Peter.Schauer@regent.e-technik.tu-muenchen.de>: diff --git a/gdb/dwarf2cfi.c b/gdb/dwarf2cfi.c index 7302b45bcdd..8d9567f4af7 100644 --- a/gdb/dwarf2cfi.c +++ b/gdb/dwarf2cfi.c @@ -21,6 +21,7 @@ Boston, MA 02111-1307, USA. */ #include "defs.h" +#include "gdbcore.h" #include "symtab.h" #include "symfile.h" #include "objfiles.h" @@ -1119,32 +1120,21 @@ execute_stack_op (struct objfile *objfile, { case DW_OP_deref: { - char *ptr = (char *) result; - result = read_pointer (objfile->obfd, &ptr); + int len = TARGET_ADDR_BIT / TARGET_CHAR_BIT; + if (len != 4 && len != 8) + internal_error (__FILE__, __LINE__, + "execute_stack_op error"); + result = read_memory_unsigned_integer (result, len); } break; case DW_OP_deref_size: { - char *ptr = (char *) result; - switch (*op_ptr++) - { - case 1: - result = read_1u (objfile->obfd, &ptr); - break; - case 2: - result = read_2u (objfile->obfd, &ptr); - break; - case 4: - result = read_4u (objfile->obfd, &ptr); - break; - case 8: - result = read_8u (objfile->obfd, &ptr); - break; - default: - internal_error (__FILE__, __LINE__, - "execute_stack_op error"); - } + int len = *op_ptr++; + if (len != 1 && len != 2 && len != 4 && len !=8) + internal_error (__FILE__, __LINE__, + "execute_stack_op error"); + result = read_memory_unsigned_integer (result, len); } break; |