diff options
Diffstat (limited to 'sysdeps/ieee754')
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_pow.c | 20 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/upow.h | 8 |
2 files changed, 20 insertions, 8 deletions
diff --git a/sysdeps/ieee754/dbl-64/e_pow.c b/sysdeps/ieee754/dbl-64/e_pow.c index 000dc94fa0..3b947e4160 100644 --- a/sysdeps/ieee754/dbl-64/e_pow.c +++ b/sysdeps/ieee754/dbl-64/e_pow.c @@ -1,7 +1,7 @@ /* * IBM Accurate Mathematical Library * written by International Business Machines Corp. - * Copyright (C) 2001 Free Software Foundation + * Copyright (C) 2001, 2002 Free Software Foundation * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by @@ -190,6 +190,15 @@ static double log1(double x, double *delta, double *error) { double cor; #endif mynumber u,v; +#ifdef BIG_ENDI + mynumber +/**/ two52 = {{0x43300000, 0x00000000}}; /* 2**52 */ +#else +#ifdef LITTLE_ENDI + mynumber +/**/ two52 = {{0x00000000, 0x43300000}}; /* 2**52 */ +#endif +#endif u.x = x; m = u.i[HIGH_HALF]; @@ -275,6 +284,15 @@ static double log2(double x, double *delta, double *error) { double ou1,ou2,lu1,lu2,ov,lv1,lv2,a,a1,a2; double y,yy,z,zz,j1,j2,j3,j4,j5,j6,j7,j8; mynumber u,v; +#ifdef BIG_ENDI + mynumber +/**/ two52 = {{0x43300000, 0x00000000}}; /* 2**52 */ +#else +#ifdef LITTLE_ENDI + mynumber +/**/ two52 = {{0x00000000, 0x43300000}}; /* 2**52 */ +#endif +#endif u.x = x; m = u.i[HIGH_HALF]; diff --git a/sysdeps/ieee754/dbl-64/upow.h b/sysdeps/ieee754/dbl-64/upow.h index 76c12939c5..a0b3dcb30e 100644 --- a/sysdeps/ieee754/dbl-64/upow.h +++ b/sysdeps/ieee754/dbl-64/upow.h @@ -1,7 +1,7 @@ /* * IBM Accurate Mathematical Library * Written by International Business Machines Corp. - * Copyright (C) 2001 Free Software Foundation, Inc. + * Copyright (C) 2001, 2002 Free Software Foundation, Inc. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by @@ -44,9 +44,6 @@ /**/ t52 = {{0x43300000, 0x00000000}}, /* 2**52 */ /**/ two52e = {{0x43300000, 0x000003ff}}; /* 2**52' */ - mynumber -/**/ two52 = {{0x43300000, 0x00000000}}; /* 2**52 */ - #else #ifdef LITTLE_ENDI const static mynumber @@ -62,9 +59,6 @@ /**/ t52 = {{0x00000000, 0x43300000}}, /* 2**52 */ /**/ two52e = {{0x000003ff, 0x43300000}}; /* 2**52' */ - mynumber -/**/ two52 = {{0x00000000, 0x43300000}}; /* 2**52 */ - #endif #endif |