diff --git a/uiop/run-program.lisp b/uiop/run-program.lisp index 9f08220b94d41b4094b3cacfecc3cdcddf6b54a3..980fdbb3e6fadf294b3dfbb4e19bd28feceeae05 100644 --- a/uiop/run-program.lisp +++ b/uiop/run-program.lisp @@ -556,7 +556,7 @@ It returns a process-info plist with possible keys: (declare (ignorable process)) #+(or allegro lispworks) process #+clasp (si:external-process-pid process) - #+clozure (ccl::external-process-pid process) + #+clozure (ccl:external-process-id process) #+ecl (ext:external-process-pid process) #+(or cmu scl) (ext:process-pid process) #+mkcl (mkcl:process-id process)