diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/lread.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index 81670ebe048..5f1643e86d6 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -1442,7 +1442,12 @@ read1 (readcharfun, pch, first_in_list) | |||
| 1442 | if (p1[-1] == '.') | 1442 | if (p1[-1] == '.') |
| 1443 | p1[-1] = '\0'; | 1443 | p1[-1] = '\0'; |
| 1444 | #endif | 1444 | #endif |
| 1445 | XSETINT (val, atoi (read_buffer)); | 1445 | if (sizeof (int) == sizeof (EMACS_INT)) |
| 1446 | XSETINT (val, atoi (read_buffer)); | ||
| 1447 | else if (sizeof (long) == sizeof (EMACS_INT)) | ||
| 1448 | XSETINT (val, atol (read_buffer)); | ||
| 1449 | else | ||
| 1450 | abort (); | ||
| 1446 | return val; | 1451 | return val; |
| 1447 | } | 1452 | } |
| 1448 | } | 1453 | } |