anchor.diff:      query-selector-all
       _caroshi-rotation)
   
  -(defmethod caroshi-element child-array ()
  -  this.child-nodes)
  -
   (defmethod caroshi-element child-list ()
     (array-list child-nodes))
   
  
positive.code:   attrs)
  
  (defmethod caroshi-element remove-attributes (attrs)
    (adolist attrs
      (remove-attribute !)))
  
  (defmethod caroshi-element has-name? (x)
    (member (downcase (get-name)) (@ #'downcase (ensure-list x)) :test #'string==))
  
negative.code:   (& html (= inner-h-t-m-l html))
    (dom-tree-extend this))
  
  (defmethod caroshi-element get-child-at (idx)
    (assert (integer<= 0 idx) (+ "caroshi-element get-child-at " idx " is not a positive integer"))
    (let x first-child
  