Changeset 7449


Ignore:
Timestamp:
Oct 15, 2007, 3:26:20 AM (14 years ago)
Author:
gb
Message:

ignorable declaration in COLLECT

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/lib/macros.lisp

    r7263 r7449  
    31863186                        (collect-normal-expander ',n-value ',kind args))
    31873187                macros))))
    3188     `(macrolet ,macros (let* ,(nreverse binds) ,@body))))
     3188    `(macrolet ,macros (let* ,(nreverse binds) (declare (ignorable ,@binds)) ,@body))))
    31893189
    31903190
Note: See TracChangeset for help on using the changeset viewer.