Author: ehuelsmann Date: Sun Sep 23 09:14:50 2012 New Revision: 227

Log: Threading now located in the THREADS package on abcl.

Modified: trunk/protocol.lisp

Modified: trunk/protocol.lisp ============================================================================== --- trunk/protocol.lisp Sun Sep 23 07:32:21 2012 (r226) +++ trunk/protocol.lisp Sun Sep 23 09:14:50 2012 (r227) @@ -294,7 +294,7 @@ #+lispworks (mp:process-run-function name nil function) #+sb-thread (sb-thread:make-thread function :name name) #+openmcl (ccl:process-run-function name function) - #+armedbear (ext:make-thread function)) + #+armedbear (threads:make-thread function))

(defun start-background-message-handler (connection) "Read messages from the `connection', parse them and dispatch @@ -340,7 +340,7 @@ #+sb-thread (sb-thread:destroy-thread process) #+lispworks (mp:process-kill process) #+openmcl (ccl:process-kill process) - #+armedbear (ext:destroy-thread process)) + #+armedbear (threads:destroy-thread process))

(defgeneric read-message-loop (connection)) (defmethod read-message-loop (connection)