gdtoa-strtopx.c.patch [plain text]
--- gdtoa-strtopx.c.orig 2008-10-28 12:54:18.000000000 -0700
+++ gdtoa-strtopx.c 2008-10-28 12:57:26.000000000 -0700
@@ -29,6 +29,8 @@ THIS SOFTWARE.
/* Please send bug reports to David M. Gay (dmg at acm dot org,
* with " at " changed at "@" and " dot " changed to "."). */
+#include "xlocale_private.h"
+
#include "gdtoaimp.h"
#undef _0
@@ -53,9 +55,9 @@ THIS SOFTWARE.
int
#ifdef KR_headers
-strtopx(s, sp, V) CONST char *s; char **sp; void *V;
+strtopx(s, sp, V, loc) CONST char *s; char **sp; void *V; locale_t loc;
#else
-strtopx(CONST char *s, char **sp, void *V)
+strtopx(CONST char *s, char **sp, void *V, locale_t loc)
#endif
{
static FPI fpi0 = { 64, 1-16383-64+1, 32766 - 16383 - 64 + 1, 1, SI };
@@ -69,9 +71,12 @@ strtopx(CONST char *s, char **sp, void *
#define fpi &fpi0
#endif
- k = strtodg(s, sp, fpi, &exp, bits);
+ k = strtodg(s, sp, fpi, &exp, bits, loc);
switch(k & STRTOG_Retmask) {
case STRTOG_NoNumber:
+ L[0] = L[1] = L[2] = L[3] = L[4] = 0;
+ return k; // avoid setting sign
+
case STRTOG_Zero:
L[0] = L[1] = L[2] = L[3] = L[4] = 0;
break;
@@ -92,7 +97,8 @@ strtopx(CONST char *s, char **sp, void *
case STRTOG_Infinite:
L[_0] = 0x7fff;
- L[_1] = L[_2] = L[_3] = L[_4] = 0;
+ L[_1] = 0x8000; /* 4306392: to match gcc */
+ L[_2] = L[_3] = L[_4] = 0;
break;
case STRTOG_NaN: