anchor.diff:      :ins :del :col :meter :output))
   
   (defun inline? (element)
  +  (declare (inline memq))
     (memq element *inline-elements*))
   
   (define-global-parameter *paragraph-elements*
  
positive.code:     :dt :dd :figcaption :iframe :colgroup :td :th :output :summary :command))
  
  (defun paragraph? (element)
    (memq element *paragraph-elements*))
  
  (define-global-parameter *end-tag-optional*
  
negative.code:           preformatted?))
  
  (define-global-parameter *void-elements*
      '(:!doctype :area :base :br :col :command :embed :hr :img
        :input :keygen :link :meta :param :source :track :wbr))
  
  (defun void? (element)
    (declare (inline memq))
    (memq element *void-elements*))
  
  (define-global-parameter *literal-elements*
  