re PR target/60203 (Support long double/_Decimal128 direct move on power8)
[gcc] 2014-02-15 Michael Meissner <meissner@linux.vnet.ibm.com> PR target/60203 * config/rs6000/rs6000.md (rreg): Add TFmode, TDmode constraints. (mov<mode>_internal, TFmode/TDmode): Split TFmode/TDmode moves into 64-bit and 32-bit moves. On 64-bit moves, add support for using direct move instructions on ISA 2.07. Also adjust instruction length for 64-bit. (mov<mode>_64bit, TFmode/TDmode): Likewise. (mov<mode>_32bit, TFmode/TDmode): Likewise. [gcc/testsuite] 2014-02-15 Michael Meissner <meissner@linux.vnet.ibm.com> PR target/60203 * gcc.target/powerpc/pr60203.c: New testsuite. From-SVN: r207808
This commit is contained in:
parent
71a03f516f
commit
518fea64fc
4 changed files with 72 additions and 2 deletions
|
@ -1,3 +1,14 @@
|
|||
2014-02-15 Michael Meissner <meissner@linux.vnet.ibm.com>
|
||||
|
||||
PR target/60203
|
||||
* config/rs6000/rs6000.md (rreg): Add TFmode, TDmode constraints.
|
||||
(mov<mode>_internal, TFmode/TDmode): Split TFmode/TDmode moves
|
||||
into 64-bit and 32-bit moves. On 64-bit moves, add support for
|
||||
using direct move instructions on ISA 2.07. Also adjust
|
||||
instruction length for 64-bit.
|
||||
(mov<mode>_64bit, TFmode/TDmode): Likewise.
|
||||
(mov<mode>_32bit, TFmode/TDmode): Likewise.
|
||||
|
||||
2014-02-15 Alan Modra <amodra@gmail.com>
|
||||
|
||||
PR target/58675
|
||||
|
|
|
@ -387,6 +387,8 @@
|
|||
|
||||
(define_mode_attr rreg [(SF "f")
|
||||
(DF "ws")
|
||||
(TF "f")
|
||||
(TD "f")
|
||||
(V4SF "wf")
|
||||
(V2DF "wd")])
|
||||
|
||||
|
@ -9524,10 +9526,22 @@
|
|||
;; It's important to list Y->r and r->Y before r->r because otherwise
|
||||
;; reload, given m->r, will try to pick r->r and reload it, which
|
||||
;; doesn't make progress.
|
||||
(define_insn_and_split "*mov<mode>_internal"
|
||||
(define_insn_and_split "*mov<mode>_64bit"
|
||||
[(set (match_operand:FMOVE128 0 "nonimmediate_operand" "=m,d,d,Y,r,r,r,wm")
|
||||
(match_operand:FMOVE128 1 "input_operand" "d,m,d,r,YGHF,r,wm,r"))]
|
||||
"TARGET_HARD_FLOAT && TARGET_FPRS && TARGET_POWERPC64
|
||||
&& (gpc_reg_operand (operands[0], <MODE>mode)
|
||||
|| gpc_reg_operand (operands[1], <MODE>mode))"
|
||||
"#"
|
||||
"&& reload_completed"
|
||||
[(pc)]
|
||||
{ rs6000_split_multireg_move (operands[0], operands[1]); DONE; }
|
||||
[(set_attr "length" "8,8,8,12,12,8,8,8")])
|
||||
|
||||
(define_insn_and_split "*mov<mode>_32bit"
|
||||
[(set (match_operand:FMOVE128 0 "nonimmediate_operand" "=m,d,d,Y,r,r")
|
||||
(match_operand:FMOVE128 1 "input_operand" "d,m,d,r,YGHF,r"))]
|
||||
"TARGET_HARD_FLOAT && TARGET_FPRS
|
||||
"TARGET_HARD_FLOAT && TARGET_FPRS && !TARGET_POWERPC64
|
||||
&& (gpc_reg_operand (operands[0], <MODE>mode)
|
||||
|| gpc_reg_operand (operands[1], <MODE>mode))"
|
||||
"#"
|
||||
|
|
|
@ -1,3 +1,8 @@
|
|||
2014-02-15 Michael Meissner <meissner@linux.vnet.ibm.com>
|
||||
|
||||
PR target/60203
|
||||
* gcc.target/powerpc/pr60203.c: New testsuite.
|
||||
|
||||
2014-02-15 Mikael Morin <mikael@gcc.gnu.org>
|
||||
|
||||
PR fortran/59599
|
||||
|
|
40
gcc/testsuite/gcc.target/powerpc/pr60203.c
Normal file
40
gcc/testsuite/gcc.target/powerpc/pr60203.c
Normal file
|
@ -0,0 +1,40 @@
|
|||
/* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
|
||||
/* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
|
||||
/* { dg-require-effective-target powerpc_p8vector_ok } */
|
||||
/* { dg-options "-mcpu=power8 -O3" } */
|
||||
|
||||
union u_ld { long double ld; double d[2]; };
|
||||
|
||||
long double
|
||||
pack (double a, double aa)
|
||||
{
|
||||
union u_ld u;
|
||||
u.d[0] = a;
|
||||
u.d[1] = aa;
|
||||
return u.ld;
|
||||
}
|
||||
|
||||
double
|
||||
unpack_0 (long double x)
|
||||
{
|
||||
union u_ld u;
|
||||
u.ld = x;
|
||||
return u.d[0];
|
||||
}
|
||||
|
||||
double
|
||||
unpack_1 (long double x)
|
||||
{
|
||||
union u_ld u;
|
||||
u.ld = x;
|
||||
return u.d[1];
|
||||
}
|
||||
|
||||
/* { dg-final { scan-assembler-not "stfd" } } */
|
||||
/* { dg-final { scan-assembler-not "lfd" } } */
|
||||
/* { dg-final { scan-assembler-not "lxsdx" } } */
|
||||
/* { dg-final { scan-assembler-not "stxsdx" } } */
|
||||
/* { dg-final { scan-assembler-not "mfvsrd" } } */
|
||||
/* { dg-final { scan-assembler-not "mtvsrd" } } */
|
||||
|
||||
|
Loading…
Add table
Reference in a new issue