|
@@ -47,10 +47,6 @@
|
|
#include <limits.h>
|
|
#include <limits.h>
|
|
#include <math.h>
|
|
#include <math.h>
|
|
|
|
|
|
-#if !defined(__ppc__)
|
|
|
|
-#define asm(x)
|
|
|
|
-#endif
|
|
|
|
-
|
|
|
|
#define SET_INVALID 0x01000000UL
|
|
#define SET_INVALID 0x01000000UL
|
|
|
|
|
|
typedef union
|
|
typedef union
|
|
@@ -108,7 +104,6 @@ static const DblInHex TOWARDZERO = {{ 0x00000000, 0x00000001 }};
|
|
* Now a bit twidling version that is about %30 faster. *
|
|
* Now a bit twidling version that is about %30 faster. *
|
|
*******************************************************************************/
|
|
*******************************************************************************/
|
|
|
|
|
|
-#if defined(__ppc__)
|
|
|
|
double rint ( double x )
|
|
double rint ( double x )
|
|
{
|
|
{
|
|
DblInHex argument;
|
|
DblInHex argument;
|
|
@@ -159,7 +154,6 @@ double rint ( double x )
|
|
*******************************************************************************/
|
|
*******************************************************************************/
|
|
return ( x );
|
|
return ( x );
|
|
}
|
|
}
|
|
-#endif
|
|
|
|
|
|
|
|
|
|
|
|
* *
|
|
* *
|
|
@@ -176,9 +170,7 @@ double rint ( double x )
|
|
double nearbyint ( double x )
|
|
double nearbyint ( double x )
|
|
{
|
|
{
|
|
double y;
|
|
double y;
|
|
-#if defined(__ppc__)
|
|
|
|
double OldEnvironment;
|
|
double OldEnvironment;
|
|
-#endif
|
|
|
|
|
|
|
|
y = twoTo52;
|
|
y = twoTo52;
|
|
|
|
|
|
@@ -400,10 +392,8 @@ long int roundtol ( double x )
|
|
DblInHex argument, OldEnvironment;
|
|
DblInHex argument, OldEnvironment;
|
|
register unsigned long int xhi;
|
|
register unsigned long int xhi;
|
|
register long int target;
|
|
register long int target;
|
|
-#if defined(__ppc__)
|
|
|
|
const DblInHex kTZ = {{ 0x0, 0x1 }};
|
|
const DblInHex kTZ = {{ 0x0, 0x1 }};
|
|
const DblInHex kUP = {{ 0x0, 0x2 }};
|
|
const DblInHex kUP = {{ 0x0, 0x2 }};
|
|
-#endif
|
|
|
|
|
|
|
|
argument.dbl = x;
|
|
argument.dbl = x;
|
|
xhi = argument.words.hi & 0x7ffffffful;
|
|
xhi = argument.words.hi & 0x7ffffffful;
|
|
@@ -568,7 +558,6 @@ double trunc ( double x )
|
|
* modf is the double implementation. *
|
|
* modf is the double implementation. *
|
|
*******************************************************************************/
|
|
*******************************************************************************/
|
|
|
|
|
|
-#if defined(__ppc__)
|
|
|
|
double modf ( double x, double *iptr )
|
|
double modf ( double x, double *iptr )
|
|
{
|
|
{
|
|
register double OldEnvironment, xtrunc;
|
|
register double OldEnvironment, xtrunc;
|
|
@@ -629,4 +618,3 @@ double modf ( double x, double *iptr )
|
|
return ( argument.dbl );
|
|
return ( argument.dbl );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
-#endif
|
|
|