summaryrefslogtreecommitdiff
path: root/src/process.c
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2018-07-07 15:32:52 -0600
committerTom Tromey <tom@tromey.com>2018-07-12 22:12:27 -0600
commit1e8ae6ca237e22e11b3db63a01e558ad5a3d6ef3 (patch)
treea8fabadc647288ce253d2813b8074c5b903b52b8 /src/process.c
parent580d173b9a7db78f6d62972ef8e943d31dde5c9d (diff)
downloademacs-1e8ae6ca237e22e11b3db63a01e558ad5a3d6ef3.tar.gz
emacs-1e8ae6ca237e22e11b3db63a01e558ad5a3d6ef3.tar.bz2
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.c2
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. */)
{
Lisp_Object tem = Fget_process (process);
if (NILP (tem))
- tem = string_to_number (SSDATA (process), 10, S2N_OVERFLOW_TO_FLOAT);
+ tem = string_to_number (SSDATA (process), 10, 0);
process = tem;
}
else if (!FIXED_OR_FLOATP (process))