Re: make-process for SBCL
Robin Lee Powell <[email protected]> Thu, 31 Jul 2008 02:05:20 -0700
| Newsgroups | gmane.lisp.clocc.devel |
|---|---|
| Message-ID | <[email protected]> |
On Wed, Jul 30, 2008 at 07:57:19PM -0400, Sam Steingold wrote: > The following message is a courtesy copy of an article > that has been posted to gmane.lisp.clocc.devel as well. > > > * Robin Lee Powell <[email protected]> [2008-07-30 16:03:13 -0700]: > > > > *** clocc/src/port/proc.lisp.orig 2008-07-30 12:18:50.000000000 -0700 > > --- clocc/src/port/proc.lisp 2008-07-30 12:34:06.000000000 -0700 > > *************** > > *** 77,84 **** > > LispWorks > > (and Lucid multitasking) > > MCL > > ! scl) > > ! > > (eval-when (compile load eval) > > (pushnew :threads *features*)) > > > > --- 77,84 ---- > > LispWorks > > (and Lucid multitasking) > > MCL > > ! scl > > ! (and sbcl sb-thread)) > > (eval-when (compile load eval) > > (pushnew :threads *features*)) > > > > *************** > > *** 111,116 **** > > --- 111,118 ---- > > (apply function args)))))) > > (ccl:process-run-function name #'process-wrapper)) > > #+scl (thread:thread-create (lambda () (apply function args)) :name name) > > + #+(and sbcl sb-thread) > > + (sb-thread:make-thread (lambda () (apply function args)) :name name) > > #-threads > > (error 'not-implemented :proc (list 'make-process name function args))) > > and where are all the other functions? I haven't needed them yet; my goal here is to get stuff done, not to work on clocc. There seemed to be plent of other bits of partial support, so I didn't realize it mattered. -Robin -- Lojban Reason #17: http://en.wikipedia.org/wiki/Buffalo_buffalo Proud Supporter of the Singularity Institute - http://singinst.org/ http://www.digitalkingdom.org/~rlpowell/ *** http://www.lojban.org/ ------------------------------------------------------------------------- This SF.Net email is sponsored by the Moblin Your Move Developer's challenge Build the coolest Linux based applications with Moblin SDK & win great prizes Grand prize is a trip for two to an Open Source event anywhere in the world http://moblin-contest.org/redirect.php?banner_id=100&url=/