summaryrefslogtreecommitdiffstats
path: root/libm/fpmacros.c
diff options
context:
space:
mode:
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
commitcb6a88484ce0b5ffba2fe98a40e2d51f4af92eb8 (patch)
tree520f8e8d113184cfa7954ebd274564b8c255fa9a /libm/fpmacros.c
parente4461be66e2655058aef358b00050bc70ac72861 (diff)
downloaduClibc-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.c28
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