diff options
Diffstat (limited to 'src/sysdep.c')
| -rw-r--r-- | src/sysdep.c | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/sysdep.c b/src/sysdep.c index 1eaf648ea78..c59034ce5c3 100644 --- a/src/sysdep.c +++ b/src/sysdep.c @@ -3006,11 +3006,7 @@ list_system_processes (void) for (tail = proclist; CONSP (tail); tail = next) { next = XCDR (tail); - Lisp_Object pidstring = XCAR (tail); - Lisp_Object pid = Fstring_to_number (pidstring, Qnil); - if (!INTEGERP (pid) || XINT (pid) <= 0) - xsignal1 (Qoverflow_error, pidstring); - XSETCAR (tail, pid); + XSETCAR (tail, Fstring_to_number (XCAR (tail), Qnil)); } /* directory_files_internal returns the files in reverse order; undo |