Hello,
I would like to have a function that saves a core file and quits when 
I am working with slime. First I tried:
 (defun shutdown ()
  (extensions:save-lisp "/mnt/ldisk1/worlds/last.core")
  (quit))
but it did not work because save-lisp should be called by the
mp::*initial-process*. I tried this:
(defun shutdown ()
  (setf mp:*current-process* mp::*initial-process*)
  (extensions:save-lisp "/mnt/ldisk1/worlds/last.core")
  (quit))
which seems to be a bad idea :-(

Anybody knows how to do this ?
I am using cmucl-19a on Linux/x86.

Thibault





Reply via email to