(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
i386/
bmi-bextr-1.c
       1  /* { dg-do run { target { bmi && { ! ia32 } } } } */
       2  /* { dg-options "-O2 -mbmi -fno-inline" } */
       3  
       4  #include <x86intrin.h>
       5  
       6  #include "bmi-check.h"
       7  
       8  long long calc_bextr_u64 (unsigned long long src1,
       9  			  unsigned long long src2)
      10  {
      11    long long res = 0;
      12    unsigned char start = (src2 & 0xff);
      13    unsigned char len = (int) ((src2 >> 8) & 0xff);
      14    if (start < 64) {
      15      unsigned i;
      16      unsigned last = (start+len) < 64 ? start+len : 64;
      17  
      18      src1 >>= start;
      19      for (i=start; i<last; ++i) {
      20        res |= (src1 & 1) << (i-start);
      21        src1 >>= 1;
      22      }
      23    }
      24  
      25    return res;
      26  }
      27  
      28  static void
      29  bmi_test ()
      30  {
      31    unsigned i;
      32    unsigned char start, len;
      33    unsigned long long src1 = 0xfacec0ffeefacec0;
      34    unsigned long long res, res_ref, src2;
      35  
      36    for (i=0; i<5; ++i) {
      37      start = (i * 1983) % 64;
      38      len = i + (i * 1983) % 64;
      39  
      40      src1 = src1 * 3;
      41      src2 = start | (((long long)len) << 8);
      42  
      43      res_ref = calc_bextr_u64 (src1, src2);
      44      res = __bextr_u64 (src1, src2);
      45  
      46      if (res != res_ref)
      47        abort();
      48    }
      49  }