projects / thirdparty / glibc.git / blame
| Commit | Line | Data |
|---|---|---|
| cd94326a JR |
1 | /* Scalar wrappers for double-precision SVE vector math functions. |
| 2 | ||
| 3 | Copyright (C) 2023 Free Software Foundation, Inc. | |
| 4 | This file is part of the GNU C Library. | |
| 5 | ||
| 6 | The GNU C Library is free software; you can redistribute it and/or | |
| 7 | modify it under the terms of the GNU Lesser General Public | |
| 8 | License as published by the Free Software Foundation; either | |
| 9 | version 2.1 of the License, or (at your option) any later version. | |
| 10 | ||
| 11 | The GNU C Library is distributed in the hope that it will be useful, | |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| 14 | Lesser General Public License for more details. | |
| 15 | ||
| 16 | You should have received a copy of the GNU Lesser General Public | |
| 17 | License along with the GNU C Library; if not, see | |
| 18 | <https://www.gnu.org/licenses/>. */ | |
| 19 | ||
| 20 | #include <arm_sve.h> | |
| 21 | ||
| 22 | #include "test-double-sve.h" | |
| 23 | ||
| 24 | /* Wrapper from scalar to SVE function. Cannot just use VECTOR_WRAPPER due to | |
| 25 | predication. */ | |
| 26 | #define SVE_VECTOR_WRAPPER(scalar_func, vector_func) \ | |
| 27 | extern VEC_TYPE vector_func (VEC_TYPE, svbool_t); \ | |
| 28 | FLOAT scalar_func (FLOAT x) \ | |
| 29 | { \ | |
| 30 | VEC_TYPE mx = svdup_n_f64 (x); \ | |
| 31 | VEC_TYPE mr = vector_func (mx, svptrue_b64 ()); \ | |
| 32 | return svlastb_f64 (svptrue_b64 (), mr); \ | |
| 33 | } | |
| 34 | ||
| b07038c5 JR |
35 | #define SVE_VECTOR_WRAPPER_ff(scalar_func, vector_func) \ |
| 36 | extern VEC_TYPE vector_func (VEC_TYPE, VEC_TYPE, svbool_t); \ | |
| 37 | FLOAT scalar_func (FLOAT x, FLOAT y) \ | |
| 38 | { \ | |
| 39 | VEC_TYPE mx = svdup_n_f64 (x); \ | |
| 40 | VEC_TYPE my = svdup_n_f64 (y); \ | |
| 41 | VEC_TYPE mr = vector_func (mx, my, svptrue_b64 ()); \ | |
| 42 | return svlastb_f64 (svptrue_b64 (), mr); \ | |
| 43 | } | |
| 44 | ||
| b5d23367 | 45 | SVE_VECTOR_WRAPPER (acos_sve, _ZGVsMxv_acos) |
| 9bed4984 | 46 | SVE_VECTOR_WRAPPER (asin_sve, _ZGVsMxv_asin) |
| d30c39f8 | 47 | SVE_VECTOR_WRAPPER (atan_sve, _ZGVsMxv_atan) |
| b07038c5 | 48 | SVE_VECTOR_WRAPPER_ff (atan2_sve, _ZGVsMxvv_atan2) |
| cd94326a | 49 | SVE_VECTOR_WRAPPER (cos_sve, _ZGVsMxv_cos) |
| 4a9392ff | 50 | SVE_VECTOR_WRAPPER (exp_sve, _ZGVsMxv_exp) |
| 31aaf6fe | 51 | SVE_VECTOR_WRAPPER (exp10_sve, _ZGVsMxv_exp10) |
| b39e9db5 | 52 | SVE_VECTOR_WRAPPER (exp2_sve, _ZGVsMxv_exp2) |
| 78c01a5c | 53 | SVE_VECTOR_WRAPPER (log_sve, _ZGVsMxv_log) |
| 067a3415 | 54 | SVE_VECTOR_WRAPPER (log10_sve, _ZGVsMxv_log10) |
| 3548a4f0 | 55 | SVE_VECTOR_WRAPPER (log1p_sve, _ZGVsMxv_log1p) |
| a8e3ab30 | 56 | SVE_VECTOR_WRAPPER (log2_sve, _ZGVsMxv_log2) |
| 3bb1af20 | 57 | SVE_VECTOR_WRAPPER (sin_sve, _ZGVsMxv_sin) |
| f554334c | 58 | SVE_VECTOR_WRAPPER (tan_sve, _ZGVsMxv_tan) |