anchor.diff:            (funcall thunk channel))
           (chanl:recv channel))))
   
  -(defun PREFIX-within-renderer-thread-async (thunk)
  -  "Same as `PREFIX-within-renderer-thread' but THUNK is not blocking and does
  +(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)
  
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:       #'javascript-error-handler))))
  
  (defmethod ffi-buffer-evaluate-javascript-async ((buffer gtk-buffer) javascript)
    (%within-renderer-thread-async
     (lambda ()
       (webkit2:webkit-web-view-evaluate-javascript
        (gtk-object buffer)
  