Changeset 12575


Ignore:
Timestamp:
Aug 13, 2009, 2:23:32 PM (10 years ago)
Author:
gb
Message:

In the binding established by the expansion of DOLIST's result form,
don' include the declarations from the body.

File:
1 edited

Legend:

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

    r12535 r12575  
    197197              (if ,lstsym (go ,toplab))))
    198198         ,@(if ret `((let ((,varsym nil))
    199                        (declare (ignore-if-unused ,varsym))
    200                        ,@decls
     199                       (declare (ignorable ,varsym))
     200                       ;;,@decls
    201201                       ,ret)))))))
    202202
Note: See TracChangeset for help on using the changeset viewer.