SDL/src/libm/s_fabs.c at SDL2 · Y-way/SDL

Repository navigation

* ====================================================

* Developed at SunPro, a Sun Microsystems, Inc. business.

* Permission to use, copy, modify, and distribute this

* software is freely granted, provided that this notice

* is preserved.

* ====================================================

* fabs(x) returns the absolute value of x.

/*#include <features.h>*/

/* Prevent math.h from defining a colliding inline */

#undef __USE_EXTERN_INLINES

#include "math_libm.h"

#include "math_private.h"

double fabs(double x)

{

u_int32_t high;

GET_HIGH_WORD(high,x);

SET_HIGH_WORD(x,high&0x7fffffff);

return x;

}

libm_hidden_def(fabs)