Re: [Chicken-janitors] #1630: Optimizer sometimes incorrectly drops procedure arguments

[Chicken Trac]

#1630: Optimizer sometimes incorrectly drops procedure arguments
---------------------------------+----------------------
            Reporter:  sjamaan   |      Owner:
                Type:  defect    |     Status:  reopened
            Priority:  major     |  Milestone:  5.2
           Component:  compiler  |    Version:  5.1.0
          Resolution:            |   Keywords:
Estimated difficulty:  hard      |
---------------------------------+----------------------
Changes (by felix):

 * difficulty:  medium => hard


Comment:

 Here is another test, submitted by megane. This triggers a compiler error,
 with the standard CHICKEN:

 {{{
 (define (foo x y)
   (define (append-map proc . lsts)
     (if (null? lsts)
         (proc 1)
         (apply proc lsts)))
   (append-map (lambda (a) (print a)))
   (append-map (lambda (a b) (print a b)) x y))

 (foo 3 4)
 }}}

--
Ticket URL: <https://bugs.call-cc.org/ticket/1630#comment:8>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.