Specialize some arguments on type T to silence CCL warnings.

git-svn-id: svn://bknr.net/svn/trunk/thirdparty/cl-ppcre@4207 4281704c-cde7-0310-8518-8e2dc76b1ff0
This commit is contained in:
Hans Huebner
2009-02-09 12:15:29 +00:00
parent 274042dacf
commit 364d7df27d

View File

@ -325,7 +325,7 @@ it. Will also
(:documentation "Helper function for CONVERT-AUX which converts
parse trees which are conses and dispatches on TOKEN which is the
first element of the parse tree.")
(:method (token parse-tree &key)
(:method (token (parse-tree t) &key)
(signal-syntax-error "Unknown token ~A in parse-tree." token)))
(defmethod convert-compound-parse-tree ((token (eql :sequence)) parse-tree &key)