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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
/* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
/* { dg-require-effective-target powerpc_p8vector_ok } */
/* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power8" } } */
/* { dg-options "-mcpu=power8 -O2 -mno-upper-regs-di" } */
/* PR target/80099 was an issue with -mno-upper-regs-sf. Test for all variable
extract types with various -mno-upper-regs-* options. */
double
d_extract_arg_n (vector double v, unsigned long n)
{
return __builtin_vec_extract (v, n);
}
float
f_extract_arg_n (vector float v, unsigned long n)
{
return __builtin_vec_extract (v, n);
}
long
sl_extract_arg_n (vector long v, unsigned long n)
{
return (long) __builtin_vec_extract (v, n);
}
unsigned long
ul_extract_arg_n (vector unsigned long v, unsigned long n)
{
return (unsigned long) __builtin_vec_extract (v, n);
}
long
si_extract_arg_n (vector int v, unsigned long n)
{
return (int) __builtin_vec_extract (v, n);
}
unsigned long
ui_extract_arg_n (vector unsigned int v, unsigned long n)
{
return (unsigned int) __builtin_vec_extract (v, n);
}
long
ss_extract_arg_n (vector short v, unsigned long n)
{
return (short) __builtin_vec_extract (v, n);
}
unsigned long
us_extract_arg_n (vector unsigned short v, unsigned long n)
{
return (unsigned short) __builtin_vec_extract (v, n);
}
long
sc_extract_arg_n (vector signed char v, unsigned long n)
{
return (signed char) __builtin_vec_extract (v, n);
}
unsigned long
uc_extract_arg_n (vector unsigned char v, unsigned long n)
{
return (unsigned char) __builtin_vec_extract (v, n);
}
double
d_extract_mem_n (vector double *p, unsigned long n)
{
return __builtin_vec_extract (*p, n);
}
float
f_extract_mem_n (vector float *p, unsigned long n)
{
return __builtin_vec_extract (*p, n);
}
long
sl_extract_mem_n (vector long *p, unsigned long n)
{
return (long) __builtin_vec_extract (*p, n);
}
unsigned long
ul_extract_mem_n (vector unsigned long *p, unsigned long n)
{
return (unsigned long) __builtin_vec_extract (*p, n);
}
long
si_extract_mem_n (vector int *p, unsigned long n)
{
return (int) __builtin_vec_extract (*p, n);
}
unsigned long
ui_extract_mem_n (vector unsigned int *p, unsigned long n)
{
return (unsigned int) __builtin_vec_extract (*p, n);
}
long
ss_extract_mem_n (vector short *p, unsigned long n)
{
return (short) __builtin_vec_extract (*p, n);
}
unsigned long
us_extract_mem_n (vector unsigned short *p, unsigned long n)
{
return (unsigned short) __builtin_vec_extract (*p, n);
}
long
sc_extract_mem_n (vector signed char *p, unsigned long n)
{
return (signed char) __builtin_vec_extract (*p, n);
}
unsigned long
uc_extract_mem_n (vector unsigned char *p, unsigned long n)
{
return (unsigned char) __builtin_vec_extract (*p, n);
}
|
