diff options
| author | Tom Tromey | 2018-07-07 15:32:52 -0600 |
|---|---|---|
| committer | Tom Tromey | 2018-07-12 22:12:27 -0600 |
| commit | 1e8ae6ca237e22e11b3db63a01e558ad5a3d6ef3 (patch) | |
| tree | a8fabadc647288ce253d2813b8074c5b903b52b8 /src/process.c | |
| parent | 580d173b9a7db78f6d62972ef8e943d31dde5c9d (diff) | |
| download | emacs-1e8ae6ca237e22e11b3db63a01e558ad5a3d6ef3.tar.gz emacs-1e8ae6ca237e22e11b3db63a01e558ad5a3d6ef3.zip | |
Make the reader accept bignums
* src/data.c (Fstring_to_number): Update.
* src/lisp.h (S2N_OVERFLOW_TO_FLOAT): Remove.
* src/lread.c (free_contents): New function.
(read_integer): Handle bignums.
(read1): Update.
(string_to_number): Handle bignums.
(syms_of_lread): Remove read-integer-overflow-as-float.
* src/process.c (Fsignal_process): Update.
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/process.c b/src/process.c index 10af79a0155..350cfe0f80b 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -6842,7 +6842,7 @@ SIGCODE may be an integer, or a symbol whose name is a signal name. */) | |||
| 6842 | { | 6842 | { |
| 6843 | Lisp_Object tem = Fget_process (process); | 6843 | Lisp_Object tem = Fget_process (process); |
| 6844 | if (NILP (tem)) | 6844 | if (NILP (tem)) |
| 6845 | tem = string_to_number (SSDATA (process), 10, S2N_OVERFLOW_TO_FLOAT); | 6845 | tem = string_to_number (SSDATA (process), 10, 0); |
| 6846 | process = tem; | 6846 | process = tem; |
| 6847 | } | 6847 | } |
| 6848 | else if (!FIXED_OR_FLOATP (process)) | 6848 | else if (!FIXED_OR_FLOATP (process)) |