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
|
/* Verify that overloaded built-ins for vec_orc and vec_nand with char
* inputs produce the right results. These intrinsics (vec_orc,
* vec_nand) were added as part of ISA 2.07 (P8). */
/* { dg-do compile } */
/* { dg-require-effective-target powerpc_p8vector_ok } */
/* { dg-options "-mpower8-vector -O1" } */
#include <altivec.h>
vector signed char
test1_orc (vector bool char x, vector signed char y)
{
vector signed char *foo;
*foo += vec_orc (x, y);
return *foo;
}
vector signed char
test1_nand (vector bool char x, vector signed char y)
{
vector signed char *foo;
*foo += vec_nand (x, y);
return *foo;
}
vector signed char
test2_orc (vector signed char x, vector bool char y)
{
vector signed char *foo;
*foo += vec_orc (x, y);
return *foo;
}
vector signed char
test2_nand (vector signed char x, vector bool char y)
{
vector signed char *foo;
*foo += vec_nand (x, y);
return *foo;
}
vector signed char
test3_orc (vector signed char x, vector signed char y)
{
vector signed char *foo;
*foo += vec_orc (x, y);
return *foo;
}
vector signed char
test3_nand (vector signed char x, vector signed char y)
{
vector signed char *foo;
*foo += vec_nand (x, y);
return *foo;
}
vector unsigned char
test4_orc (vector bool char x, vector unsigned char y)
{
vector unsigned char *foo;
*foo += vec_orc (x, y);
return *foo;
}
vector unsigned char
test4_nand (vector bool char x, vector unsigned char y)
{
vector unsigned char *foo;
*foo += vec_nand (x, y);
return *foo;
}
vector unsigned char
test5_orc (vector unsigned char x, vector bool char y)
{
vector unsigned char *foo;
*foo += vec_orc (x, y);
return *foo;
}
vector unsigned char
test5_nand (vector unsigned char x, vector bool char y)
{
vector unsigned char *foo;
*foo += vec_nand (x, y);
return *foo;
}
vector unsigned char
test6_orc (vector unsigned char x, vector unsigned char y)
{
vector unsigned char *foo;
*foo += vec_orc (x, y);
return *foo;
}
vector unsigned char
test6_nand (vector unsigned char x, vector unsigned char y)
{
vector unsigned char *foo;
*foo += vec_nand (x, y);
return *foo;
}
/* { dg-final { scan-assembler-times {\mxxlnand\M} 6 } } */
/* { dg-final { scan-assembler-times {\mxxlorc\M} 6 } } */
|
