Changes that bring CLASH up to extended HTTP/1.0 support:

Added declarations to silence warnings on unused arguments.
This commit is contained in:
2000-07-22 00:19:55 +00:00
parent 22b2bf1abd
commit 22b8cd9c8f

View File

@ -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)))