gonzui: t2ex/bsd_source/lib/libc/src_bsd/math/s

    1: /* s_fabsf.c -- float version of s_fabs.c.
    2:  * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
    3:  */
    4: 
    5: /*
    6:  * ====================================================
    7:  * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
    8:  *
    9:  * Developed at SunPro, a Sun Microsystems, Inc. business.
   10:  * Permission to use, copy, modify, and distribute this
   11:  * software is freely granted, provided that this notice 
   12:  * is preserved.
   13:  * ====================================================
   14:  */
   15: 
   16: /*
   17:  * fabsf(x) returns the absolute value of x.
   18:  */
   19: 
   20: #include "math.h"
   21: #include "math_private.h"
   22: 
   23: float
   24: fabsf(float x)
   25: {
   26:         u_int32_t ix;
   27:         GET_FLOAT_WORD(ix,x);
   28:         SET_FLOAT_WORD(x,ix&0x7fffffff);
   29:         return x;
   30: }