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 } } */
29