* dwarf2loc.c (read_pieced_value) <DWARF_VALUE_STACK>: Correctly
handle big-endian values. (dwarf2_evaluate_loc_desc) <DWARF_VALUE_STACK>: Likewise.
This commit is contained in:
parent
a431bc2e60
commit
05566b3b85
|
@ -1,3 +1,9 @@
|
||||||
|
2010-02-23 Tom Tromey <tromey@redhat.com>
|
||||||
|
|
||||||
|
* dwarf2loc.c (read_pieced_value) <DWARF_VALUE_STACK>: Correctly
|
||||||
|
handle big-endian values.
|
||||||
|
(dwarf2_evaluate_loc_desc) <DWARF_VALUE_STACK>: Likewise.
|
||||||
|
|
||||||
2010-02-22 Pedro Alves <pedro@codesourcery.com>
|
2010-02-22 Pedro Alves <pedro@codesourcery.com>
|
||||||
|
|
||||||
PR9605
|
PR9605
|
||||||
|
|
|
@ -298,16 +298,14 @@ read_pieced_value (struct value *v)
|
||||||
|
|
||||||
case DWARF_VALUE_STACK:
|
case DWARF_VALUE_STACK:
|
||||||
{
|
{
|
||||||
gdb_byte bytes[sizeof (ULONGEST)];
|
|
||||||
size_t n;
|
size_t n;
|
||||||
int addr_size = gdbarch_addr_bit (c->arch) / 8;
|
int addr_size = gdbarch_addr_bit (c->arch) / 8;
|
||||||
store_unsigned_integer (bytes, addr_size,
|
|
||||||
gdbarch_byte_order (c->arch),
|
|
||||||
p->v.expr.value);
|
|
||||||
n = p->size;
|
n = p->size;
|
||||||
if (n > addr_size)
|
if (n > addr_size)
|
||||||
n = addr_size;
|
n = addr_size;
|
||||||
memcpy (contents + offset, bytes, n);
|
store_unsigned_integer (contents + offset, n,
|
||||||
|
gdbarch_byte_order (c->arch),
|
||||||
|
p->v.expr.value);
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
|
@ -476,19 +474,17 @@ dwarf2_evaluate_loc_desc (struct symbol *var, struct frame_info *frame,
|
||||||
|
|
||||||
case DWARF_VALUE_STACK:
|
case DWARF_VALUE_STACK:
|
||||||
{
|
{
|
||||||
gdb_byte bytes[sizeof (ULONGEST)];
|
|
||||||
ULONGEST value = (ULONGEST) dwarf_expr_fetch (ctx, 0);
|
ULONGEST value = (ULONGEST) dwarf_expr_fetch (ctx, 0);
|
||||||
bfd_byte *contents;
|
bfd_byte *contents;
|
||||||
size_t n = ctx->addr_size;
|
size_t n = ctx->addr_size;
|
||||||
|
|
||||||
store_unsigned_integer (bytes, ctx->addr_size,
|
|
||||||
gdbarch_byte_order (ctx->gdbarch),
|
|
||||||
value);
|
|
||||||
retval = allocate_value (SYMBOL_TYPE (var));
|
retval = allocate_value (SYMBOL_TYPE (var));
|
||||||
contents = value_contents_raw (retval);
|
contents = value_contents_raw (retval);
|
||||||
if (n > TYPE_LENGTH (SYMBOL_TYPE (var)))
|
if (n > TYPE_LENGTH (SYMBOL_TYPE (var)))
|
||||||
n = TYPE_LENGTH (SYMBOL_TYPE (var));
|
n = TYPE_LENGTH (SYMBOL_TYPE (var));
|
||||||
memcpy (contents, bytes, n);
|
store_unsigned_integer (contents, n,
|
||||||
|
gdbarch_byte_order (ctx->gdbarch),
|
||||||
|
value);
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue