anchor.diff:                                       `(:title ,(escape-string !)))
                                  ,@(!? copyright-href
                                        `(:href  ,(escape-string !))))))
  -                  ,@(!? external-stylesheet
  +                  ,@(!? external-stylesheets
                           (mapcan [`(link :rel "stylesheet" :type "text/css" :href ,_)]
                                   (ensure-list !)))
                     ,@(!? internal-stylesheet
  
positive.code:                                            (strict? t)
                                             (copyright-title nil) (copyright-href nil)
                                             (external-script nil)
                                             (external-stylesheet nil)
                                             (internal-stylesheet nil)
                                             (body nil))
    (with-output-file o pathname
      (print-html-script o script ,@(keyword-copiers :title :no-cache? :strict?
                                                     :copyright-title :copyright-href
                                                     :external-script
                                                     :external-stylesheet :internal-stylesheet
                                                     :body))))
  
negative.code:                                        (strict? t)
                                         (copyright-title nil) (copyright-href nil)
                                         (external-script nil)
                                         (external-stylesheets nil)
                                         (internal-stylesheet nil)
                                         (body nil))
    (with-default-stream o out
  