Revision: 4206 Author: hans URL: http://bknr.net/trac/changeset/4206 Specialize some arguments on type T to silence CCL warnings. U trunk/thirdparty/chunga/input.lisp U trunk/thirdparty/chunga/output.lisp Modified: trunk/thirdparty/chunga/input.lisp =================================================================== --- trunk/thirdparty/chunga/input.lisp 2009-02-09 12:14:17 UTC (rev 4205) +++ trunk/thirdparty/chunga/input.lisp 2009-02-09 12:15:01 UTC (rev 4206) @@ -29,15 +29,15 @@ (in-package :chunga) -(defmethod chunked-input-stream-extensions (object) +(defmethod chunked-input-stream-extensions ((object t)) "The default method which always returns the empty list." nil) -(defmethod chunked-input-stream-trailers (object) +(defmethod chunked-input-stream-trailers ((object t)) "The default method which always returns the empty list." nil) -(defmethod chunked-stream-input-chunking-p (object) +(defmethod chunked-stream-input-chunking-p ((object t)) "The default method for all objects which are not of type CHUNKED-INPUT-STREAM." nil) Modified: trunk/thirdparty/chunga/output.lisp =================================================================== --- trunk/thirdparty/chunga/output.lisp 2009-02-09 12:14:17 UTC (rev 4205) +++ trunk/thirdparty/chunga/output.lisp 2009-02-09 12:15:01 UTC (rev 4206) @@ -29,7 +29,7 @@ (in-package :chunga) -(defmethod chunked-stream-output-chunking-p (object) +(defmethod chunked-stream-output-chunking-p ((object t)) "The default method for all objects which are not of type CHUNKED-OUTPUT-STREAM." nil)