anchor.diff:                   :web-context (make-context buffer)))
   
   (defmethod initialize-instance :after ((buffer status-buffer) &key)
  -  (PREFIX-within-renderer-thread-async
  +  (%within-renderer-thread-async
      (lambda ()
        (with-slots (gtk-object) buffer
          (setf gtk-object (make-web-view buffer))
  
positive.code:           (on-signal-decide-policy buffer response-policy-decision policy-decision-type-response)))))))
  
  (defmethod initialize-instance :after ((window gtk-window) &key)
    (PREFIX-within-renderer-thread-async
     (lambda ()
       (with-slots (gtk-object box-layout active-buffer
                    minibuffer-container minibuffer-view
  
negative.code:           (funcall thunk channel))
          (chanl:recv channel))))
  
  (defun %within-renderer-thread-async (thunk)
    "Same as `%within-renderer-thread' but THUNK is not blocking and does
  not return."
    (if (renderer-thread-p)
        (funcall thunk)
  