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:
parent
17a75dfc42
commit
5711b4ee16
1 changed files with 3 additions and 2 deletions
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue