X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/aa14a4cddcb96b681d5c19a2ec8bad382f43b264..1d8cc67a3f4ded443f5efc673a616883cbae9c50:/src/parser/scanner-token-impl.lisp

diff --git a/src/parser/scanner-token-impl.lisp b/src/parser/scanner-token-impl.lisp
index bf5e394..9535d3d 100644
--- a/src/parser/scanner-token-impl.lisp
+++ b/src/parser/scanner-token-impl.lisp
@@ -73,6 +73,7 @@
 	  tail place)))
 
 (defmethod scanner-release-place ((scanner token-scanner) place)
+  (declare (ignore place))
   (with-slots (captures) scanner
     (decf captures)))