[CM] define* and :rest bug

[Christos Vagias]

Hi Bil,

I think I've stumbled upon a bug in define*

(define* (foo a b :rest rest (c #f) (d #f))
  (format #f "a=~A b=~A c=~A d=~A rest=~A"
 a b c d rest))

(foo 1 2 3 4)
returns "a=1 b=2 c=4 d=#f rest=(3 4)"

but, in the returned string, c should be #f
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://cm-mail.stanford.edu/pipermail/cmdist/attachments/20210730/a80a858d/attachment.html>