diff --git a/src/main/readtable.cl b/src/main/readtable.cl
index eac71fe..5e411d2 100644
--- a/src/main/readtable.cl
+++ b/src/main/readtable.cl
@@ -19,6 +19,7 @@
   ;; HTTP-Versions
   (set-dispatch-macro-character #\# #\H
 				#'(lambda (stream subchar args)
+				    (declare (ignore subchar args))
 				    (let ((data (read stream t nil t)))
 				      (check-type data string)
 				      (parse-http-version data)))
@@ -26,6 +27,7 @@
   ;; URL Parsing
   (set-dispatch-macro-character #\# #\U
 				#'(lambda (stream subchar args)
+				    (declare (ignore subchar args))
 				    (let ((data (read stream t nil t)))
 				      (check-type data string)
 				      (parse-url-from-string data)))