OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

* mips-tdep.c (mips_eabi_push_dummy_call): Place signed, rather 

than unsigned, values in registers.
This commit is contained in:
Kevin Buettner 2010-12-14 21:07:50 +00:00
parent 9b547ce683
commit a8852dc55e
2 changed files with 16 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/ChangeLog
View File

@ -1,3 +1,8 @@
2010-12-14 Kevin Buettner <kevinb@redhat.com>
* mips-tdep.c (mips_eabi_push_dummy_call): Place signed, rather
than unsigned, values in registers.
2010-12-14 Ken Werner <ken.werner@de.ibm.com> 2010-12-14 Ken Werner <ken.werner@de.ibm.com>
* valops.c (value_one): Use get_array_bounds to compute the number * valops.c (value_one): Use get_array_bounds to compute the number

22
gdb/mips-tdep.c
View File

@ -2826,23 +2826,23 @@ mips_eabi_push_dummy_call (struct gdbarch *gdbarch, struct value *function,
{ {
int low_offset = gdbarch_byte_order (gdbarch) int low_offset = gdbarch_byte_order (gdbarch)
== BFD_ENDIAN_BIG ? 4 : 0; == BFD_ENDIAN_BIG ? 4 : 0;
unsigned long regval; long regval;
/* Write the low word of the double to the even register(s). */ /* Write the low word of the double to the even register(s). */
regval = extract_unsigned_integer (val + low_offset, regval = extract_signed_integer (val + low_offset,
4, byte_order); 4, byte_order);
if (mips_debug) if (mips_debug)
fprintf_unfiltered (gdb_stdlog, " - fpreg=%d val=%s", fprintf_unfiltered (gdb_stdlog, " - fpreg=%d val=%s",
float_argreg, phex (regval, 4)); float_argreg, phex (regval, 4));
regcache_cooked_write_unsigned (regcache, float_argreg++, regval); regcache_cooked_write_signed (regcache, float_argreg++, regval);
/* Write the high word of the double to the odd register(s). */ /* Write the high word of the double to the odd register(s). */
regval = extract_unsigned_integer (val + 4 - low_offset, regval = extract_signed_integer (val + 4 - low_offset,
4, byte_order); 4, byte_order);
if (mips_debug) if (mips_debug)
fprintf_unfiltered (gdb_stdlog, " - fpreg=%d val=%s", fprintf_unfiltered (gdb_stdlog, " - fpreg=%d val=%s",
float_argreg, phex (regval, 4)); float_argreg, phex (regval, 4));
regcache_cooked_write_unsigned (regcache, float_argreg++, regval); regcache_cooked_write_signed (regcache, float_argreg++, regval);
} }
else else
{ {
@ -2850,11 +2850,11 @@ mips_eabi_push_dummy_call (struct gdbarch *gdbarch, struct value *function,
in a single register. */ in a single register. */
/* On 32 bit ABI's the float_argreg is further adjusted /* On 32 bit ABI's the float_argreg is further adjusted
above to ensure that it is even register aligned. */ above to ensure that it is even register aligned. */
LONGEST regval = extract_unsigned_integer (val, len, byte_order); LONGEST regval = extract_signed_integer (val, len, byte_order);
if (mips_debug) if (mips_debug)
fprintf_unfiltered (gdb_stdlog, " - fpreg=%d val=%s", fprintf_unfiltered (gdb_stdlog, " - fpreg=%d val=%s",
float_argreg, phex (regval, len)); float_argreg, phex (regval, len));
regcache_cooked_write_unsigned (regcache, float_argreg++, regval); regcache_cooked_write_signed (regcache, float_argreg++, regval);
} }
} }
else else
@ -2937,13 +2937,13 @@ mips_eabi_push_dummy_call (struct gdbarch *gdbarch, struct value *function,
&& !fp_register_arg_p (gdbarch, typecode, arg_type)) && !fp_register_arg_p (gdbarch, typecode, arg_type))
{ {
LONGEST regval = LONGEST regval =
extract_unsigned_integer (val, partial_len, byte_order); extract_signed_integer (val, partial_len, byte_order);
if (mips_debug) if (mips_debug)
fprintf_filtered (gdb_stdlog, " - reg=%d val=%s", fprintf_filtered (gdb_stdlog, " - reg=%d val=%s",
argreg, argreg,
phex (regval, regsize)); phex (regval, regsize));
regcache_cooked_write_unsigned (regcache, argreg, regval); regcache_cooked_write_signed (regcache, argreg, regval);
argreg++; argreg++;
} }