[4/6] ldbl-128ibm-compat: Redirect complex math functions
Commit Message
From: Rajalakshmi Srinivasaraghavan <raji@linux.vnet.ibm.com>
The API doesn't change, i.e. compilers using a long double format compatible
with the IEEE 128-bit extended precision format are redirected from *l
functions to __*ieee128 symbols using the same mechanism already
used with -mlong-double-64 for complex math functions.
---
math/complex.h | 21 +++++++++++++++++++--
1 file changed, 19 insertions(+), 2 deletions(-)
Comments
"Paul E. Murphy" <murphyp@linux.vnet.ibm.com> writes:
> From: Rajalakshmi Srinivasaraghavan <raji@linux.vnet.ibm.com>
>
> The API doesn't change, i.e. compilers using a long double format compatible
> with the IEEE 128-bit extended precision format are redirected from *l
> functions to __*ieee128 symbols using the same mechanism already
> used with -mlong-double-64 for complex math functions.
Reviewed-by: Tulio Magno Quites Machado Filho <tuliom@linux.ibm.com>
And committed with the math.h changes.
On 2/11/20 12:36 PM, Tulio Magno Quites Machado Filho wrote:
> "Paul E. Murphy" <murphyp@linux.vnet.ibm.com> writes:
>
>> From: Rajalakshmi Srinivasaraghavan <raji@linux.vnet.ibm.com>
>>
>> The API doesn't change, i.e. compilers using a long double format compatible
>> with the IEEE 128-bit extended precision format are redirected from *l
>> functions to __*ieee128 symbols using the same mechanism already
>> used with -mlong-double-64 for complex math functions.
>
> Reviewed-by: Tulio Magno Quites Machado Filho <tuliom@linux.ibm.com>
>
@@ -95,9 +95,11 @@ __BEGIN_DECLS
#define __MATHCALL(function, args) \
__MATHDECL (_Mdouble_complex_,function, args)
-#define __MATHDECL(type, function, args) \
+#define __MATHDECL_IMPL(type, function, args) \
__MATHDECL_1(type, function, args); \
__MATHDECL_1(type, __CONCAT(__,function), args)
+#define __MATHDECL(type, function, args) \
+ __MATHDECL_IMPL(type, function, args)
#define __MATHDECL_1_IMPL(type, function, args) \
extern type __MATH_PRECNAME(function) args __THROW
#define __MATHDECL_1(type, function, args) \
@@ -124,13 +126,28 @@ __BEGIN_DECLS
# undef __MATHDECL_1
# define __MATHDECL_1(type, function, args) \
extern type __REDIRECT_NTH(__MATH_PRECNAME(function), args, function)
+# elif __LONG_DOUBLE_USES_FLOAT128 == 1
+# undef __MATHDECL_1
+# undef __MATHDECL
+# define __REDIR_TO(function) \
+ __ ## function ## ieee128
+# define __MATHDECL_1(type, function, alias, args) \
+ extern type __REDIRECT_NTH(__MATH_PRECNAME(function), args, alias)
+#define __MATHDECL(type, function, args) \
+ __MATHDECL_1(type, function, __REDIR_TO(function), args); \
+ __MATHDECL_1(type, __CONCAT(__,function), __REDIR_TO(function), args)
# endif
# define _Mdouble_ long double
# define __MATH_PRECNAME(name) name##l
# include <bits/cmathcalls.h>
-# if defined __LDBL_COMPAT
+# if defined __LDBL_COMPAT \
+ || __LONG_DOUBLE_USES_FLOAT128 == 1
+# undef __REDIR_TO
# undef __MATHDECL_1
+# undef __MATHDECL
+#define __MATHDECL(type, function, args) \
+ __MATHDECL_IMPL(type, function, args)
# define __MATHDECL_1(type, function, args) \
__MATHDECL_1_IMPL(type, function, args)
# endif