diff --git a/libquadmath/ChangeLog b/libquadmath/ChangeLog index 7cf5219cd3c..8e17d2d5f55 100644 --- a/libquadmath/ChangeLog +++ b/libquadmath/ChangeLog @@ -1,3 +1,9 @@ +2010-12-08 Tobias Burnus + + PR fortran/46772 + * gdtoa/gdtoa.h: Include stdlib.h instead of declare strtod. + * gdtoa/gdtoaimp.h: Don't declare strtod. + 2010-12-08 Tobias Burnus PR fortran/46520 diff --git a/libquadmath/gdtoa/gdtoa.h b/libquadmath/gdtoa/gdtoa.h index 1a60b6cdd6d..de10a436c5a 100644 --- a/libquadmath/gdtoa/gdtoa.h +++ b/libquadmath/gdtoa/gdtoa.h @@ -34,6 +34,7 @@ THIS SOFTWARE. #include "arith.h" #include /* for size_t */ +#include /* for strtod */ #ifndef Long #define Long long @@ -108,8 +109,6 @@ extern char* dtoa ANSI((double d, int mode, int ndigits, int *decpt, extern char* gdtoa ANSI((FPI *fpi, int be, ULong *bits, int *kindp, int mode, int ndigits, int *decpt, char **rve)); extern void freedtoa ANSI((char*)); -extern float strtof ANSI((CONST char *, char **)); -extern double strtod ANSI((CONST char *, char **)); extern int strtodg ANSI((CONST char*, char**, FPI*, Long*, ULong*)); extern char* g_ddfmt ANSI((char*, double*, int, size_t)); diff --git a/libquadmath/gdtoa/gdtoaimp.h b/libquadmath/gdtoa/gdtoaimp.h index 2c188d66a0a..68438086d74 100644 --- a/libquadmath/gdtoa/gdtoaimp.h +++ b/libquadmath/gdtoa/gdtoaimp.h @@ -561,7 +561,6 @@ extern void memcpy_D2A ANSI((void*, const void*, size_t)); extern Bigint *set_ones ANSI((Bigint*, int)); extern char *strcp ANSI((char*, const char*)); extern int strtoIg ANSI((CONST char*, char**, FPI*, Long*, Bigint**, int*)); - extern double strtod ANSI((const char *s00, char **se)); extern Bigint *sum ANSI((Bigint*, Bigint*)); extern int trailz ANSI((Bigint*)); extern double ulp ANSI((U*));