ソースコードをHTML表示用に整形するLISPver0.3 - Shammerismの継続。labels を使用してコード量を減らしてみた。 (defun tr (&rest contents) (let ((line "<tr>")) (cond ((typep contents 'string) (setf line (concatenate 'string line contents))) ((typep</tr>…