Author: ctian Date: Wed Sep 15 02:14:59 2010 New Revision: 561 Log: ABCL: spawn-thread now works in ABCL. Modified: usocket/trunk/vendor/spawn-thread.lisp Modified: usocket/trunk/vendor/spawn-thread.lisp ============================================================================== --- usocket/trunk/vendor/spawn-thread.lisp (original) +++ usocket/trunk/vendor/spawn-thread.lisp Wed Sep 15 02:14:59 2010 @@ -65,6 +65,9 @@ #+scl (mp:make-process #'(lambda () (apply function args)) :name name) + #+abcl + (threads:make-thread #'(lambda () (apply function args)) + :name name) #+threads-not-available (declare (ignore name function args)) #+threads-not-available