2010-12-08 Tobias Burnus <burnus@net-b.de>

        PR fortran/46772
        * gdtoa/gdtoa.h: Include stdlib.h instead of declare strtod.
        * gdtoa/gdtoaimp.h: Don't declare strtod.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@167608 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/libquadmath/ChangeLog b/libquadmath/ChangeLog
index 7cf5219cd3c73ae84271d718036f819ee3025e35..8e17d2d5f55ab90874ba1be811c22fdbaec748d4 100644 (file)
--- a/libquadmath/ChangeLog
+++ b/libquadmath/ChangeLog
@@ -1,3 +1,9 @@
+2010-12-08  Tobias Burnus  <burnus@net-b.de>
+
+       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  <burnus@net-b.de>
 
        PR fortran/46520

diff --git a/libquadmath/gdtoa/gdtoa.h b/libquadmath/gdtoa/gdtoa.h
index 1a60b6cdd6ddace79ca71fb1c7d1ad921017229b..de10a436c5ab4ea7629132c6c84e0ebabe93da3c 100644 (file)
--- a/libquadmath/gdtoa/gdtoa.h
+++ b/libquadmath/gdtoa/gdtoa.h
@@ -34,6 +34,7 @@ THIS SOFTWARE.
 
 #include "arith.h"
 #include <stddef.h> /* for size_t */
+#include <stdlib.h> /* 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 2c188d66a0a4cc36ad07fa949da2fca686d8ed29..68438086d74addaed7b6121bf67074f935a419ae 100644 (file)
--- 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*));