1  /* { dg-do compile } */
       2  /* { dg-options "-O2 -ftree-vectorize" } */
       3  
       4  #define NUM_ELEMS(TYPE) ((int)(5 * (256 / sizeof (TYPE)) + 3))
       5  
       6  #define DEF_REDUC_PLUS(TYPE)			\
       7    TYPE __attribute__ ((noinline, noclone))	\
       8    reduc_plus_##TYPE (TYPE *a, TYPE *b)		\
       9    {						\
      10      TYPE r = 0, q = 3;				\
      11      for (int i = 0; i < NUM_ELEMS (TYPE); i++)	\
      12        {						\
      13  	r += a[i];				\
      14  	q -= b[i];				\
      15        }						\
      16      return r * q;				\
      17    }
      18  
      19  #define TEST_ALL(T) \
      20    T (_Float16) \
      21    T (float) \
      22    T (double)
      23  
      24  TEST_ALL (DEF_REDUC_PLUS)
      25  
      26  /* { dg-final { scan-assembler-times {\tfadda\th[0-9]+, p[0-7], h[0-9]+, z[0-9]+\.h} 2 } } */
      27  /* { dg-final { scan-assembler-times {\tfadda\ts[0-9]+, p[0-7], s[0-9]+, z[0-9]+\.s} 2 } } */
      28  /* { dg-final { scan-assembler-times {\tfadda\td[0-9]+, p[0-7], d[0-9]+, z[0-9]+\.d} 2 } } */