Attachment 80722 Details for Bug 115731 – file.diff

[patch] file.diff

file.diff (text/plain), 2.04 KB, created by housel on 2007-08-22 21:10:01 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: housel

Created: 2007-08-22 21:10:01 UTC

Size: 2.04 KB

patch

obsolete

>--- d2c/runtime/c-code/float.c	Wed Jul 23 08:08:58 2003
>+++ d2c/runtime/c-code/float.c	Tue Aug 21 14:43:47 2007
>@@ -101,11 +101,11 @@
> 
> #define SQRTHL	0.70710678118654752440L
> 
>+static long double polevll(long double, long double *, size_t);
>+static long double p1evll(long double, long double *, size_t);
>+
> long double (logl)(long double x)
> {
>-  static long double polevll(long double, long double *, size_t);
>-  static long double p1evll(long double, long double *, size_t);
>-
>   /* Coefficients for log(1+x) = x - x**2/2 + x**3 P(x)/Q(x) 1/sqrt(2) <= x <
>    * sqrt(2) Theoretical peak relative error = 2.32e-20
>    */
>@@ -229,11 +229,11 @@
> #define LOG2EAL	4.4269504088896340735992e-1L
> #define SQRTHL	0.70710678118654752440L
> 
>+long double polevll(long double, long double *, size_t);
>+long double p1evll(long double, long double *, size_t);
>+
> long double (log2l)(long double x)
> {
>-  static long double polevll(long double, long double *, size_t);
>-  static long double p1evll(long double, long double *, size_t);
>-
>   static long double P[] = {
>     4.9962495940332550844739E-1L,
>     1.0767376367209449010438E1L,
>@@ -362,11 +362,11 @@
> 
> #define SQRTHL	0.70710678118654752440L
> 
>+static long double polevll(long double, long double *, size_t);
>+static long double p1evll(long double, long double *, size_t);
>+
> long double (log10l)(long double x)
> {
>-  static long double polevll(long double, long double *, size_t);
>-  static long double p1evll(long double, long double *, size_t);
>-
>   /* Coefficients for log(1+x) = x - x**2/2 + x**3 P(x)/Q(x) 1/sqrt(2) <= x <
>    * sqrt(2) Theoretical peak relative error = 6.2e-22
>    */
>@@ -497,11 +497,11 @@
> #define LOG2EA	0.44269504088896340735992	/* log2(e) - 1 */
> #define SQRTH	0.70710678118654752440
> 
>+static double polevl(double, double *, size_t);
>+static double p1evl(double, double *, size_t);
>+
> double (log2)(double x)
> {
>-  static double polevl(double, double *, size_t);
>-  static double p1evl(double, double *, size_t);
>-
>   /* Coefficients for log(1+x) = x - x**2/2 + x**3 P(x)/Q(x) 1/sqrt(2) <= x <
>    * sqrt(2)
>    */

Actions: View | Diff

Attachments on bug 115731: 80722