anchor.diff:                      (lml2:lml-princ "No differences"))
                      (t
                       (lml2:html
  -                     (:P 
  +                     (:p 
                         "Insert: " (lml2:lml-princ insert)
                         ", Delete: " (lml2:lml-princ delete)
                         ", Replace " (lml2:lml-princ replace))
  
positive.code:                ((:link :rel "stylesheet" :href "style.css")))
          (:body
           ((:div :id "contents")
            (:P "Error during parsing of '" (lml2:lml-princ basename) "'.")
            ((:a :href "index.html") "Back to index")
            (:P 
             (:pre
              (lml2:lml-princ
               (html-encode:encode-for-pre 
  
negative.code:                ((:link :rel "stylesheet" :href "style.css")))
          (:body
           ((:div :id "contents")
            (:p 
             "Below are the results of running "
             ((:a :href "http://www.common-lisp.net/project/cl-markdown") "CL-Markdown")
             " and the Perl " ((:a :href "http://www.daringfireball.net/markdown") "Markdown") 
             " script on the same input. You'll see that the current version of CL-Markdown performs well on most documents and poorly on a few. You'll also find that the rendered HTML can be very similar even where the diffs between outputs contains many insertions and deletions.")
            (:p 
             "This will be updated regularly. The most recent update was "
             (lml2:lml-princ (format-date "%e %B %Y" (get-universal-time))))
  
            (:h2 "Comparison Tests")
            
            (iterate-elements 
             (directory 
  