summaryrefslogtreecommitdiffstats
path: root/Python/marshal.c
diff options
context:
space:
mode:
Diffstat (limited to 'Python/marshal.c')
-rw-r--r--Python/marshal.c19
1 files changed, 3 insertions, 16 deletions
diff --git a/Python/marshal.c b/Python/marshal.c
index e61815c..dcb63d2 100644
--- a/Python/marshal.c
+++ b/Python/marshal.c
@@ -1,5 +1,5 @@
/***********************************************************
-Copyright 1991, 1992, 1993 by Stichting Mathematisch Centrum,
+Copyright 1991, 1992, 1993, 1994 by Stichting Mathematisch Centrum,
Amsterdam, The Netherlands.
All Rights Reserved
@@ -304,10 +304,8 @@ r_object(p)
case TYPE_FLOAT:
{
- extern double strtod PROTO((const char *, char **));
+ extern double atof PROTO((const char *));
char buf[256];
- double res;
- char *end;
n = r_byte(p);
if (r_string(buf, (int)n, p) != n) {
err_setstr(EOFError,
@@ -315,18 +313,7 @@ r_object(p)
return NULL;
}
buf[n] = '\0';
- errno = 0;
- res = strtod(buf, &end);
- if (*end != '\0') {
- err_setstr(ValueError, "bad float syntax");
- return NULL;
- }
- if (errno != 0) {
- err_setstr(ValueError,
- "float constant too large");
- return NULL;
- }
- return newfloatobject(res);
+ return newfloatobject(atof(buf));
}
case TYPE_STRING: