From cf23b9594b3902181861f4ffa08f06fad758d5c0 Mon Sep 17 00:00:00 2001 From: ckonstanski Date: Thu, 8 Jan 2026 08:06:55 -0700 Subject: cleaning up unused variables --- lisp/queue/queue.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/queue') diff --git a/lisp/queue/queue.lisp b/lisp/queue/queue.lisp index ecd517f..47b9e65 100644 --- a/lisp/queue/queue.lisp +++ b/lisp/queue/queue.lisp @@ -12,7 +12,7 @@ (defvar *queue-mutex* (sb-thread:make-mutex)) (defmacro with-error-handled-thread ((thread-name level) &body body) - "`level' is either :warning or :critical." + (declare (ignore level)) (let ((thread-fn (intern (string-upcase thread-name) *package*))) `(progn (defun ,thread-fn () -- cgit v1.3