Changeset 14067 for trunk/abcl/src/org/armedbear/lisp/compile-file.lisp
- Timestamp:
- 08/09/12 09:19:40 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/compile-file.lisp
r14027 r14067 529 529 (setf (inline-expansion name) 530 530 (jvm::generate-inline-expansion block-name 531 lambda-list body)) 531 lambda-list 532 (append decls body))) 532 533 (output-form `(setf (inline-expansion ',name) 533 534 ',(inline-expansion name))))))
Note: See TracChangeset
for help on using the changeset viewer.