(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
aarch64/
sve/
copysign_1_run.c
       1  /* { dg-do run { target { aarch64_sve_hw } } } */
       2  /* { dg-options "-O2 -ftree-vectorize -ffast-math" } */
       3  
       4  #include "copysign_1.c"
       5  
       6  extern void abort ();
       7  
       8  #define N 16
       9  _Float16 ah[N] = { -0.1f16, -3.2f16, -6.3f16, -9.4f16,
      10    -12.5f16, -15.6f16, -18.7f16, -21.8f16,
      11    24.9f16, 27.1f16, 30.2f16, 33.3f16,
      12    36.4f16, 39.5f16, 42.6f16, 45.7f
      13  };
      14  
      15  _Float16 bh[N] = { -1.2f16, 3.4f16, -5.6f16, 7.8f16,
      16    -9.0f16, 1.0f16, -2.0f16, 3.0f16,
      17    -4.0f16, -5.0f16, 6.0f16, 7.0f16,
      18    -8.0f16, -9.0f16, 10.0f16, 11.0f16
      19  };
      20  
      21  _Float16 rh[N];
      22  
      23  float a[N] = { -0.1f, -3.2f, -6.3f, -9.4f,
      24    -12.5f, -15.6f, -18.7f, -21.8f,
      25    24.9f, 27.1f, 30.2f, 33.3f,
      26    36.4f, 39.5f, 42.6f, 45.7f
      27  };
      28  
      29  float b[N] = { -1.2f, 3.4f, -5.6f, 7.8f,
      30    -9.0f, 1.0f, -2.0f, 3.0f,
      31    -4.0f, -5.0f, 6.0f, 7.0f,
      32    -8.0f, -9.0f, 10.0f, 11.0f
      33  };
      34  
      35  float r[N];
      36  
      37  double ad[N] = { -0.1d, -3.2d, -6.3d, -9.4d,
      38    -12.5d, -15.6d, -18.7d, -21.8d,
      39    24.9d, 27.1d, 30.2d, 33.3d,
      40    36.4d, 39.5d, 42.6d, 45.7d
      41  };
      42  
      43  double bd[N] = { -1.2d, 3.4d, -5.6d, 7.8d,
      44    -9.0d, 1.0d, -2.0d, 3.0d,
      45    -4.0d, -5.0d, 6.0d, 7.0d,
      46    -8.0d, -9.0d, 10.0d, 11.0d
      47  };
      48  
      49  double rd[N];
      50  
      51  int
      52  main (void)
      53  {
      54    int i;
      55  
      56    copysign_half (ah, bh, rh, N);
      57    for (i = 0; i < N; i++)
      58      if (rh[i] != __builtin_copysignf16 (ah[i], bh[i]))
      59        abort ();
      60  
      61    copysign_float (a, b, r, N);
      62    for (i = 0; i < N; i++)
      63      if (r[i] != __builtin_copysignf (a[i], b[i]))
      64        abort ();
      65  
      66    copysign_double (ad, bd, rd, N);
      67    for (i = 0; i < N; i++)
      68      if (rd[i] != __builtin_copysign (ad[i], bd[i]))
      69        abort ();
      70  
      71    return 0;
      72  }