gcc/testsuite/gcc.dg/pr22356-1.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-O2 -std=gnu99" } */
   3 typedef _Complex float GFC_COMPLEX_4;
   4 void product_c4 (GFC_COMPLEX_4 *src, GFC_COMPLEX_4 *dest, int len)
   5 {
   6   int n;
   7   GFC_COMPLEX_4 result;
   8   for (n = 0; n < len; n++, src += 1)
   9     result *= *src;
  10   *dest = result;
  11 }