diff --git a/code/exports.lisp b/code/exports.lisp index 70cd7d4cc224d291cbd2a27841d42377a9894cb5..8a6fce93487e4a66b411ff1a4d7f18788ae0296d 100644 --- a/code/exports.lisp +++ b/code/exports.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.133 1997/11/18 10:55:09 dtc Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.134 1997/12/13 16:47:47 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -1624,16 +1624,14 @@ (defpackage "MULTIPROCESSING" (:use "COMMON-LISP") (:nicknames "MP") - (:export "INIT-STACK-GROUPS" "MAKE-STACK-GROUP" "STACK-GROUP-RESUME" - "*CURRENT-STACK-GROUP*" "*INITIAL-STACK-GROUP*" - "*MULTI-PROCESSING*" "*CURRENT-PROCESS*" "*ALL-PROCESSES*" - "ALL-PROCESSES" "CURRENT-PROCESS" - "MAKE-PROCESS" "PROCESSP" "PROCESS-STATE" "PROCESS-WHOSTATE" - "PROCESS-NAME" "DESTROY-PROCESS" "PROCESS-WAIT" - "PROCESS-WAIT-WITH-TIMEOUT" "PROCESS-YIELD" - "PROCESS-INTERRUPT" "DISABLE-PROCESS" "ENABLE-PROCESS" - "RESTART-PROCESS" "PROCESS-PRESET" - "WITHOUT-SCHEDULING" "SHOW-PROCESSES" - "PROCESS-ACTIVE-P" "PROCESS-ALIVE-P" - "ATOMIC-INCF" "ATOMIC-DECF" "ATOMIC-PUSH" "ATOMIC-POP" - "MAKE-LOCK" "WITH-LOCK-HELD")) + (:export "*ALL-PROCESSES*" "*CURRENT-PROCESS*" "*CURRENT-STACK-GROUP*" + "*INITIAL-STACK-GROUP*" "*MULTI-PROCESSING*" + "ALL-PROCESSES" "ATOMIC-DECF" "ATOMIC-INCF" "ATOMIC-POP" + "ATOMIC-PUSH" "CURRENT-PROCESS" "DESTROY-PROCESS" "DISABLE-PROCESS" + "ENABLE-PROCESS" "INIT-STACK-GROUPS" "LOCK" "MAKE-STACK-GROUP" + "MAKE-LOCK" "MAKE-PROCESS" "PROCESS-ACTIVE-P" "PROCESS-ALIVE-P" + "PROCESS-INTERRUPT" "PROCESS-NAME" "PROCESS-PRESET" + "PROCESS-STATE" "PROCESS-WAIT" "PROCESS-WAIT-WITH-TIMEOUT" + "PROCESS-WHOSTATE" "PROCESS-YIELD" "PROCESSP" "RESTART-PROCESS" + "SHOW-PROCESSES" "STACK-GROUP-RESUME" "WITHOUT-SCHEDULING" + "WITH-LOCK-HELD"))