ignoring unused variable

thezerobit · Nov 27, 2014 · fff5ebe · fff5ebe
1 parent 1025cc1
commit fff5ebe
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/green-threads.lisp b/src/green-threads.lisp
@@ -257,6 +257,7 @@
         ;; then runs the thread loop
         (attach future
           (lambda (&rest vals)
+            (declare (ignore vals))
             (setf *thread-queue* (snoc *thread-queue* thread))
             (when (not *current-thread*) (thread-loop)))))
       (queue-next action thread))))