fix(lisp/klatre): declare ignore unused variables

CCL refuses to compile anything with undeclared ignored variables, so we
need to be more verbose here.

Change-Id: I9bf32e0bc303716d3cd6fe7b525d1434062d69eb
Reviewed-on: https://cl.tvl.fyi/c/depot/+/3348
Tested-by: BuildkiteCI
Reviewed-by: grfn <grfn@gws.fyi>
This commit is contained in:
sterni 2021-08-13 11:54:35 +02:00
parent 17a75dfc42
commit 5711b4ee16

View file

@ -1,7 +1,8 @@
(in-package #:klatre)
(declaim (optimize (safety 3)))
(defmacro comment (&rest _))
(defmacro comment (&rest _)
(declare (ignore _)))
(defun posp (n) (> n 0))
@ -104,7 +105,7 @@ separated by SEP."
"Attempt to parse STR as an integer, returning nil if it is invalid."
(check-type str string)
(handler-case (parse-integer str)
(sb-int:simple-parse-error (_) nil)))
(sb-int:simple-parse-error (_) (declare (ignore _)) nil)))
;;;
;;; Function utilities