1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
/* { dg-do compile { target { powerpc*-*-* } } } */
/* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
/* { dg-require-effective-target powerpc_vsx_ok } */
/* { dg-options "-O2 -mcpu=power7" } */
/* { dg-final { scan-assembler "xvadddp" } } */
/* { dg-final { scan-assembler "xvsubdp" } } */
/* { dg-final { scan-assembler "xvmuldp" } } */
/* { dg-final { scan-assembler "xvmadd" } } */
/* { dg-final { scan-assembler "xvmsub" } } */
/* { dg-final { scan-assembler "xvnmadd" } } */
/* { dg-final { scan-assembler "xvnmsub" } } */
/* { dg-final { scan-assembler "xvdivdp" } } */
/* { dg-final { scan-assembler "xvmaxdp" } } */
/* { dg-final { scan-assembler "xvmindp" } } */
/* { dg-final { scan-assembler "xvsqrtdp" } } */
/* { dg-final { scan-assembler "xvrsqrtedp" } } */
/* { dg-final { scan-assembler "xvabsdp" } } */
/* { dg-final { scan-assembler "xvnabsdp" } } */
/* { dg-final { scan-assembler "xvredp" } } */
void use_builtins (__vector double *p, __vector double *q, __vector double *r, __vector double *s)
{
p[0] = __builtin_vsx_xvadddp (q[0], r[0]);
p[1] = __builtin_vsx_xvsubdp (q[1], r[1]);
p[2] = __builtin_vsx_xvmuldp (q[2], r[2]);
p[3] = __builtin_vsx_xvdivdp (q[3], r[3]);
p[4] = __builtin_vsx_xvmaxdp (q[4], r[4]);
p[5] = __builtin_vsx_xvmindp (q[5], r[5]);
p[6] = __builtin_vsx_xvabsdp (q[6]);
p[7] = __builtin_vsx_xvnabsdp (q[7]);
p[8] = __builtin_vsx_xvsqrtdp (q[8]);
p[9] = __builtin_vsx_xvmadddp (q[9], r[9], s[9]);
p[10] = __builtin_vsx_xvmsubdp (q[10], r[10], s[10]);
p[11] = __builtin_vsx_xvnmadddp (q[11], r[11], s[11]);
p[12] = __builtin_vsx_xvnmsubdp (q[12], r[12], s[12]);
p[13] = __builtin_vsx_xvredp (q[13]);
p[14] = __builtin_vsx_xvrsqrtedp (q[14]);
}
|
