1 /* { dg-do run } */
2 /* { dg-options "-O3 -fno-inline" } */
3
4 #include <arm_neon.h>
5
6 extern void abort (void);
7
8 #define VARIANTS(VARIANT, STRUCT) \
9 VARIANT (uint8, , 8, _u8, 6, STRUCT) \
10 VARIANT (uint16, , 4, _u16, 3, STRUCT) \
11 VARIANT (uint32, , 2, _u32, 1, STRUCT) \
12 VARIANT (uint64, , 1, _u64, 0, STRUCT) \
13 VARIANT (int8, , 8, _s8, 5, STRUCT) \
14 VARIANT (int16, , 4, _s16, 2, STRUCT) \
15 VARIANT (int32, , 2, _s32, 0, STRUCT) \
16 VARIANT (int64, , 1, _s64, 0, STRUCT) \
17 VARIANT (poly8, , 8, _p8, 7, STRUCT) \
18 VARIANT (poly16, , 4, _p16, 1, STRUCT) \
19 VARIANT (float32, , 2, _f32, 1, STRUCT) \
20 VARIANT (float64, , 1, _f64, 0, STRUCT) \
21 VARIANT (uint8, q, 16, _u8, 14, STRUCT) \
22 VARIANT (uint16, q, 8, _u16, 4, STRUCT) \
23 VARIANT (uint32, q, 4, _u32, 3, STRUCT) \
24 VARIANT (uint64, q, 2, _u64, 0, STRUCT) \
25 VARIANT (int8, q, 16, _s8, 13, STRUCT) \
26 VARIANT (int16, q, 8, _s16, 6, STRUCT) \
27 VARIANT (int32, q, 4, _s32, 2, STRUCT) \
28 VARIANT (int64, q, 2, _s64, 1, STRUCT) \
29 VARIANT (poly8, q, 16, _p8, 12, STRUCT) \
30 VARIANT (poly16, q, 8, _p16, 5, STRUCT) \
31 VARIANT (float32, q, 4, _f32, 1, STRUCT)\
32 VARIANT (float64, q, 2, _f64, 0, STRUCT)
33
34 #define TESTMETH(BASE, Q, ELTS, SUFFIX, LANE, STRUCT) \
35 int \
36 test_vst##STRUCT##Q##_lane##SUFFIX (const BASE##_t *data) \
37 { \
38 BASE##x##ELTS##x##STRUCT##_t vectors; \
39 for (int i = 0; i < STRUCT; i++, data += ELTS) \
40 vectors.val[i] = vld1##Q##SUFFIX (data); \
41 BASE##_t temp[STRUCT]; \
42 vst##STRUCT##Q##_lane##SUFFIX (temp, vectors, LANE); \
43 for (int i = 0; i < STRUCT; i++) \
44 { \
45 if (temp[i] != vget##Q##_lane##SUFFIX (vectors.val[i], LANE)) \
46 return 1; \
47 } \
48 return 0; \
49 }
50
51 /* Tests of vst2_lane and vst2q_lane. */
52 VARIANTS (TESTMETH, 2)
53 /* Tests of vst3_lane and vst3q_lane. */
54 VARIANTS (TESTMETH, 3)
55 /* Tests of vst4_lane and vst4q_lane. */
56 VARIANTS (TESTMETH, 4)
57
58 #define CHECK(BASE, Q, ELTS, SUFFIX, LANE, STRUCT) \
59 if (test_vst##STRUCT##Q##_lane##SUFFIX ((const BASE##_t *)orig_data)) \
60 abort ();
61
62 int
main(int argc,char ** argv)63 main (int argc, char **argv)
64 {
65 /* Original data for all vector formats. */
66 uint64_t orig_data[8] = {0x1234567890abcdefULL, 0x13579bdf02468aceULL,
67 0x012389ab4567cdefULL, 0xfeeddadacafe0431ULL,
68 0x1032547698badcfeULL, 0xbadbadbadbad0badULL,
69 0x0102030405060708ULL, 0x0f0e0d0c0b0a0908ULL};
70
71 VARIANTS (CHECK, 2);
72 VARIANTS (CHECK, 3);
73 VARIANTS (CHECK, 4);
74 return 0;
75 }
76