anchor.diff:    (when scroll-to-bottom
       (qrun* (qsingle-shot 0 'scroll-to-bottom))))
   
  +;;; wrappers for some QFrame methods
  +
  +(defun document-element ()
  +  (qrun* (! "documentElement" (frame))))
  +
  +(defun find-all-elements (query)
  +  (qrun* (! "findAllElements" (frame) query)))
  +
  +(defun find-first-element (query)
  +  (qrun* (! "findFirstElement" (frame) query)))
  +
   (defun scroll-to-top ()
     (qrun* (! "setScrollPosition" (frame) '(0 0))))
   
  
positive.code:    #:clear-pixmap
     #:clone
     #:document
     #:element
     #:enclose-contents-with
     #:enclose-with
     #:find-first
     #:first-child
     #:frame
     #:geometry
  
negative.code:   (defun clear-pixmap (web-element)
      (unless dummy
        (qrun* (setf dummy (qnew "QPixmap(int,int)" 1 1))
               (! "fill" dummy "transparent")))
      (assign-pixmap web-element dummy)))
  
  ;;; generic utilities
  