gcc/testsuite/gcc.target/powerpc/vec-pdep-0.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-mdejagnu-cpu=power10" } */
   3
   4 #include <altivec.h>
   5
   6 extern void abort (void);
   7
   8 vector unsigned long long int
   9 do_vec_pdep (vector unsigned long long int source,
  10              vector unsigned long long int mask) {
  11   return vec_pdep (source, mask);
  12 }
  13
  14 int
  15 vectors_equal (vector unsigned long long int a,
  16                vector unsigned long long int b)
  17 {
  18   return (a[0] == b[0]) && (a[1] == b[1]);
  19 }
  20
  21 int
  22 main (int argc, char *argv [])
  23 {
  24   vector unsigned long long int source_a = { 0xa5f07e3cull, 0x7e3ca5f0ull };
  25   vector unsigned long long int source_b = { 0x3ca5f07eull, 0x5a0fe7c3ull };
  26
  27   vector unsigned long long int mask_a = { 0xffff0000ull, 0x0000ffffull };
  28   vector unsigned long long int mask_b = { 0x0f0f0f0full, 0xf0f0f0f0ull };
  29
  30   /* See pdepd-0.c for derivation of expected results.
  31
  32      result_aa [0] is compute (source [0], mask [0];
  33      result_aa [1] is compute (source [1], mask [1].
  34
  35      result_ab [0] is compute (source [0], mask [2];
  36      result_ab [1] is compute (source [1], mask [3].
  37
  38      result_ba [0] is compute (source [2], mask [0];
  39      result_ba [1] is compute (source [3], mask [1].
  40
  41      result_bb [0] is compute (source [2], mask [2];
  42      result_bb [1] is compute (source [3], mask [3].  */
  43
  44   vector unsigned long long int result_aa = { 0x7e3c0000ull, 0x0000a5f0ull };
  45   vector unsigned long long int result_ab = { 0x070e030cull, 0xa050f000ull };
  46   vector unsigned long long int result_ba = { 0xf07e0000ull, 0x0000e7c3ull };
  47   vector unsigned long long int result_bb = { 0x0f00070eull, 0xe070c030ull };
  48
  49   if (!vec_all_eq (do_vec_pdep (source_a, mask_a), result_aa))
  50     abort ();
  51   if (!vec_all_eq (do_vec_pdep (source_a, mask_b), result_ab))
  52     abort ();
  53   if (!vec_all_eq (do_vec_pdep (source_b, mask_a), result_ba))
  54     abort ();
  55   if (!vec_all_eq (do_vec_pdep (source_b, mask_b), result_bb))
  56     abort ();
  57
  58   return 0;
  59 }
  60
  61 /* { dg-final { scan-assembler {\mvpdepd\M} } } */