Zach Beane  <xach@xach.com> wrote:
+---------------
| rpw3@rpw3.org (Rob Warnock) writes:
| 
| > p.s. A very common usage of that is this idiom:
| >
| >     (defun format-val (val &key
| >                        ((stream *standard-output*) *standard-output*))
| >       (format t "...{magic format for a VAL}..." val))
| >
| > followed by:
| >
| >     (format-val some-val)	; goes to *standard-output*
| > or:
| >     (format-val some-val :stream some-other-stream-entirely)
| 
| I think you mean:
| 
|   (format-val some-val 'stream some-other-stream-entirely)
| 
| or:
| 
|   (defun format-val (val &key ((:stream *standard-output*) *standard-output*))
|     ...)
+---------------

Oops!! Yes, thanks! Right you are! (*blush*) I meant the latter,
of course. I forgot that the coercion to the KEYWORD package doesn't
occur if the ((KEYWORD-NAME VAR) INIT-FORM) is used, only for the
(VAR INIT-FORM) style.


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607