[cl-who-devel] Exposing String Escape Functions

[Edi Weitz]

On Mon, 16 Jul 2007 14:13:27 +0300, Volkan YAZICI <yazicivo at ttnet.net.tr> wrote:

> In a parser I'm working on, trying to convert hand-written documents
> into XHTML form. And for this purpose using CL-WHO integrated within
> META-SEXP. Because of character-by-character parsing, I need to
> escape unrecognized atoms on-the-fly. At the moment, I'm using below
> method.
>
>   (elt
>    (cl-who:escape-string
>     (make-string 1 :initial-element character-needs-escaping))
>    0)

Hmm, I don't think I undertstand that.  Grabbing just the first
character will usually just give you the ampersand:

  CL-USER 1 > (let ((character-needs-escaping #\>))
                (elt
                 (cl-who:escape-string
                  (make-string 1 :initial-element character-needs-escaping))
                 0))
  #\&

Is that really what you want?