/[slime]/slime/swank-allegro.lisp
ViewVC logotype

Diff of /slime/swank-allegro.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.15 by heller, Thu Feb 26 07:16:16 2004 UTC revision 1.16 by heller, Mon Mar 1 09:02:06 2004 UTC
# Line 345  Line 345 
345  (defimplementation interrupt-thread (thread fn)  (defimplementation interrupt-thread (thread fn)
346    (mp:process-interrupt thread fn))    (mp:process-interrupt thread fn))
347    
348    (defimplementation kill-thread (thread)
349      (mp:process-kill thread))
350    
351  (defvar *mailbox-lock* (mp:make-process-lock :name "mailbox lock"))  (defvar *mailbox-lock* (mp:make-process-lock :name "mailbox lock"))
352    
353  (defstruct (mailbox (:conc-name mailbox.))  (defstruct (mailbox (:conc-name mailbox.))

Legend:
Removed from v.1.15  
changed lines
  Added in v.1.16

  ViewVC Help
Powered by ViewVC 1.1.5