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)			\
       9  VARIANT (uint8_t, , 8, uint8x8_t, _u8, 5)	\
      10  VARIANT (uint16_t, , 4, uint16x4_t, _u16, 3)	\
      11  VARIANT (uint32_t, , 2, uint32x2_t, _u32, 1)	\
      12  VARIANT (uint64_t, , 1, uint64x1_t, _u64, 0)	\
      13  VARIANT (int8_t, , 8, int8x8_t, _s8, 6)		\
      14  VARIANT (int16_t, , 4, int16x4_t, _s16, 2)	\
      15  VARIANT (int32_t, , 2, int32x2_t, _s32, 0)	\
      16  VARIANT (int64_t, , 1, int64x1_t, _s64, 0)	\
      17  VARIANT (poly8_t, , 8, poly8x8_t, _p8, 6)	\
      18  VARIANT (poly16_t, , 4, poly16x4_t, _p16, 2)	\
      19  VARIANT (float16_t, , 4, float16x4_t, _f16, 3)	\
      20  VARIANT (float32_t, , 2, float32x2_t, _f32, 1)	\
      21  VARIANT (float64_t, , 1, float64x1_t, _f64, 0)	\
      22  VARIANT (uint8_t, q, 16, uint8x16_t, _u8, 11)	\
      23  VARIANT (uint16_t, q, 8, uint16x8_t, _u16, 7)	\
      24  VARIANT (uint32_t, q, 4, uint32x4_t, _u32, 2)	\
      25  VARIANT (uint64_t, q, 2, uint64x2_t, _u64, 1)	\
      26  VARIANT (int8_t, q, 16, int8x16_t, _s8, 13)	\
      27  VARIANT (int16_t, q, 8, int16x8_t, _s16, 5)	\
      28  VARIANT (int32_t, q, 4, int32x4_t, _s32, 3)	\
      29  VARIANT (int64_t, q, 2, int64x2_t, _s64, 0)	\
      30  VARIANT (poly8_t, q, 16, poly8x16_t, _p8, 14)	\
      31  VARIANT (poly16_t, q, 8, poly16x8_t, _p16, 6)	\
      32  VARIANT (float16_t, q, 8, float16x8_t, _f16, 6)	\
      33  VARIANT (float32_t, q, 4, float32x4_t, _f32, 2) \
      34  VARIANT (float64_t, q, 2, float64x2_t, _f64, 1)
      35  
      36  #define TESTMETH(BASETYPE, Q, NUM, TYPE, SUFFIX, INDEX)	\
      37  int							\
      38  test_vset_lane ##Q##SUFFIX (BASETYPE *data)		\
      39  {							\
      40    BASETYPE temp [NUM];					\
      41    TYPE vec = vld1##Q##SUFFIX (data);			\
      42    TYPE vec2;						\
      43    BASETYPE changed = data[INDEX] - INDEX;		\
      44    int check;						\
      45    vec = vset##Q##_lane##SUFFIX (changed, vec, INDEX);	\
      46    asm volatile ("orr %0.16b, %1.16b, %1.16b"		\
      47  		: "=w"(vec2) : "w" (vec) : );		\
      48    vst1##Q##SUFFIX (temp, vec2);				\
      49    for (check = 0; check < NUM; check++)			\
      50      {							\
      51        BASETYPE desired = data[check];			\
      52        if (check==INDEX) desired = changed;		\
      53        if (temp[check] != desired)			\
      54          return 1;					\
      55      }							\
      56    return 0;						\
      57  }
      58  
      59  VARIANTS (TESTMETH)
      60  
      61  #define CHECK(BASETYPE, Q, NUM, TYPE, SUFFIX, INDEX)		\
      62    if (test_vset_lane##Q##SUFFIX (BASETYPE ## _ ## data) != 0)	\
      63      abort ();
      64  
      65  int
      66  main (int argc, char **argv)
      67  {
      68    uint8_t uint8_t_data[16] =
      69        { 1, 2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47 };
      70    uint16_t uint16_t_data[8] = { 1, 22, 333, 4444, 55555, 6666, 777, 88 };
      71    uint32_t uint32_t_data[4] = { 65537, 11, 70000, 23 };
      72    uint64_t uint64_t_data[2] = { 0xdeadbeefcafebabeULL, 0x0123456789abcdefULL };
      73    int8_t int8_t_data[16] =
      74        { -1, -3, -5, -7, 9, -11, -13, 15, -17, -19, 21, -23, 25, 27, -29, -31 };
      75    int16_t int16_t_data[8] = { -17, 19, 3, -999, 44048, 505, 9999, 1000};
      76    int32_t int32_t_data[4] = { 123456789, -987654321, -135792468, 975318642 };
      77    int64_t int64_t_data[2] = {0xfedcba9876543210LL, 0xdeadbabecafebeefLL };
      78    poly8_t poly8_t_data[16] =
      79        { 0, 7, 13, 18, 22, 25, 27, 28, 29, 31, 34, 38, 43, 49, 56, 64 };
      80    poly16_t poly16_t_data[8] = { 11111, 2222, 333, 44, 5, 65432, 54321, 43210 };
      81    float16_t float16_t_data[8] = { 1.25, 4.5, 7.875, 2.3125, 5.675, 8.875,
      82        3.6875, 6.75};
      83  
      84    float32_t float32_t_data[4] = { 3.14159, 2.718, 1.414, 100.0 };
      85    float64_t float64_t_data[2] = { 1.01001000100001, 12345.6789 };
      86  
      87    VARIANTS (CHECK);
      88  
      89    return 0;
      90  }