+2004-10-25 Alexandre Oliva <aoliva@redhat.com>
+
+ * config/frv/frv.md (movdi, movdf): Handle wide-constant splits
+ with wider-than-32-bit HOST_WIDE_INTs.
+
2004-10-25 David Billinghurst <David.Billinghurst@riotinto.com>
* config/mips/mips.c(mips_output_filename): Remove unused
(match_operand:DI 1 "const_int_operand" ""))]
"reload_completed"
[(set (match_dup 2) (match_dup 4))
- (set (match_dup 3) (match_dup 1))]
+ (set (match_dup 3) (match_dup 5))]
"
{
rtx op0 = operands[0];
operands[2] = gen_highpart (SImode, op0);
operands[3] = gen_lowpart (SImode, op0);
- operands[4] = GEN_INT ((INTVAL (op1) < 0) ? -1 : 0);
+ if (HOST_BITS_PER_WIDE_INT <= 32)
+ {
+ operands[4] = GEN_INT ((INTVAL (op1) < 0) ? -1 : 0);
+ operands[5] = op1;
+ }
+ else
+ {
+ operands[4] = GEN_INT ((((unsigned HOST_WIDE_INT)INTVAL (op1) >> 16)
+ >> 16) ^ ((unsigned HOST_WIDE_INT)1 << 31)
+ - ((unsigned HOST_WIDE_INT)1 << 31));
+ operands[5] = GEN_INT (trunc_int_for_mode (INTVAL (op1), SImode));
+ }
}")
(define_split
(match_operand:DF 1 "const_int_operand" ""))]
"reload_completed"
[(set (match_dup 2) (match_dup 4))
- (set (match_dup 3) (match_dup 1))]
+ (set (match_dup 3) (match_dup 5))]
"
{
rtx op0 = operands[0];
operands[2] = gen_highpart (SImode, op0);
operands[3] = gen_lowpart (SImode, op0);
- operands[4] = GEN_INT ((INTVAL (op1) < 0) ? -1 : 0);
+ if (HOST_BITS_PER_WIDE_INT <= 32)
+ {
+ operands[4] = GEN_INT ((INTVAL (op1) < 0) ? -1 : 0);
+ operands[5] = op1;
+ }
+ else
+ {
+ operands[4] = GEN_INT ((((unsigned HOST_WIDE_INT)INTVAL (op1) >> 16)
+ >> 16) ^ ((unsigned HOST_WIDE_INT)1 << 31)
+ - ((unsigned HOST_WIDE_INT)1 << 31));
+ operands[5] = GEN_INT (trunc_int_for_mode (INTVAL (op1), SImode));
+ }
}")
(define_split