process-wait: fix very important typo

This commit is contained in:
Daniel Kochmański 2017-02-20 12:35:01 +01:00
parent 236e8b38d1
commit 03bd29426b

View file

@ -62,7 +62,7 @@
(when pid
(multiple-value-bind (status code pid) (si:waitpid pid wait)
(case status
((:exited :signalled :abort :error)
((:exited :signaled :abort :error)
(with-active-processes-lock
(setf *active-processes* (delete process *active-processes*)
(external-process-pid process) nil