diff options
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index 6cd1029cd9f..1c97805ca7a 100644 --- a/src/lread.c +++ b/src/lread.c @@ -3782,7 +3782,7 @@ string_to_number (char const *string, int base, ptrdiff_t *plen) state |= E_EXP; cp += 3; union ieee754_double u - = { .ieee_nan = { .exponent = -1, .quiet_nan = 1, + = { .ieee_nan = { .exponent = 0x7ff, .quiet_nan = 1, .mantissa0 = n >> 31 >> 1, .mantissa1 = n }}; value = u.d; } |