Changeset 12805

Timestamp:

Sep 10, 2009, 7:02:36 AM (15 years ago)

Author:

R. Matthew Emerson

Message:

set-charprops: remove ignore decl

File:

• trunk/source/cocoa-ide/hemlock/src/charprops.lisp (modified) (1 diff)

trunk/source/cocoa-ide/hemlock/src/charprops.lisp

@@ -563 +563 @@
 (defun set-charprops (mark charprops &key (count 1 count-supplied-p)
                            (end nil end-supplied-p) (filter (charprops-names charprops)))
-  (declare (ignore filter end count charprops mark))
   (when (and count-supplied-p end-supplied-p)
     (error "Only one of count or end can be supplied."))