diff --git a/src/lsp/process.lsp b/src/lsp/process.lsp index 88588edb9..f4f45fa59 100644 --- a/src/lsp/process.lsp +++ b/src/lsp/process.lsp @@ -47,7 +47,7 @@ (defun external-process-status (external-process) (let ((status (external-process-%status external-process))) - (if (eq status :running) + (if (member status (:stopped :resumed :running)) (ext:external-process-wait external-process nil) (values status (external-process-%code external-process)))))