
The process-alive-p function returns t if process is alive, that is, if mp:process-kill has not been called on the process.
(mp:process-alive-p mp:*current-process*) => T(let ((process (mp:process-run-function
"test" nil 'identity nil)))
(sleep 2)
(mp:process-alive-p process))
=> NIL