1  /* { dg-do compile } */
       2  /* { dg-options "-O2 -ftree-vectorize" } */
       3  
       4  #define DEF_LOOP(TYPE, ABS, NAME, OP)			\
       5    void							\
       6    test_##TYPE##_##NAME (TYPE *restrict r,		\
       7  			TYPE *restrict a,		\
       8  			TYPE *restrict b, int n)	\
       9    {							\
      10      for (int i = 0; i < n; ++i)				\
      11        r[i] = ABS (a[i]) OP ABS (b[i]) ? 1.0 : 0.0;	\
      12    }
      13  
      14  #define TEST_TYPE(T, TYPE, ABS)			\
      15    T (TYPE, ABS, lt, <)				\
      16    T (TYPE, ABS, le, <=)				\
      17    T (TYPE, ABS, ge, >=)				\
      18    T (TYPE, ABS, gt, >)
      19  
      20  #define TEST_ALL(T)				\
      21    TEST_TYPE (T, _Float16, __builtin_fabsf16)	\
      22    TEST_TYPE (T, float, __builtin_fabsf)		\
      23    TEST_TYPE (T, double, __builtin_fabs)
      24  
      25  TEST_ALL (DEF_LOOP)
      26  
      27  /* { dg-final { scan-assembler-times {\tfac[lg]t\tp[0-9]+\.h, p[0-7]/z, z[0-9]+\.h, z[0-9]+\.h\n} 2 } } */
      28  /* { dg-final { scan-assembler-times {\tfac[lg]e\tp[0-9]+\.h, p[0-7]/z, z[0-9]+\.h, z[0-9]+\.h\n} 2 } } */
      29  
      30  /* { dg-final { scan-assembler-times {\tfac[lg]t\tp[0-9]+\.s, p[0-7]/z, z[0-9]+\.s, z[0-9]+\.s\n} 2 } } */
      31  /* { dg-final { scan-assembler-times {\tfac[lg]e\tp[0-9]+\.s, p[0-7]/z, z[0-9]+\.s, z[0-9]+\.s\n} 2 } } */
      32  
      33  /* { dg-final { scan-assembler-times {\tfac[lg]t\tp[0-9]+\.d, p[0-7]/z, z[0-9]+\.d, z[0-9]+\.d\n} 2 } } */
      34  /* { dg-final { scan-assembler-times {\tfac[lg]e\tp[0-9]+\.d, p[0-7]/z, z[0-9]+\.d, z[0-9]+\.d\n} 2 } } */