diff options
author | Kirill Yukhin <kirill.yukhin@intel.com> | 2013-07-24 17:01:12 +0000 |
---|---|---|
committer | Kirill Yukhin <kirill.yukhin@intel.com> | 2013-07-24 17:01:12 +0000 |
commit | e442676a7be23de8c09b266b06175f4fe1bc9186 (patch) | |
tree | 20ee2621a2e84b6c237ee7958bf5c392d68a6c85 /gcc/testsuite/gcc.target/i386/avx512f-i64scatterps512-2.c | |
parent | 5a927cf7159f9943c302fd96d732fd227fdc4b20 (diff) |
[AVX512] Intel (R) AVX-512 and SHA extensions support initial version.avx512
git-svn-id: https://gcc.gnu.org/svn/gcc/branches/avx512@201219 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gcc.target/i386/avx512f-i64scatterps512-2.c')
-rw-r--r-- | gcc/testsuite/gcc.target/i386/avx512f-i64scatterps512-2.c | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.target/i386/avx512f-i64scatterps512-2.c b/gcc/testsuite/gcc.target/i386/avx512f-i64scatterps512-2.c new file mode 100644 index 00000000000..4a74d4667ba --- /dev/null +++ b/gcc/testsuite/gcc.target/i386/avx512f-i64scatterps512-2.c @@ -0,0 +1,52 @@ +/* { dg-do run } */ +/* { dg-options "-mavx512f -O2" } */ +/* { dg-require-effective-target avx512f } */ + +#include "avx512f-check.h" + +#define SCALE 2 + +static void +compute_scatterqps (__mmask8 m8, long long *idx, + float *src, int scale, float *r) +{ + int i; + + for (i = 0; i < 8; i++) + { + if (m8 & (1 << i)) + *(float *) (((unsigned char *) r) + idx[i] * scale) = src[i]; + } +} + +static void +avx512f_test (void) +{ + int i; + union256 src; + union512i_q idx; + float res[8] = { 0.0 }; + float res_ref[8] = { 0.0 }; + __mmask8 m8 = 0xC5; + + for (i = 0; i < 8; i++) + { + src.a[i] = 2.718281828459045 * (i + 1) * (i + 2); + + /* About to gather in reverse order, + divide by 2 to demonstrate scale */ + idx.a[i] = (32 - (i + 1) * 4) >> 1; + } + + _mm512_mask_i64scatter_ps (res, m8, idx.x, src.x, SCALE); + compute_scatterqps (m8, idx.a, src.a, SCALE, res_ref); + + if (checkVf (res, res_ref, 8)) + abort (); + + _mm512_i64scatter_ps (res, idx.x, src.x, SCALE); + compute_scatterqps (0xFF, idx.a, src.a, SCALE, res_ref); + + if (checkVf (res, res_ref, 8)) + abort (); +} |