1  /* Test the vmulx_lane_f32 AArch64 SIMD intrinsic.  */
       2  
       3  /* { dg-do run } */
       4  /* { dg-options "-save-temps -O3" } */
       5  
       6  #include "arm_neon.h"
       7  
       8  extern void abort (void);
       9  
      10  float32x2_t __attribute__ ((noinline))
      11  test_vmulx_lane0_f32 (float32x2_t vec1_1, float32x2_t vec1_2)
      12  {
      13    return vmulx_lane_f32 (vec1_1, vec1_2, 0);
      14  }
      15  
      16  float32x2_t __attribute__ ((noinline))
      17  test_vmulx_lane1_f32 (float32x2_t vec1_1, float32x2_t vec1_2)
      18  {
      19    return vmulx_lane_f32 (vec1_1, vec1_2, 1);
      20  }
      21  
      22  void
      23  test_case (float32_t v1[2], float32_t v2[2], float32_t e1[2], float32_t e2[2])
      24  {
      25    int i;
      26    float32x2_t vec1_1 = vld1_f32 (v1);
      27    float32x2_t vec1_2 = vld1_f32 (v2);
      28  
      29  
      30    float32x2_t actual1 = test_vmulx_lane0_f32 (vec1_1, vec1_2);
      31    float32_t actual1_1[2];
      32    vst1_f32 (actual1_1, actual1);
      33  
      34    for (i = 0; i < 2; ++i)
      35      if (actual1_1[i] != e1[i])
      36        abort ();
      37  
      38    float32x2_t actual2 = test_vmulx_lane1_f32 (vec1_1, vec1_2);
      39    float32_t actual2_1[2];
      40    vst1_f32 (actual2_1, actual2);
      41  
      42    for (i = 0; i < 2; ++i)
      43      if (actual2_1[i] != e2[i])
      44        abort ();
      45  }
      46  
      47  int
      48  main (void)
      49  {
      50    float32_t v1 = 3.14159265359;
      51    float32_t v2 = 1.383894;
      52    float32_t v3 = -2.71828;
      53    float32_t v4 = -3.4891931;
      54  
      55    float32_t v1_1[] = {v1, v2};
      56    float32_t v1_2[] = {v3, v4};
      57    float32_t e1_1[] = {v1 * v3, v2 * v3};
      58    float32_t e1_2[] = {v1 * v4, v2 * v4};
      59    test_case (v1_1, v1_2, e1_1, e1_2);
      60  
      61    float32_t v2_1[] = {0, -0.0};
      62    float32_t v2_2[] = {__builtin_huge_valf (), -__builtin_huge_valf ()};
      63    float32_t e2_1[] = {2.0, -2.0};
      64    float32_t e2_2[] = {-2.0, 2.0};
      65    test_case (v2_1, v2_2, e2_1, e2_2);
      66  
      67    return 0;
      68  }
      69  /* { dg-final { scan-assembler-times "fmulx\[ \t\]+\[vV\]\[0-9\]+\.2\[sS\], ?\[vV\]\[0-9\]+\.2\[sS\], ?\[vV\]\[0-9\]+\.\[sS\]\\\[0\\\]\n" 1 } } */
      70  /* { dg-final { scan-assembler-times "fmulx\[ \t\]+\[vV\]\[0-9\]+\.2\[sS\], ?\[vV\]\[0-9\]+\.2\[sS\], ?\[vV\]\[0-9\]+\.\[sS\]\\\[1\\\]\n" 1 } } */