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:  medium    |
---------------------------------+----------------------

Comment (by sjamaan):

 This code seems valid to me but also triggers the error when compiled with
 -O2:

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

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