e18b1f85d9bf99b323295d0d992a169772a9d8cc
1 /* { dg-do compile { target { powerpc64le-*-* } } } */
2 /* { dg-require-effective-target powerpc_p8vector_ok } */
3 /* { dg-options "-mdejagnu-cpu=power8 -O3 " } */
5 /* Previous versions of this test required that the assembler does not
6 contain xxpermdi or xxswapd. However, with the more sophisticated
7 code generation used today, it is now possible that xxpermdi (aka
8 xxswapd) show up without being part of a lxvd2x or stxvd2x
13 extern void abort (void);
16 const vector
long long y
= { 1024, 2048 };
22 return y
; /* Remove 1 swap and use lvx. */
28 x
= y
; /* Remove 2 redundant swaps here. */
29 return x
; /* Remove 1 swap and use lvx. */
32 void __attribute__ ((noinline
))
33 fill_local (vector
long long *vp
)
35 *vp
= x
; /* Remove 2 redundant swaps here. */
38 /* Test aligned load from local. */
44 /* Need to be clever here because v will normally reside in a
45 register rather than memory. */
47 return v
; /* Remove 1 swap and use lvx. */
51 /* Test aligned load from pointer. */
53 foo3 (vector
long long *arg
)
55 return *arg
; /* Remove 1 swap and use lvx. */
58 /* In this structure, the compiler should insert padding to assure
59 that a_vector is properly aligned. */
62 vector
long long a_vector
;
68 return bp
->a_vector
; /* Remove 1 swap and use lvx. */
71 /* Test aligned store to global. */
73 baz (vector
long long arg
)
75 x
= arg
; /* Remove 1 swap and use stvx. */
78 void __attribute__ ((noinline
))
79 copy_local (vector
long long *arg
)
81 x
= *arg
; /* Remove 2 redundant swaps. */
85 /* Test aligned store to local. */
87 baz1 (vector
long long arg
)
91 /* Need cleverness, because v will normally reside in a register
92 rather than memory. */
93 v
= arg
; /* Aligned store to local: remove 1
98 /* Test aligned store to pointer. */
100 baz2 (vector
long long *arg1
, vector
long long arg2
)
102 /* Assume arg2 resides in register. */
103 *arg1
= arg2
; /* Remove 1 swap and use stvx. */
107 baz3 (struct bar
*bp
, vector
long long v
)
109 /* Assume v resides in register. */
110 bp
->a_vector
= v
; /* Remove 1 swap and use stvx. */
114 main (long long argc
, long long *argv
[])
116 vector
long long fetched_value
= foo ();
117 if (fetched_value
[0] != 1024 || fetched_value
[1] != 2048)
120 fetched_value
= foo1 ();
121 if (fetched_value
[1] != 2048 || fetched_value
[0] != 1024)
124 fetched_value
= foo2 ();
125 if (fetched_value
[0] != 1024 || fetched_value
[1] != 2048)
128 fetched_value
= foo3 (&x
);
129 if (fetched_value
[1] != 2048 || fetched_value
[0] != 1024)
133 a_struct
.a_vector
= x
; /* Remove 2 redundant swaps. */
134 fetched_value
= foo4 (&a_struct
);
135 if (fetched_value
[1] != 2048 || fetched_value
[0] != 1024)
142 if (x
[0] != 7096 || x
[1] != 6048)
145 vector
long long source
= { 8192, 7096};
148 if (x
[0] != 8192 || x
[1] != 7096)
151 vector
long long dest
;
152 baz2 (&dest
, source
);
153 if (dest
[0] != 8192 || dest
[1] != 7096)
156 baz3 (&a_struct
, source
);
157 if (a_struct
.a_vector
[1] != 7096 || a_struct
.a_vector
[0] != 8192)