1 /* { dg-do assemble { target aarch64_asm_sve_ok } } */
2 /* { dg-options "-O3 --save-temps" } */
3
4 #include <stdint.h>
5
6 #define DO_REGREG_OPS(TYPE, OP, NAME) \
7 void varith_##TYPE##_##NAME (TYPE *dst, TYPE *src, int count) \
8 { \
9 for (int i = 0; i < count; ++i) \
10 dst[i] = dst[i] OP src[i]; \
11 }
12
13 #define DO_IMMEDIATE_OPS(VALUE, TYPE, OP, NAME) \
14 void varithimm_##NAME##_##TYPE (TYPE *dst, int count) \
15 { \
16 for (int i = 0; i < count; ++i) \
17 dst[i] = dst[i] OP VALUE; \
18 }
19
20 #define DO_ARITH_OPS(TYPE, OP, NAME) \
21 DO_REGREG_OPS (TYPE, OP, NAME); \
22 DO_IMMEDIATE_OPS (0, TYPE, OP, NAME ## 0); \
23 DO_IMMEDIATE_OPS (86, TYPE, OP, NAME ## 86); \
24 DO_IMMEDIATE_OPS (109, TYPE, OP, NAME ## 109); \
25 DO_IMMEDIATE_OPS (141, TYPE, OP, NAME ## 141); \
26 DO_IMMEDIATE_OPS (-1, TYPE, OP, NAME ## minus1); \
27 DO_IMMEDIATE_OPS (-110, TYPE, OP, NAME ## minus110); \
28 DO_IMMEDIATE_OPS (-141, TYPE, OP, NAME ## minus141);
29
30 DO_ARITH_OPS (int8_t, *, mul)
31 DO_ARITH_OPS (int16_t, *, mul)
32 DO_ARITH_OPS (int32_t, *, mul)
33 DO_ARITH_OPS (int64_t, *, mul)
34
35 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.b, p[0-7]/m, z[0-9]+\.b, z[0-9]+\.b\n} 1 } } */
36 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #86\n} 1 } } */
37 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #109\n} 1 } } */
38 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #115\n} 1 } } */
39 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #141\n} } } */
40 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #-1\n} } } */
41 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #-110\n} 1 } } */
42 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #-115\n} 1 } } */
43 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.b, z[0-9]+\.b, #-141\n} } } */
44
45 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.h, p[0-7]/m, z[0-9]+\.h, z[0-9]+\.h\n} 3 } } */
46 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.h, z[0-9]+\.h, #86\n} 1 } } */
47 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.h, z[0-9]+\.h, #109\n} 1 } } */
48 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.h, z[0-9]+\.h, #141\n} } } */
49 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.h, z[0-9]+\.h, #-110\n} 1 } } */
50 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.h, z[0-9]+\.h, #-141\n} } } */
51
52 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.s, p[0-7]/m, z[0-9]+\.s, z[0-9]+\.s\n} 3 } } */
53 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.s, z[0-9]+\.s, #86\n} 1 } } */
54 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.s, z[0-9]+\.s, #109\n} 1 } } */
55 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.s, z[0-9]+\.s, #141\n} } } */
56 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.s, z[0-9]+\.s, #-110\n} 1 } } */
57 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.s, z[0-9]+\.s, #-141\n} } } */
58
59 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.d, p[0-7]/m, z[0-9]+\.d, z[0-9]+\.d\n} 3 } } */
60 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.d, z[0-9]+\.d, #86\n} 1 } } */
61 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.d, z[0-9]+\.d, #109\n} 1 } } */
62 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.d, z[0-9]+\.d, #141\n} } } */
63 /* { dg-final { scan-assembler-times {\tmul\tz[0-9]+\.d, z[0-9]+\.d, #-110\n} 1 } } */
64 /* { dg-final { scan-assembler-not {\tmul\tz[0-9]+\.d, z[0-9]+\.d, #-141\n} } } */