(push (cons arg value) keyargs))
(setq keyargs (nreverse keyargs))
`(let ((,bound-keyargs ,(macroexpand `(bind-all-keyargs ,keyargs))))
,(macroexpand `(with-no-endtag-keyargs ,tag ,bound-keyargs)))))
(push (cons arg value) keyargs))
(setq keyargs (nreverse keyargs))
`(let ((,bound-keyargs ,(macroexpand `(bind-all-keyargs ,keyargs))))
,(macroexpand `(with-no-endtag-keyargs ,tag ,bound-keyargs)))))