diff options
author | "Steven J. Hill" <sjhill@realitydiluted.com> | 2006-02-25 04:03:33 +0000 |
---|---|---|
committer | "Steven J. Hill" <sjhill@realitydiluted.com> | 2006-02-25 04:03:33 +0000 |
commit | cb6a88484ce0b5ffba2fe98a40e2d51f4af92eb8 (patch) | |
tree | 520f8e8d113184cfa7954ebd274564b8c255fa9a /libm/fpmacros.c | |
parent | e4461be66e2655058aef358b00050bc70ac72861 (diff) | |
download | uClibc-alpine-cb6a88484ce0b5ffba2fe98a40e2d51f4af92eb8.tar.bz2 uClibc-alpine-cb6a88484ce0b5ffba2fe98a40e2d51f4af92eb8.tar.xz |
Merge from trunk. Going pretty good so far. Kind of. Okay, not really.
Diffstat (limited to 'libm/fpmacros.c')
-rw-r--r-- | libm/fpmacros.c | 28 |
1 files changed, 20 insertions, 8 deletions
diff --git a/libm/fpmacros.c b/libm/fpmacros.c index 2624054d0..0a079c016 100644 --- a/libm/fpmacros.c +++ b/libm/fpmacros.c @@ -40,6 +40,7 @@ Calls: none ***********************************************************************/ +libm_hidden_proto(__fpclassifyf) int __fpclassifyf ( float x ) { unsigned int iexp; @@ -66,6 +67,7 @@ int __fpclassifyf ( float x ) else return FP_SUBNORMAL; /* must be subnormal */ } +libm_hidden_def(__fpclassifyf) /*********************************************************************** @@ -78,6 +80,7 @@ int __fpclassifyf ( float x ) Calls: none ***********************************************************************/ +libm_hidden_proto(__fpclassify) int __fpclassify ( double arg ) { register unsigned int exponent; @@ -106,6 +109,7 @@ int __fpclassify ( double arg ) return FP_SUBNORMAL; } } +libm_hidden_def(__fpclassify) /*********************************************************************** @@ -118,6 +122,7 @@ int __fpclassify ( double arg ) Calls: none ***********************************************************************/ +int __isnormalf ( float x ); int __isnormalf ( float x ) { unsigned int iexp; @@ -132,6 +137,7 @@ int __isnormalf ( float x ) } +int __isnormal ( double x ); int __isnormal ( double x ) { return ( __fpclassify ( x ) == FP_NORMAL ); @@ -158,14 +164,14 @@ int __finitef ( float x ) z.fval = x; return ((z.lval & FEXP_MASK) != FEXP_MASK); } -weak_alias (__finitef, finitef) +strong_alias(__finitef,finitef) #if 0 /* use __finite in s_finite.c */ int __finite ( double x ) { return ( __fpclassify ( x ) >= FP_ZERO ); } -weak_alias (__finite, finite) +strong_alias(__finite,finite) #endif @@ -178,6 +184,7 @@ weak_alias (__finite, finite) Calls: none ***********************************************************************/ +libm_hidden_proto(__signbitf) int __signbitf ( float x ) { union { @@ -188,6 +195,7 @@ int __signbitf ( float x ) z.fval = x; return ((z.lval & SIGN_MASK) != 0); } +libm_hidden_def(__signbitf) /*********************************************************************** @@ -197,6 +205,7 @@ int __signbitf ( float x ) Calls: none ***********************************************************************/ +libm_hidden_proto(__signbit) int __signbit ( double arg ) { union @@ -210,6 +219,7 @@ int __signbit ( double arg ) sign = ( ( x.hex.high & dSgnMask ) == dSgnMask ) ? 1 : 0; return sign; } +libm_hidden_def(__signbit) /*********************************************************************** @@ -227,7 +237,7 @@ int __isinff ( float x ) } return 0; } -weak_alias (__isinff, isinff) +strong_alias(__isinff,isinff) int __isinf ( double x ) { @@ -237,7 +247,7 @@ int __isinf ( double x ) } return 0; } -weak_alias (__isinf, isinf) +strong_alias(__isinf,isinf) #if 0 int __isinfl ( long double x ) @@ -248,7 +258,7 @@ int __isinfl ( long double x ) } return 0; } -weak_alias (__isinfl, isinfl) +strong_alias(__isinfl,isinfl) #endif /*********************************************************************** @@ -271,14 +281,16 @@ int __isnanf ( float x ) z.fval = x; return (((z.lval&FEXP_MASK) == FEXP_MASK) && ((z.lval&FFRAC_MASK) != 0)); } -weak_alias (__isnanf, isnanf) +strong_alias(__isnanf,isnanf) +libm_hidden_proto(__isnan) int __isnan ( double x ) { int class = __fpclassify(x); return ( class == FP_NAN ); } -weak_alias (__isnan, isnan) +libm_hidden_def(__isnan) +strong_alias(__isnan,isnan) #if 0 int __isnanl ( long double x ) @@ -286,6 +298,6 @@ int __isnanl ( long double x ) int class = __fpclassify(x); return ( class == FP_NAN ); } -weak_alias (__isnanl, isnanl) +strong_alias(__isnanl,isnanl) #endif |