RE: name-capture problem in completing-read

[Drew Adams]

> > I could use a macro with an uninterned symbol, but I really 
> > want to use a function.
> 
> (defun foo (#1=#:arg)
>   (list #1# (symbol-name '#1#) (intern-soft '#1#)))
> 
> (foo 0)   =>   (0 "arg" nil)

Thanks!