diff options
| author | wilson <wilson@138bc75d-0d04-0410-961f-82ee72b054a4> | 1999-02-10 17:28:24 +0000 |
|---|---|---|
| committer | wilson <wilson@138bc75d-0d04-0410-961f-82ee72b054a4> | 1999-02-10 17:28:24 +0000 |
| commit | eb294a2f2c9c562b10e723e654e4187b5b4aa341 (patch) | |
| tree | 893f28e5cc7f90ccdec4e2184b9e0139d7125f68 /gcc | |
| parent | 0fccd442171e05f4ac28bdab373ccbaefe43031c (diff) | |
| download | gcc-eb294a2f2c9c562b10e723e654e4187b5b4aa341.tar.gz | |
Fix 64b-x-32b cross compiler breakage. Make alpha-x-m32r work again.
* emit-rtl.c (operand_subword): Sign extend REAL_VALUE_TO_TARGET_SINGLE
result.
* final.c (split_double): Sign extend REAL_VALUE_TO_TARGET_DOUBLE
result.
* real.c (endian): Delete sign extension code.
* config/m32r/m32r.md (movsf_insn+1): REAL_VALUE_TO_TARGET_SINGLE call
replaced with operand_subword call.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@25140 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 10 | ||||
| -rw-r--r-- | gcc/config/m32r/m32r.md | 8 | ||||
| -rw-r--r-- | gcc/emit-rtl.c | 12 | ||||
| -rw-r--r-- | gcc/final.c | 16 | ||||
| -rw-r--r-- | gcc/real.c | 17 |
5 files changed, 39 insertions, 24 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 6fd861ea697..5fb1e563d1a 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,13 @@ +Wed Feb 10 17:12:21 1999 Jim Wilson <wilson@cygnus.com> + + * emit-rtl.c (operand_subword): Sign extend REAL_VALUE_TO_TARGET_SINGLE + result. + * final.c (split_double): Sign extend REAL_VALUE_TO_TARGET_DOUBLE + result. + * real.c (endian): Delete sign extension code. + * config/m32r/m32r.md (movsf_insn+1): REAL_VALUE_TO_TARGET_SINGLE call + replaced with operand_subword call. + Wed Feb 10 15:16:39 1999 Richard Henderson <rth@cygnus.com> * alpha.md (cmov compound patterns): Delete. Jump can now diff --git a/gcc/config/m32r/m32r.md b/gcc/config/m32r/m32r.md index f52a5257d23..3f1e6e51f71 100644 --- a/gcc/config/m32r/m32r.md +++ b/gcc/config/m32r/m32r.md @@ -589,14 +589,8 @@ [(set (match_dup 2) (match_dup 3))] " { - long l; - REAL_VALUE_TYPE rv; - - REAL_VALUE_FROM_CONST_DOUBLE (rv, operands[1]); - REAL_VALUE_TO_TARGET_SINGLE (rv, l); - operands[2] = operand_subword (operands[0], 0, 0, SFmode); - operands[3] = GEN_INT (l); + operands[3] = operand_subword (operands[1], 0, 0, SFmode); }") (define_expand "movdf" diff --git a/gcc/emit-rtl.c b/gcc/emit-rtl.c index 2e48bde2983..a761c45745a 100644 --- a/gcc/emit-rtl.c +++ b/gcc/emit-rtl.c @@ -1303,6 +1303,18 @@ operand_subword (op, i, validate_address, mode) REAL_VALUE_FROM_CONST_DOUBLE (rv, op); REAL_VALUE_TO_TARGET_SINGLE (rv, l); + /* If 32 bits is an entire word for the target, but not for the host, + then sign-extend on the host so that the number will look the same + way on the host that it would on the target. See for instance + simplify_unary_operation. The #if is needed to avoid compiler + warnings. */ + +#if HOST_BITS_PER_LONG > 32 + if (BITS_PER_WORD < HOST_BITS_PER_LONG && BITS_PER_WORD == 32 + && (l & ((long) 1 << 31))) + l |= ((long) (-1) << 32); +#endif + if (BITS_PER_WORD == 16) { if ((i & 0x1) == !WORDS_BIG_ENDIAN) diff --git a/gcc/final.c b/gcc/final.c index 74c36c2467b..602c27823fd 100644 --- a/gcc/final.c +++ b/gcc/final.c @@ -3929,6 +3929,22 @@ split_double (value, first, second) not necessarily BITS_PER_WORD bits. */ REAL_VALUE_TO_TARGET_DOUBLE (r, l); + /* If 32 bits is an entire word for the target, but not for the host, + then sign-extend on the host so that the number will look the same + way on the host that it would on the target. See for instance + simplify_unary_operation. The #if is needed to avoid compiler + warnings. */ + +#if HOST_BITS_PER_LONG > 32 + if (BITS_PER_WORD < HOST_BITS_PER_LONG && BITS_PER_WORD == 32) + { + if (l[0] & ((long) 1 << 31)) + l[0] |= ((long) (-1) << 32); + if (l[1] & ((long) 1 << 31)) + l[1] |= ((long) (-1) << 32); + } +#endif + *first = GEN_INT ((HOST_WIDE_INT) l[0]); *second = GEN_INT ((HOST_WIDE_INT) l[1]); #else diff --git a/gcc/real.c b/gcc/real.c index 3a3f4be50ba..8c5e3fe805b 100644 --- a/gcc/real.c +++ b/gcc/real.c @@ -558,23 +558,6 @@ endian (e, x, mode) abort (); } } - - /* If 32 bits is an entire word for the target, but not for the host, - then sign-extend on the host so that the number will look the same - way on the host that it would on the target. See for instance - simplify_unary_operation. The #if is needed to avoid compiler - warnings. */ - -#if HOST_BITS_PER_WIDE_INT > 32 - if (BITS_PER_WORD < HOST_BITS_PER_WIDE_INT && BITS_PER_WORD == 32) - { - if (x[0] & ((HOST_WIDE_INT) 1 << 31)) - x[0] |= ((HOST_WIDE_INT) (-1) << 32); - - if (x[1] & ((HOST_WIDE_INT) 1 << 31)) - x[1] |= ((HOST_WIDE_INT) (-1) << 32); - } -#endif } |