Terminate the thread invoking a periodic function.
Threads (multiprocessing) is not supported on the Common Lisp implementation.
Kill-periodic-function called outside the dynamic scope of a periodic function.
Define and spawn a periodic function that is invoked every 0.5 seconds to signal a
> (define-event-class half-second-timer-event (timer-interrupt-event) ()) half-second-timer-event > (defun half-second-timer () (unless (control-shell-running-p) (kill-periodic-function)) (signal-event 'half-second-timer-event)) half-second-timer > (spawn-periodic-function 'half-second-timer 0.5) #<thread Periodic Function half-second-timer> >
The GBBopen Project