(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
powerpc/
vec-cfuged-1.c
       1  /* { dg-do run { target { power10_hw } } } */
       2  /* { dg-do link { target { ! power10_hw } } } */
       3  /* { dg-require-effective-target power10_ok } */
       4  /* { dg-options "-mdejagnu-cpu=power10" } */
       5  
       6  #include <altivec.h>
       7  
       8  extern void abort (void);
       9  
      10  vector unsigned long long int
      11  do_vec_cfuge (vector unsigned long long int source,
      12  	      vector unsigned long long int mask)
      13  {
      14    return vec_cfuge (source, mask);
      15  }
      16  
      17  int
      18  vectors_equal (vector unsigned long long int a,
      19  	       vector unsigned long long int b)
      20  {
      21    return (a[0] == b[0]) && (a[1] == b[1]);
      22  }
      23  
      24  int main (int argc, char *argv [])
      25  {
      26    vector unsigned long long int source_a = { 0xa5f07e3cull, 0x7e3ca5f0ull };
      27    vector unsigned long long int source_b = { 0x3ca5f07eull, 0x5a0fe7c3ull };
      28  
      29    vector unsigned long long int mask_a = { 0xffff0000ull, 0x0000ffffull };
      30    vector unsigned long long int mask_b = { 0x0f0f0f0full, 0xf0f0f0f0ull };
      31  
      32    /* See cfuged-0.c for derivation of expected results.
      33  
      34       result_aa [0] is compute (source [0], mask [0];
      35       result_aa [1] is compute (source [1], mask [1].
      36  
      37       result_ab [0] is compute (source [0], mask [2];
      38       result_ab [1] is compute (source [1], mask [3].
      39  
      40       result_ba [0] is compute (source [2], mask [0];
      41       result_ba [1] is compute (source [3], mask [1].
      42  
      43       result_bb [0] is compute (source [2], mask [2];
      44       result_bb [1] is compute (source [3], mask [3].  */
      45  
      46    vector unsigned long long int result_aa = { 0x7e3ca5f0ull, 0x7e3ca5f0ull };
      47    vector unsigned long long int result_ab = { 0xaf7350ecull, 0xec5073afull };
      48    vector unsigned long long int result_ba = { 0xf07e3ca5ull, 0x5a0fe7c3ull };
      49    vector unsigned long long int result_bb = { 0x3af7c50eull, 0xaf7350ecull };
      50  
      51    if (!vectors_equal (do_vec_cfuge (source_a, mask_a), result_aa))
      52      abort ();
      53    if (!vectors_equal (do_vec_cfuge (source_a, mask_b), result_ab))
      54      abort ();
      55    if (!vectors_equal (do_vec_cfuge (source_b, mask_a), result_ba))
      56      abort ();
      57    if (!vectors_equal (do_vec_cfuge (source_b, mask_b), result_bb))
      58      abort ();
      59  
      60    return 0;
      61  }