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
|
/* { dg-do run { target { power10_hw } } } */
/* { dg-do link { target { ! power10_hw } } } */
/* { dg-require-effective-target power10_ok } */
/* { dg-options "-mdejagnu-cpu=power10" } */
#include <altivec.h>
extern void abort (void);
int
main (int argc, char *argv [])
{
vector unsigned short source_a = { 0, 2, 4, 6, 8, 10, 12, 14 };
vector unsigned short source_b = { 16, 18, 20, 22, 24, 26, 28, 30 };
vector unsigned long long int result_1 = { 0, 16 };
vector unsigned long long int result_2 = { 0, 14 };
vector unsigned long long int result_3 = { 0, 6 };
vector unsigned long long int result_4 = { 0, 18 };
if (!vec_all_eq (vec_extracth (source_a, source_b, 14), result_1))
abort ();
if (!vec_all_eq (vec_extracth (source_a, source_b, 16), result_2))
abort ();
if (!vec_all_eq (vec_extracth (source_b, source_a, 8), result_3))
abort ();
if (!vec_all_eq (vec_extracth (source_b, source_a, 28), result_4))
abort ();
return 0;
}
|
