[Bug-kawa] [bug #27042] Bad interaction between syntax-rules and call-with-values

[Per Bothner]

Update of bug #27042 (project kawa):

                  Status:                    None => Fixed                  
             Assigned to:                    None => bothner                
             Open/Closed:                    Open => Closed                 

    _______________________________________________________

Follow-up Comment #1:

Thanks for the bug report, and sorry for it taking so long!

If turned out to have nothing to do specifically with call-with-values - it
actually was a bad interaction between syntax-rules and lambda.  The following
example showed the same problem:

(let-syntax ((dlet
              (syntax-rules ()
                ;; var==x val==(+x 10) body==x
                ((dlet (var val) body)
                 (let ((saved var)) ; saved=0
                   (set! var val) ; x = 10
                   ((lambda (result) ; result=10
                       (set! var result) ; x=10
                       (set! var saved) ; x=0
                       result) ; 10
                     body))))))
  (let ((x 0))
    (display x)
    (display
     (dlet (x (+ x 10))
           x))
    (display x)
    (newline)))

I tracked it down, and fixed it.  Fix and test-case checked in.

    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?27042>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/