Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/gcc.target/powerpc/vec-cntlzm-0.c @ 152:2b5abeee2509
update gcc11
author | anatofuz |
---|---|
date | Mon, 25 May 2020 07:50:57 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
145:1830386684a0 | 152:2b5abeee2509 |
---|---|
1 /* { dg-do compile } */ | |
2 /* { dg-options "-mdejagnu-cpu=future" } */ | |
3 | |
4 #include <altivec.h> | |
5 | |
6 extern void abort (void); | |
7 | |
8 vector unsigned long long int | |
9 do_vec_cntlzm (vector unsigned long long int source, | |
10 vector unsigned long long int mask) | |
11 { | |
12 return vec_cntlzm (source, mask); | |
13 } | |
14 | |
15 int main (int argc, char *argv []) | |
16 { | |
17 vector unsigned long long int source_a = { 0xa5f07e3cull, 0x7e3ca5f0ull }; | |
18 vector unsigned long long int source_b = { 0x3ca5f07eull, 0x5a0fe7c3ull }; | |
19 | |
20 vector unsigned long long int mask_a = { 0xffff0000ull, 0x0000ffffull }; | |
21 vector unsigned long long int mask_b = { 0x0f0f0f0full, 0xf0f0f0f0ull }; | |
22 | |
23 /* See cntlzdm-0.c for derivation of expected results. | |
24 | |
25 result_aa [0] is compute (source [0], mask [0]; | |
26 result_aa [1] is compute (source [1], mask [1]. | |
27 | |
28 result_ab [0] is compute (source [0], mask [2]; | |
29 result_ab [1] is compute (source [1], mask [3]. | |
30 | |
31 result_ba [0] is compute (source [2], mask [0]; | |
32 result_ba [1] is compute (source [3], mask [1]. | |
33 | |
34 result_bb [0] is compute (source [2], mask [2]; | |
35 result_bb [1] is compute (source [3], mask [3]. */ | |
36 | |
37 vector unsigned long long int result_aa = { 0, 0 }; | |
38 vector unsigned long long int result_ab = { 1, 1 }; | |
39 vector unsigned long long int result_ba = { 2, 0 }; | |
40 vector unsigned long long int result_bb = { 0, 1 }; | |
41 | |
42 if (!vec_all_eq (do_vec_cntlzm (source_a, mask_a), result_aa)) | |
43 abort (); | |
44 if (!vec_all_eq (do_vec_cntlzm (source_a, mask_b), result_ab)) | |
45 abort (); | |
46 if (!vec_all_eq (do_vec_cntlzm (source_b, mask_a), result_ba)) | |
47 abort (); | |
48 if (!vec_all_eq (do_vec_cntlzm (source_b, mask_b), result_bb)) | |
49 abort (); | |
50 | |
51 return 0; | |
52 } | |
53 | |
54 /* { dg-final { scan-assembler {\mvclzdm\M} } } */ |