Ignore:
Timestamp:
08/09/12 09:19:40 (9 years ago)
Author:
ehuelsmann
Message:

Fix declarations being dropped on inline expansions.

Report by James M. Lawrence.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/compile-file.lisp

    r14027 r14067  
    529529            (setf (inline-expansion name)
    530530                  (jvm::generate-inline-expansion block-name
    531                                                   lambda-list body))
     531                                                  lambda-list
     532                                                  (append decls body)))
    532533            (output-form `(setf (inline-expansion ',name)
    533534                                ',(inline-expansion name))))))
Note: See TracChangeset for help on using the changeset viewer.