newlib-cygwin/newlib/libm/complex/cargl.c

/* $NetBSD: cargl.c,v 1.1 2014/10/10 00:48:18 christos Exp $ */

/*
 * Public domain.
 */

#include <complex.h>
#include <math.h>

/* On platforms where long double is as wide as double.  */
#ifdef _LDBL_EQ_DBL
long double
cargl(long double complex z)
{
         return carg (z);
}
#endif
Importing cargl.c from NetBSD. 2017-06-29 01:30:47 +05:30			`/* $NetBSD: cargl.c,v 1.1 2014/10/10 00:48:18 christos Exp $ */`

			`/*`
			`* Public domain.`
			`*/`

			`#include <complex.h>`
			`#include <math.h>`

newlib: libm: skip "long double" complex functions if long double != double The rest of "long double" functions aren't compiled with long double and double are not the same. Do the same for all complex functions. Signed-off-by: Pietro Monteiro <pietro@sociotechnical.xyz> 2024-06-03 21:35:47 -04:00			`/* On platforms where long double is as wide as double. */`
			`#ifdef _LDBL_EQ_DBL`
Importing cargl.c from NetBSD. 2017-06-29 01:30:47 +05:30			`long double`
			`cargl(long double complex z)`
newlib: libm: skip "long double" complex functions if long double != double The rest of "long double" functions aren't compiled with long double and double are not the same. Do the same for all complex functions. Signed-off-by: Pietro Monteiro <pietro@sociotechnical.xyz> 2024-06-03 21:35:47 -04:00			`{`
Importing cargl.c from NetBSD. 2017-06-29 01:30:47 +05:30			`return carg (z);`
			`}`
newlib: libm: skip "long double" complex functions if long double != double The rest of "long double" functions aren't compiled with long double and double are not the same. Do the same for all complex functions. Signed-off-by: Pietro Monteiro <pietro@sociotechnical.xyz> 2024-06-03 21:35:47 -04:00			`#endif`