Ignore unused variable.

AccelerationNet · Jul 28, 2020 · 9be4bc1 · 9be4bc1
1 parent 13acef2
commit 9be4bc1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/collectors.lisp b/collectors.lisp
@@ -264,7 +264,7 @@ binds *print-pretty* to nil
    o (lambda (&rest values) (operate o values))))
 
 (defgeneric should-aggregate? (aggregator value)
-  (:method ((o value-aggregator) v) t)
+  (:method ((o value-aggregator) v) (declare (ignore v)) t)
   (:documentation "Should we aggregate a given value into our collection"))
 
 (defgeneric deoperate (aggregator values &key test key)