URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [i386/] [avx2-vpmuludq-2.c] - Rev 695
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do run } */ /* { dg-options "-mavx2 -O2" } */ /* { dg-require-effective-target avx2 } */ #include "avx2-check.h" static void compute_pmuludq256 (unsigned int *s1, unsigned int *s2, unsigned long long *r) { int i; for (i = 0; i < 4; i++) r[i] = s1[i * 2] * s2[i * 2]; } static void avx2_test (void) { union256i_d s1, s2; union256i_q res; unsigned long long res_ref[4]; int i, j; int fail = 0; for (i = 0; i < 10; i++) { for (j = 0; j < 8; j++) { s1.a[j] = i * j; s2.a[j] = j + 20; } res.x = _mm256_mul_epu32 (s1.x, s2.x); compute_pmuludq256 (s1.a, s2.a, res_ref); fail += check_union256i_q (res, res_ref); } if (fail != 0) abort (); }
Go to most recent revision | Compare with Previous | Blame | View Log