| /* { dg-do compile } */ |
| /* { dg-options "-O2 -ftree-vectorize" } */ |
| |
| #define DEF_LOOP(TYPE, ABS, NAME, OP) \ |
| void \ |
| test_##TYPE##_##NAME (TYPE *restrict r, \ |
| TYPE *restrict a, \ |
| TYPE *restrict b, int n) \ |
| { \ |
| for (int i = 0; i < n; ++i) \ |
| r[i] = ABS (a[i]) OP ABS (b[i]) ? 1.0 : 0.0; \ |
| } |
| |
| #define TEST_TYPE(T, TYPE, ABS) \ |
| T (TYPE, ABS, lt, <) \ |
| T (TYPE, ABS, le, <=) \ |
| T (TYPE, ABS, ge, >=) \ |
| T (TYPE, ABS, gt, >) |
| |
| #define TEST_ALL(T) \ |
| TEST_TYPE (T, _Float16, __builtin_fabsf16) \ |
| TEST_TYPE (T, float, __builtin_fabsf) \ |
| TEST_TYPE (T, double, __builtin_fabs) |
| |
| TEST_ALL (DEF_LOOP) |
| |
| /* { 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 } } */ |
| /* { 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 } } */ |
| |
| /* { 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 } } */ |
| /* { 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 } } */ |
| |
| /* { 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 } } */ |
| /* { 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 } } */ |
