diff options
| author | Peter Schauer <Peter.Schauer@mytum.de> | 1994-02-19 11:26:47 +0000 |
|---|---|---|
| committer | Peter Schauer <Peter.Schauer@mytum.de> | 1994-02-19 11:26:47 +0000 |
| commit | 084475102bfbccb6380363d6613965ef48e3c644 (patch) | |
| tree | aa3fe4d6b0b4cbdc5a72dc08fd8e3fccefe95dff /gdb | |
| parent | 847d9775304e0c338098147e303c7e3d9e5d6827 (diff) | |
| download | gdb-084475102bfbccb6380363d6613965ef48e3c644.zip gdb-084475102bfbccb6380363d6613965ef48e3c644.tar.gz gdb-084475102bfbccb6380363d6613965ef48e3c644.tar.bz2 | |
* config/mips/tm-mips.h (FIX_CALL_DUMMY): For big endian targets,
error() on TYPE_CODE_FLT arguments whose size is greater than 8,
swap all other TYPE_CODE_FLT arguments as mips_push_arguments
ensures that floats are promoted to doubles before they are pushed
on the stack.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/config/mips/tm-mips.h | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/gdb/config/mips/tm-mips.h b/gdb/config/mips/tm-mips.h index 1c0b790..a0d0c89 100644 --- a/gdb/config/mips/tm-mips.h +++ b/gdb/config/mips/tm-mips.h @@ -345,8 +345,9 @@ extern int in_sigtramp PARAMS ((CORE_ADDR, char *)); into a call sequence of the above form stored at DUMMYNAME. */ #if TARGET_BYTE_ORDER == BIG_ENDIAN && ! defined (GDB_TARGET_IS_MIPS64) -/* For big endian mips machines the loading of FP values depends on whether - they are single or double precision. */ +/* For big endian mips machines we need to switch the order of the + words with a floating-point value (it was already coerced to a double + by mips_push_arguments). */ #define FIX_CALL_DUMMY(dummyname, start_sp, fun, nargs, args, rettype, gcc_p) \ do { \ ((int*)(dummyname))[11] |= ((unsigned long)(fun)) >> 16; \ @@ -356,14 +357,16 @@ extern int in_sigtramp PARAMS ((CORE_ADDR, char *)); ((int *) (dummyname))[5] = 0; ((int *) (dummyname))[6] = 0; \ } else { \ if (nargs > 0 && \ - TYPE_CODE(VALUE_TYPE(args[0])) == TYPE_CODE_FLT && \ - TYPE_LENGTH(VALUE_TYPE(args[0])) == 8) { \ + TYPE_CODE(VALUE_TYPE(args[0])) == TYPE_CODE_FLT) { \ + if (TYPE_LENGTH(VALUE_TYPE(args[0])) > 8) \ + error ("Can't pass floating point value of more than 8 bytes to a function"); \ ((int *) (dummyname))[3] = MK_OP(OP_LDFPR,SP_REGNUM,12,4); \ ((int *) (dummyname))[4] = MK_OP(OP_LDFPR,SP_REGNUM,13,0); \ } \ if (nargs > 1 && \ - TYPE_CODE(VALUE_TYPE(args[1])) == TYPE_CODE_FLT && \ - TYPE_LENGTH(VALUE_TYPE(args[1])) == 8) { \ + TYPE_CODE(VALUE_TYPE(args[1])) == TYPE_CODE_FLT) { \ + if (TYPE_LENGTH(VALUE_TYPE(args[1])) > 8) \ + error ("Can't pass floating point value of more than 8 bytes to a function"); \ ((int *) (dummyname))[5] = MK_OP(OP_LDFPR,SP_REGNUM,14,12); \ ((int *) (dummyname))[6] = MK_OP(OP_LDFPR,SP_REGNUM,15,8); \ } \ |