;; disabled, because it cleans up on self-destruct.
(define-simple-actor <exploder>
(explode (lambda (exploder message)
(speak "POOF\n")
(self-destruct exploder)))
;; disabled, because it cleans up on self-destruct.
(define-simple-actor <exploder>
(explode (lambda (exploder message)
(speak "POOF\n")
(self-destruct exploder)))