mirror of
https://github.com/python/cpython.git
synced 2025-07-28 21:55:21 +00:00
Explicitly add stdio.h and string.h to make strtod.c work standalone.
Found using Clang's static analyzer.
This commit is contained in:
parent
c33e82d23c
commit
0b64be2389
1 changed files with 9 additions and 6 deletions
|
@ -1,3 +1,6 @@
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <string.h>
|
||||||
|
|
||||||
#include "pyconfig.h"
|
#include "pyconfig.h"
|
||||||
|
|
||||||
/* comp.sources.misc strtod(), as posted in comp.lang.tcl,
|
/* comp.sources.misc strtod(), as posted in comp.lang.tcl,
|
||||||
|
@ -14,7 +17,7 @@
|
||||||
Defines: double strtod (char *str, char**ptr)
|
Defines: double strtod (char *str, char**ptr)
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* This is an implementation of the strtod() function described in the
|
/* This is an implementation of the strtod() function described in the
|
||||||
System V manuals, with a different name to avoid linker problems.
|
System V manuals, with a different name to avoid linker problems.
|
||||||
All that str2dbl() does itself is check that the argument is well-formed
|
All that str2dbl() does itself is check that the argument is well-formed
|
||||||
and is in range. It leaves the work of conversion to atof(), which is
|
and is in range. It leaves the work of conversion to atof(), which is
|
||||||
|
@ -29,7 +32,7 @@
|
||||||
of strtod(), and if we give this one away maybe someone will look for
|
of strtod(), and if we give this one away maybe someone will look for
|
||||||
mistakes in it and fix them for us (:-).
|
mistakes in it and fix them for us (:-).
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* The following constants are machine-specific. MD{MIN,MAX}EXPT are
|
/* The following constants are machine-specific. MD{MIN,MAX}EXPT are
|
||||||
integers and MD{MIN,MAX}FRAC are strings such that
|
integers and MD{MIN,MAX}FRAC are strings such that
|
||||||
0.${MDMAXFRAC}e${MDMAXEXPT} is the largest representable double,
|
0.${MDMAXFRAC}e${MDMAXEXPT} is the largest representable double,
|
||||||
|
@ -74,10 +77,10 @@ double strtod(char *str, char **ptr)
|
||||||
sign = 1;
|
sign = 1;
|
||||||
if (*sp == '-') sign -= 2, sp++;
|
if (*sp == '-') sign -= 2, sp++;
|
||||||
dotseen = 0, scale = 0;
|
dotseen = 0, scale = 0;
|
||||||
dp = buffer;
|
dp = buffer;
|
||||||
*dp++ = '0'; *dp++ = '.';
|
*dp++ = '0'; *dp++ = '.';
|
||||||
buforg = dp, buflim = buffer+48;
|
buforg = dp, buflim = buffer+48;
|
||||||
for (save = sp; c = *sp; sp++)
|
for (save = sp; (c = *sp); sp++)
|
||||||
if (c == '.') {
|
if (c == '.') {
|
||||||
if (dotseen) break;
|
if (dotseen) break;
|
||||||
dotseen++;
|
dotseen++;
|
||||||
|
@ -106,7 +109,7 @@ double strtod(char *str, char **ptr)
|
||||||
errno = EDOM; /* what should this be? */
|
errno = EDOM; /* what should this be? */
|
||||||
return ZERO;
|
return ZERO;
|
||||||
}
|
}
|
||||||
|
|
||||||
while (dp > buforg && dp[-1] == '0') --dp;
|
while (dp > buforg && dp[-1] == '0') --dp;
|
||||||
if (dp == buforg) *dp++ = '0';
|
if (dp == buforg) *dp++ = '0';
|
||||||
*dp = '\0';
|
*dp = '\0';
|
||||||
|
@ -128,7 +131,7 @@ double strtod(char *str, char **ptr)
|
||||||
if ((unsigned)(c-'0') > (unsigned)('9'-'0')) break;
|
if ((unsigned)(c-'0') > (unsigned)('9'-'0')) break;
|
||||||
while (c == '0') c = *sp++;
|
while (c == '0') c = *sp++;
|
||||||
for (; (unsigned)(c-'0') <= (unsigned)('9'-'0'); c = *sp++)
|
for (; (unsigned)(c-'0') <= (unsigned)('9'-'0'); c = *sp++)
|
||||||
expt = expt*10 + c-'0';
|
expt = expt*10 + c-'0';
|
||||||
if (esign < 0) expt = -expt;
|
if (esign < 0) expt = -expt;
|
||||||
save = sp-1;
|
save = sp-1;
|
||||||
} while (0);
|
} while (0);
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue