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, STRUCT)	\
10 VARIANT (uint16, , 4, _u16, STRUCT)	\
11 VARIANT (uint32, , 2, _u32, STRUCT)	\
12 VARIANT (uint64, , 1, _u64, STRUCT)	\
13 VARIANT (int8, , 8, _s8, STRUCT)	\
14 VARIANT (int16, , 4, _s16, STRUCT)	\
15 VARIANT (int32, , 2, _s32, STRUCT)	\
16 VARIANT (int64, , 1, _s64, STRUCT)	\
17 VARIANT (poly8, , 8, _p8, STRUCT)	\
18 VARIANT (poly16, , 4, _p16, STRUCT)	\
19 VARIANT (float16, , 4, _f16, STRUCT)	\
20 VARIANT (float32, , 2, _f32, STRUCT)	\
21 VARIANT (float64, , 1, _f64, STRUCT)	\
22 VARIANT (uint8, q, 16, _u8, STRUCT)	\
23 VARIANT (uint16, q, 8, _u16, STRUCT)	\
24 VARIANT (uint32, q, 4, _u32, STRUCT)	\
25 VARIANT (uint64, q, 2, _u64, STRUCT)	\
26 VARIANT (int8, q, 16, _s8, STRUCT)	\
27 VARIANT (int16, q, 8, _s16, STRUCT)	\
28 VARIANT (int32, q, 4, _s32, STRUCT)	\
29 VARIANT (int64, q, 2, _s64, STRUCT)	\
30 VARIANT (poly8, q, 16, _p8, STRUCT)	\
31 VARIANT (poly16, q, 8, _p16, STRUCT)	\
32 VARIANT (float16, q, 8, _f16, STRUCT)	\
33 VARIANT (float32, q, 4, _f32, STRUCT)	\
34 VARIANT (float64, q, 2, _f64, STRUCT)
35 
36 #define TESTMETH(BASE, Q, ELTS, SUFFIX, STRUCT)	\
37 int								\
38 test_vld##STRUCT##Q##_dup##SUFFIX (const BASE##_t *data)	\
39 {								\
40   BASE##_t temp[ELTS];						\
41   BASE##x##ELTS##x##STRUCT##_t vectors =			\
42 			   vld##STRUCT##Q##_dup##SUFFIX (data); \
43   int i,j;							\
44   for (i = 0; i < STRUCT; i++)					\
45     {								\
46       vst1##Q##SUFFIX (temp, vectors.val[i]);			\
47       for (j = 0; j < ELTS; j++)				\
48         if (temp[j] != data[i])					\
49           return 1;						\
50     }								\
51   return 0;							\
52 }
53 
54 /* Tests of vld2_dup and vld2q_dup.  */
55 VARIANTS (TESTMETH, 2)
56 /* Tests of vld3_dup and vld3q_dup.  */
57 VARIANTS (TESTMETH, 3)
58 /* Tests of vld4_dup and vld4q_dup.  */
59 VARIANTS (TESTMETH, 4)
60 
61 #define CHECK(BASE, Q, ELTS, SUFFIX, STRUCT)			\
62   if (test_vld##STRUCT##Q##_dup##SUFFIX (BASE ##_data) != 0)	\
63     abort ();
64 
65 int
main(int argc,char ** argv)66 main (int argc, char **argv)
67 {
68   uint8_t uint8_data[4] = { 7, 11, 13, 17 };
69   uint16_t uint16_data[4] = { 257, 263, 269, 271 };
70   uint32_t uint32_data[4] = { 65537, 65539, 65543, 65551 };
71   uint64_t uint64_data[4] = { 0xdeadbeefcafebabeULL, 0x0123456789abcdefULL,
72 			      0xfedcba9876543210LL, 0xdeadbabecafebeefLL };
73   int8_t int8_data[4] = { -1, 3, -5, 7 };
74   int16_t int16_data[4] = { 257, -259, 261, -263 };
75   int32_t int32_data[4] = { 123456789, -987654321, -135792468, 975318642 };
76   int64_t *int64_data = (int64_t *)uint64_data;
77   poly8_t poly8_data[4] = { 0, 7, 13, 18, };
78   poly16_t poly16_data[4] = { 11111, 2222, 333, 44 };
79   float16_t float16_data[4] = { 1.0625, 3.125, 0.03125, 7.75 };
80   float32_t float32_data[4] = { 3.14159, 2.718, 1.414, 100.0 };
81   float64_t float64_data[4] = { 1.010010001, 12345.6789, -9876.54321, 1.618 };
82 
83   VARIANTS (CHECK, 2);
84   VARIANTS (CHECK, 3);
85   VARIANTS (CHECK, 4);
86   return 0;
87 }
88