diff options
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c index efcffbbf6ab..8ffed8bbb52 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -2727,8 +2727,7 @@ If the base used is not 10, STRING is always parsed as an integer. */) | |||
| 2727 | while (*p == ' ' || *p == '\t') | 2727 | while (*p == ' ' || *p == '\t') |
| 2728 | p++; | 2728 | p++; |
| 2729 | 2729 | ||
| 2730 | int flags = S2N_IGNORE_TRAILING | S2N_OVERFLOW_TO_FLOAT; | 2730 | Lisp_Object val = string_to_number (p, b, S2N_IGNORE_TRAILING); |
| 2731 | Lisp_Object val = string_to_number (p, b, flags); | ||
| 2732 | return NILP (val) ? make_fixnum (0) : val; | 2731 | return NILP (val) ? make_fixnum (0) : val; |
| 2733 | } | 2732 | } |
| 2734 | 2733 | ||