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
|
/* Verify that overloaded built-ins for vec_extract() with long long
inputs produce the right code for a P9 target. */
/* { dg-do compile { target lp64 } } */
/* { dg-options "-mdejagnu-cpu=power9 -mvsx -O2" } */
/* { dg-require-effective-target powerpc_vsx } */
// targeting P9 (LE), six tests.
// p9 constants: mfvsrd
// p9 vars: xori, rldic, mtvsrdd, vslo, mfvsrd
/* results. */
/* { dg-final { scan-assembler-times {\mxori\M} 3 { target le } } } */
/* { dg-final { scan-assembler-times {\mrldic\M} 3 } } */
/* { dg-final { scan-assembler-times {\mmtvsrdd\M} 3 } } */
/* { dg-final { scan-assembler-times {\mvslo\M} 3 } } */
/* { dg-final { scan-assembler-times {\mmfvsrd\M} 6 { target le } } } */
/* { dg-final { scan-assembler-times {\mmfvsrd\M} 3 { target be } } } */
/* { dg-final { scan-assembler-times {\mmfvsrld\M} 3 { target be } } } */
#include <altivec.h>
unsigned long long
testbl_var (vector bool long long vbl2, signed int si)
{
return vec_extract (vbl2, si);
}
signed long long
testsl_var (vector signed long long vsl2, signed int si)
{
return vec_extract (vsl2, si);
}
unsigned long long
testul_var (vector unsigned long long vul2, signed int si)
{
return vec_extract (vul2, si);
}
unsigned long long
testbl_cst (vector bool long long vbl2)
{
return vec_extract (vbl2, 1);
}
signed long long
testsl_cst (vector signed long long vsl2)
{
return vec_extract (vsl2, 1);
}
unsigned long long
testul_cst (vector unsigned long vul2)
{
return vec_extract (vul2, 1);
}
|