[bknr-cvs] hans changed trunk/thirdparty/cl-ppcre/convert.lisp

[BKNR Commits]

Revision: 4207
Author: hans
URL: http://bknr.net/trac/changeset/4207

Specialize some arguments on type T to silence CCL warnings.
U   trunk/thirdparty/cl-ppcre/convert.lisp

Modified: trunk/thirdparty/cl-ppcre/convert.lisp
===================================================================
--- trunk/thirdparty/cl-ppcre/convert.lisp	2009-02-09 12:15:01 UTC (rev 4206)
+++ trunk/thirdparty/cl-ppcre/convert.lisp	2009-02-09 12:15:29 UTC (rev 4207)
@@ -325,7 +325,7 @@
   (: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)