Lephenixnoir
/
OpenLibm
1
0
Fork 1
Code Issues Pull Requests Releases Wiki Activity
OpenLibm/src/w_cabsf.c

20 lines
304 B
C
Raw Normal View History

Initialize repo. FreeBSD 8.2 msun code + some tweaks
2011-08-12 21:01:25 +02:00
/*
* cabsf() wrapper for hypotf().
*
* Written by J.T. Conklin, <jtc@wimsey.com>
* Placed into the Public Domain, 1994.
*/
Never include <complex.h>. Include <openlibm_complex.h> instead. If we ship with a separate copy of <complex.h>, we should also use this one instead of the one provided by the system.
2015-01-09 13:30:44 +01:00
#include <openlibm_complex.h>
Rename openlibm.h to openlibm_math.h. This is a bit more consistent with the naming of the other header files (openlibm_complex.h and openlibm_fenv.h). Re-add an openlibm.h header that includes all of the public headers as a shorthand. Fix up all of the source files to include <openlibm_math.h> instead of <openlibm.h>. While there, fix ordering of the includes.
2015-01-11 23:34:27 +01:00
#include <openlibm_math.h>
Never include <complex.h>. Include <openlibm_complex.h> instead. If we ship with a separate copy of <complex.h>, we should also use this one instead of the one provided by the system.
2015-01-09 13:30:44 +01:00
Initialize repo. FreeBSD 8.2 msun code + some tweaks
2011-08-12 21:01:25 +02:00
#include "math_private.h"
Blanket rename DLLEXPORT->OLM_DLLEXPORT
2016-03-14 02:07:55 +01:00
OLM_DLLEXPORT float
Initialize repo. FreeBSD 8.2 msun code + some tweaks
2011-08-12 21:01:25 +02:00
cabsf(z)
float complex z;
{
return hypotf(crealf(z), cimagf(z));
}