我正在尝试使用 cl-who 生成以下 html 代码:
<html>
<body>
<div id="cnt_1"></div>
<div id="cnt_2"></div>
<div id="cnt_3"></div>
</body>
</html>
这是我认为可以工作的代码:
(with-html-output-to-string (*standard-output* nil)
(:html
(:body
(do ((cnt 1 (+ cnt 1)))
((> cnt 3))
(htm (:div :id (format t "cnt_~A" cnt)))))))
但相反,我得到以下输出:
<html><body><divcnt_1></div><divcnt_2></div><divcnt_3></div></body></html>
似乎 :id 不适用于函数调用。这是否意味着我不能在 cl-Who 中使用格式?我应该改用什么?
这是因为您不想直接在流中写入。
CL-USER> (with-html-output-to-string (s) (:div :id "test"))
"<div id='test'></div>"
CL-USER> (with-html-output-to-string (s)
(:html
(:body
(do ((cnt 1 (+ cnt 1)))
((> cnt 3))
(htm (:div :id (format nil "cnt_~A" cnt)))))))
"<html><body><div id='cnt_1'></div><div id='cnt_2'></div><div id='cnt_3'></div></body></html>"
顺便说一下,如果你想直接在流中写入,请使用CL-WHO:FMT。