URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [i386/] [bmi2-pext64-1.c] - Rev 848
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do run { target { bmi2 && { ! ia32 } } } } */ /* { dg-options "-mbmi2 -O2" } */ #include <x86intrin.h> #include "bmi2-check.h" __attribute__((noinline)) unsigned long long calc_pext_u64 (unsigned long long a, unsigned long long mask) { unsigned long long res = 0; int i, k = 0; for (i = 0; i < 64; ++i) if (mask & (1LL << i)) { res |= ((a & (1LL << i)) >> i) << k; ++k; } return res; } static void bmi2_test () { unsigned long long i; unsigned long long src = 0xce7acce7acce7ac; unsigned long long res, res_ref; for (i = 0; i < 5; ++i) { src = src * (i + 1); res_ref = calc_pext_u64 (src, ~(i * 3)); res = _pext_u64 (src, ~(i * 3)); if (res != res_ref) abort(); } }
Go to most recent revision | Compare with Previous | Blame | View Log