Changeset 11396


Ignore:
Timestamp:
11/24/08 19:01:42 (12 years ago)
Author:
vvoutilainen
Message:

Fix return in an anonymous lambda. An anynonymous lambda
should not generate a block around the lambda body.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/jvm.lisp

    r11391 r11396  
    868868                 (parse-body body)
    869869               (setf (compiland-lambda-expression compiland)
    870                      `(lambda ,lambda-list ,@decls (block nil ,@body)))
     870                     `(lambda ,lambda-list ,@decls ,@body))
    871871               (let ((*visible-variables* *visible-variables*)
    872872                     (*current-compiland* compiland))
Note: See TracChangeset for help on using the changeset viewer.