>>672
(tag)
<tag></tag>
記述量が倍違う。

は冗談として、
そのままLISPリーダーとして活用できたりするとか。
(with-input-from-string
　"<begin><display>hello world!<newline></begin>"
　html->sexpr)
=>(begin (display "hello world!") (newline))

(eval(with-input-from-string
　"<begin><display>hello world!<newline></begin>"
　html->sexpr))
hello world!