1 /* { dg-do run { target { powerpc*-*-* && { p8vector_hw && int128 } } } } */
2 /* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power8" } } */
3 /* { dg-options "-mcpu=power8 -O3" } */
4 
5 
6 /* Test that the vec_adde builtin works as expected.  */
7 
8 #include "altivec.h"
9 
10 #define N 4096
11 
12 void abort ();
13 
14 #define define_test_functions(STYPE, NAMESUFFIX) \
15 \
16 STYPE result_##NAMESUFFIX[N]; \
17 STYPE addend1_##NAMESUFFIX[N]; \
18 STYPE addend2_##NAMESUFFIX[N]; \
19 STYPE carry_##NAMESUFFIX[N]; \
20 STYPE expected_##NAMESUFFIX[N]; \
21 \
22 __attribute__((noinline)) void vector_tests_##NAMESUFFIX () \
23 { \
24   vector STYPE v1, v2, v3, tmp; \
25   int i; \
26   for (i = 0; i < N; i+=16/sizeof (STYPE)) \
27     { \
28       /* result=addend1+addend2+(carry & 0x1).  */ \
29       v1 = (vector STYPE) { addend1_##NAMESUFFIX[i] }; \
30       v2 = (vector STYPE) { addend2_##NAMESUFFIX[i] }; \
31       v3 = (vector STYPE) { carry_##NAMESUFFIX[i] }; \
32 \
33       tmp = vec_adde (v1, v2, v3); \
34       result_##NAMESUFFIX[i] = tmp[0]; \
35     } \
36 } \
37 \
38 __attribute__((noinline)) void init_##NAMESUFFIX () \
39 { \
40   int i; \
41   for (i = 0; i < N; ++i) \
42     { \
43       result_##NAMESUFFIX[i] = 0; \
44       addend1_##NAMESUFFIX[i] = 1; \
45       addend2_##NAMESUFFIX[i] = 2; \
46       carry_##NAMESUFFIX[i] = (i%12); \
47       expected_##NAMESUFFIX[i] = addend1_##NAMESUFFIX[i] + \
48 				 addend2_##NAMESUFFIX[i] + \
49 				 (carry_##NAMESUFFIX[i] & 0x1); \
50     } \
51 } \
52 \
53 __attribute__((noinline)) void verify_results_##NAMESUFFIX () \
54 { \
55   int i; \
56   for (i = 0; i < N; ++i) \
57     { \
58       if (result_##NAMESUFFIX[i] != expected_##NAMESUFFIX[i]) \
59 	abort (); \
60     } \
61 }
62 
63 
64 #define execute_test_functions(STYPE, NAMESUFFIX) \
65 { \
66   init_##NAMESUFFIX (); \
67   vector_tests_##NAMESUFFIX (); \
68   verify_results_##NAMESUFFIX (); \
69 }
70 
71 
72 define_test_functions (signed __int128, si128);
73 define_test_functions (unsigned __int128, ui128);
74 
main()75 int main ()
76 {
77   execute_test_functions (signed __int128, si128);
78   execute_test_functions (unsigned __int128, ui128);
79 
80   return 0;
81 }
82 
83 
84