kill-periodic-function

Purpose
Terminate the thread invoking a periodic function.

Package   :portable-threads

Module   :portable-threads

Errors
Threads (multiprocessing) is not supported on the Common Lisp implementation.

Kill-periodic-function called outside the dynamic scope of a periodic function.

See also
    *periodic-function-verbose*
    all-threads
    kill-thread
    spawn-periodic-function

Example
Define and spawn a periodic function that is invoked every 0.5 seconds to signal a half-second-interrupt-event, continuing as long as the control shell is running:

  > (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>
  >

kill-periodic-function