aboutsummaryrefslogtreecommitdiffstats
path: root/src/lread.c
diff options
context:
space:
mode:
authorPaul Eggert2018-03-12 10:35:25 -0700
committerPaul Eggert2018-03-12 10:37:05 -0700
commite067f1fd9feabc9c83cfbba177616a46b28d058a (patch)
treeed584ec923078e1bd3d8ed66ca8df93a3475f022 /src/lread.c
parent0965d94ca426765382f366bf48f88ba5f9500afd (diff)
downloademacs-e067f1fd9feabc9c83cfbba177616a46b28d058a.tar.gz
emacs-e067f1fd9feabc9c83cfbba177616a46b28d058a.zip
Revert overenthusiastic procfs fixup
Also, be more systematic in calls to string_to_number. * src/sysdep.c (list_system_processes) [HAVE_PROCFS]: Allow pids to be floating-point if they exceed fixnum range. This partially reverts my patch 2018-03-09T20:06:05Z!eggert@cs.ucla.edu, which went too far in fixing string-to-number mishandling.
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lread.c b/src/lread.c
index 0ea7677300b..381f9cf20c5 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2693,7 +2693,7 @@ read_integer (Lisp_Object readcharfun, EMACS_INT radix)
2693 invalid_syntax (buf); 2693 invalid_syntax (buf);
2694 } 2694 }
2695 2695
2696 return string_to_number (buf, radix, 0); 2696 return string_to_number (buf, radix, false);
2697} 2697}
2698 2698
2699 2699
@@ -3502,7 +3502,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list)
3502 3502
3503 if (!quoted && !uninterned_symbol) 3503 if (!quoted && !uninterned_symbol)
3504 { 3504 {
3505 Lisp_Object result = string_to_number (read_buffer, 10, 0); 3505 Lisp_Object result = string_to_number (read_buffer, 10, false);
3506 if (! NILP (result)) 3506 if (! NILP (result))
3507 return unbind_to (count, result); 3507 return unbind_to (count, result);
3508 } 3508 }