X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/aa14a4cddcb96b681d5c19a2ec8bad382f43b264..fdc3e506a199dcfe32e748de4010e908f5825b37:/src/parser/parser-expr-impl.lisp

diff --git a/src/parser/parser-expr-impl.lisp b/src/parser/parser-expr-impl.lisp
index 89b0f58..e0c681b 100644
--- a/src/parser/parser-expr-impl.lisp
+++ b/src/parser/parser-expr-impl.lisp
@@ -165,9 +165,11 @@
     (cerror* "Parse error: missing `~A'" tag)))
 
 (defmethod operator-push-action (left (right open-parenthesis))
+  (declare (ignore left))
   :push)
 
 (defmethod operator-push-action ((left open-parenthesis) right)
+  (declare (ignore right))
   :push)
 
 ;;;--------------------------------------------------------------------------