KMRCLを眺める(223) CDATA-STRING — #:g1

Posted 2010-11-06 12:46:00 GMT

今回はKMRCLのxml-utils.lispから、CDATA-STRINGです。
動作は、

(kl:cdata-string "<いろはにほへと><ちりぬるを>")
;=> "<![CDATA[<いろはにほへと><ちりぬるを>]]>"
という風。
定義は、単純に
(defun cdata-string (str)
  (concatenate 'string "<![CDATA[" str "]]>"))
となっています。

comments powered by Disqus