Re: Using #!optional, #!rest, and #!key together

["Sudarshan S Chawathe" <chaw@eip10.org>]

> I'm in a location with unexpectedly very bad connectivity. Check the
> invoke branch. It allows #!Rest *after* #!Key. See Application and
> arguments list in manual.

Thanks for the suggestion!  (I'm not sure why I switched back to master
from invoke a while back.)

I just switched over to the invoke branch and "rest after key" arguments
seems to work as expected (and also seems forgiving about ignoring extra
arguments).

The rest is just for completeness, in case it helps someone down the
road...

(define-syntax list/names
  (syntax-rules ()
    ((_ name ...) (list (cons 'name name) ...))))

(define test-args-2
  (lambda (a b #!optional c d #!key (f 'vf) (g 'vg) #!rest e)
    (list/names a b c d f g e)))

(test-args-2 1 2 3 4 f: 6 g: 7 5)
;; => ((a . 1) (b . 2) (c . 3) (d . 4) (f . 6) (g . 7) (e 5))

(test-args-2 1 2 3 4 f: 7 g: 8 5 6)
;; => ((a . 1) (b . 2) (c . 3) (d . 4) (f . 7) (g . 8) (e 5 6))

;; The next two are really errors.

(test-args-2 1 2 3 4 5 f: 6 g: 7)
;; => ((a . 1) (b . 2) (c . 3) (d . 4) (f . 6) (g . 7) (e))

(test-args-2 1 2 3 4 5 6 f: 7 g: 8)
;; => ((a . 1) (b . 2) (c . 3) (d . 4) (f . 7) (g . 8) (e))


Regards,

-chaw