gcc/testsuite/gcc.target/i386/avx512f-vpmullq-2.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O2 -mavx512dq" } */
   3 /* { dg-require-effective-target avx512dq } */
   4
   5 #define AVX512DQ
   6 #include "avx512f-helper.h"
   7
   8 #define SIZE (AVX512F_LEN / 64)
   9 #include "avx512f-mask-type.h"
  10
  11 void
  12 CALC (long long *src1, long long *src2, long long *dst)
  13 {
  14   int i;
  15
  16   for (i = 0; i < SIZE; i++)
  17     dst[i] = src1[i] * src2[i];
  18 }
  19
  20 void
  21 TEST (void)
  22 {
  23   UNION_TYPE (AVX512F_LEN, i_q) src1, src2, dst1, dst2;
  24   long long dst_ref[SIZE];
  25   int i;
  26   MASK_TYPE mask = MASK_VALUE;
  27
  28   for (i = 0; i < SIZE; i++)
  29     {
  30       src1.a[i] = i + 50;
  31       src2.a[i] = i + 100;
  32       dst2.a[i] = DEFAULT_VALUE;
  33     }
  34
  35   dst1.x = INTRINSIC (_mullox_epi64) (src1.x, src2.x);
  36   dst2.x = INTRINSIC (_mask_mullox_epi64) (dst2.x, mask, src1.x, src2.x);
  37   CALC (src1.a, src2.a, dst_ref);
  38
  39   if (UNION_CHECK (AVX512F_LEN, i_q) (dst1, dst_ref))
  40     abort ();
  41
  42   MASK_MERGE (i_q) (dst_ref, mask, SIZE);
  43   if (UNION_CHECK (AVX512F_LEN, i_q) (dst2, dst_ref))
  44     abort ();
  45 }