diff options
| author | Roger Sayle <roger@eyesopen.com> | 2003-10-23 21:37:52 +0000 |
|---|---|---|
| committer | Roger Sayle <sayle@gcc.gnu.org> | 2003-10-23 21:37:52 +0000 |
| commit | c7d91a943bad9fb36dced38981ce5234082b7f72 (patch) | |
| tree | 12397fd1edfe289ae3f5ac482f42562897224513 /gcc/optabs.c | |
| parent | 7989e4dc2471b3073e73f5a95095caf2dab7aac1 (diff) | |
| download | gcc-c7d91a943bad9fb36dced38981ce5234082b7f72.zip gcc-c7d91a943bad9fb36dced38981ce5234082b7f72.tar.gz gcc-c7d91a943bad9fb36dced38981ce5234082b7f72.tar.bz2 | |
re PR middle-end/12705 (: complex powers)
PR middle-end/12705
* optabs.c (expand_binop): When expanding complex operations
inline, always calculate result into a new temporary register.
Minor code clean-ups.
From-SVN: r72871
Diffstat (limited to 'gcc/optabs.c')
| -rw-r--r-- | gcc/optabs.c | 29 |
1 files changed, 10 insertions, 19 deletions
diff --git a/gcc/optabs.c b/gcc/optabs.c index a56c89f..1410ed2 100644 --- a/gcc/optabs.c +++ b/gcc/optabs.c @@ -1521,24 +1521,17 @@ expand_binop (enum machine_mode mode, optab binoptab, rtx op0, rtx op1, rtx real0 = 0, imag0 = 0; rtx real1 = 0, imag1 = 0; rtx realr, imagr, res; - rtx seq; - rtx equiv_value; + rtx seq, result; int ok = 0; /* Find the correct mode for the real and imaginary parts. */ - enum machine_mode submode = GET_MODE_INNER(mode); + enum machine_mode submode = GET_MODE_INNER (mode); if (submode == BLKmode) abort (); - if (! target) - target = gen_reg_rtx (mode); - start_sequence (); - realr = gen_realpart (submode, target); - imagr = gen_imagpart (submode, target); - if (GET_MODE (op0) == mode) { real0 = gen_realpart (submode, op0); @@ -1558,6 +1551,10 @@ expand_binop (enum machine_mode mode, optab binoptab, rtx op0, rtx op1, if (real0 == 0 || real1 == 0 || ! (imag0 != 0 || imag1 != 0)) abort (); + result = gen_reg_rtx (mode); + realr = gen_realpart (submode, result); + imagr = gen_imagpart (submode, result); + switch (binoptab->code) { case PLUS: @@ -1749,16 +1746,10 @@ expand_binop (enum machine_mode mode, optab binoptab, rtx op0, rtx op1, if (ok) { - if (binoptab->code != UNKNOWN) - equiv_value - = gen_rtx_fmt_ee (binoptab->code, mode, - copy_rtx (op0), copy_rtx (op1)); - else - equiv_value = 0; - - emit_no_conflict_block (seq, target, op0, op1, equiv_value); - - return target; + rtx equiv = gen_rtx_fmt_ee (binoptab->code, mode, + copy_rtx (op0), copy_rtx (op1)); + emit_no_conflict_block (seq, result, op0, op1, equiv); + return result; } } |