]>
Commit | Line | Data |
---|---|---|
04277e02 | 1 | /* Copyright (C) 1996-2019 Free Software Foundation, Inc. |
28c50ce9 UD |
2 | This file is part of the GNU C Library. |
3 | ||
4 | The GNU C Library is free software; you can redistribute it and/or | |
3214b89b AJ |
5 | modify it under the terms of the GNU Lesser General Public |
6 | License as published by the Free Software Foundation; either | |
7 | version 2.1 of the License, or (at your option) any later version. | |
28c50ce9 UD |
8 | |
9 | The GNU C Library is distributed in the hope that it will be useful, | |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
3214b89b | 12 | Lesser General Public License for more details. |
28c50ce9 | 13 | |
3214b89b | 14 | You should have received a copy of the GNU Lesser General Public |
ab84e3ff | 15 | License along with the GNU C Library. If not, see |
5a82c748 | 16 | <https://www.gnu.org/licenses/>. */ |
28c50ce9 | 17 | |
c43ee646 UD |
18 | #define scalbln __no_scalbln_decl |
19 | #define scalblnf __no_scalblnf_decl | |
20 | #define scalblnl __no_scalblnl_decl | |
21 | #define __scalbln __no__scalbln_decl | |
22 | #define __scalblnf __no__scalblnf_decl | |
23 | #define __scalblnl __no__scalblnl_decl | |
22a45bf1 | 24 | #include <math.h> |
c43ee646 UD |
25 | #undef scalbln |
26 | #undef scalblnf | |
27 | #undef scalblnl | |
28 | #undef __scalbln | |
29 | #undef __scalblnf | |
30 | #undef __scalblnl | |
31 | ||
32 | #ifndef suffix | |
33 | #define suffix /*empty*/ | |
22a45bf1 UD |
34 | #endif |
35 | #ifndef float_type | |
36 | #define float_type double | |
37 | #endif | |
38 | ||
39 | #define __CONCATX(a,b) __CONCAT(a,b) | |
40 | ||
41 | float_type | |
80d9be81 | 42 | __CONCATX(__scalbn,suffix) (float_type x, int exp) |
22a45bf1 | 43 | { |
c43ee646 | 44 | return __m81_u(__CONCATX(__scalbn,suffix))(x, exp); |
22a45bf1 | 45 | } |
615f651b | 46 | strong_alias (__CONCATX(__scalbn,suffix), __CONCATX(__scalbln,suffix)) |
c5241f95 AS |
47 | |
48 | #include <shlib-compat.h> | |
49 | #if SHLIB_COMPAT (libc, GLIBC_2_1, GLIBC_2_20) | |
50 | compat_symbol (libc, __CONCATX(__scalbn,suffix), __CONCATX(scalbln,suffix), | |
51 | GLIBC_2_1); | |
52 | #endif |