anchor.diff:  (defparameter *browser-class* 'qt-browser)
   
   (defmethod initialize ((browser qt-browser) urls startup-timestamp)
  -  (log:debug "Initializing Qt Interface"))
  +  (log:debug "Initializing Qt Interface")
  +  (setf (application browser)
  +        (qt:new-q-application 1 (cffi:foreign-alloc :string
  +                                                    :initial-contents (list "Next")
  +                                                    :null-terminated-p t)))
  +  (finalize browser urls startup-timestamp))
   
   (defmethod kill-interface ((browser qt-browser)))
   
  
positive.code: @export
  (defparameter *buffer-class* 'qt-buffer)
  
  (defmethod initialize-instance :after ((window qt-window) &key))
  
  (defmethod process-destroy ((window qt-window))
    (window-delete window))
  
negative.code: 
  @export
  @export-accessors
  (defclass qt-browser (browser)
    ((application :accessor application)))
  
  (define-class-type browser)
  (declaim (type (browser-type) *browser-class*))
  