[armedbear] #474: Regression, immediately invoked function expressions

[armedbear]

#474: Regression, immediately invoked function expressions
-------------------------------+--------------------
      Reporter:  Mark Evenson  |       Type:  defect
        Status:  new           |   Priority:  major
     Milestone:  1.8.0         |  Component:  other
       Version:  1.7.1-dev     |   Keywords:
Parent Tickets:                |
-------------------------------+--------------------
 Robert Munyer notes in
 <https://mailman.common-lisp.net/pipermail/armedbear-
 devel/2020-September/004134.html>:
 {{{
 The function below works in CCL, CLISP, SBCL and ABCL 1.4.0,
 but not in ABCL 1.7.1.

 $ java -jar abcl-1.7.1.jar
 Armed Bear Common Lisp 1.7.1
 Java 1.8.0_265 Oracle Corporation
 OpenJDK 64-Bit Server VM
 Low-level initialization completed in 0.188 seconds.
 Startup completed in 0.869 seconds.
 Type ":help" for a list of available commands.
 CL-USER(1): (defun add3 (foo)
               ((lambda (bar)
                  ((lambda (baz)
                     (1+ baz))
                   (1+ bar)))
                (1+ foo)))
 #<THREAD "interpreter" {32B46F86}>: Debugger invoked on condition of type
 TYPE-ERROR
   The value (LAMBDA (BAZ) (1+ BAZ)) is not of type SYMBOL.
 Restarts:
   0: TOP-LEVEL Return to top level.
 [1] CL-USER(2):
 }}}

-- 
Ticket URL: <https://abcl.org/trac/ticket/474>
armedbear <https://abcl.org>
armedbear