src/libm/s_fabs.c
author Sam Lantinga <slouken@libsdl.org>
Wed, 27 May 2020 09:28:03 -0700
changeset 13859 e9e8b7e01629
parent 11683 48bcba563d9c
permissions -rw-r--r--
Fixed uninitialized variable warning
     1 /*
     2  * ====================================================
     3  * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
     4  *
     5  * Developed at SunPro, a Sun Microsystems, Inc. business.
     6  * Permission to use, copy, modify, and distribute this
     7  * software is freely granted, provided that this notice
     8  * is preserved.
     9  * ====================================================
    10  */
    11 
    12 /*
    13  * fabs(x) returns the absolute value of x.
    14  */
    15 
    16 /*#include <features.h>*/
    17 /* Prevent math.h from defining a colliding inline */
    18 #undef __USE_EXTERN_INLINES
    19 #include "math_libm.h"
    20 #include "math_private.h"
    21 
    22 double fabs(double x)
    23 {
    24 	u_int32_t high;
    25 	GET_HIGH_WORD(high,x);
    26 	SET_HIGH_WORD(x,high&0x7fffffff);
    27         return x;
    28 }
    29 libm_hidden_def(fabs)