anchor.diff:     #:get-physical-device-wayland-presentation-support-khr
      #:get-physical-device-win32-presentation-support-khr
      #:get-physical-device-xlib-presentation-support-khr
  -   #:get-physical-device-xcb-presentation-support-khr
  -   )
  +   #:get-physical-device-xcb-presentation-support-khr)
     (:export
  +   #:not-ready
  +   #:timeout
  +   #:event-set
  +   #:event-reset
  +   #:incomplete
  +   #:suboptimal-khr
  +
  +   #:error-out-of-host-memory
  +   #:error-out-of-device-memory
  +   #:error-initialization-failed
  +   #:error-device-lost
  +   #:error-memory-map-failed
  +   #:error-layer-not-present
  +   #:error-extension-not-present
  +   #:error-feature-not-present
  +   #:error-incompatible-driver
  +   #:error-too-many-objects
  +   #:error-format-not-supported
  +   #:error-surface-lost-khr
  +   #:error-native-window-in-use-khr
  +   #:error-out-of-date-khr
  +   #:error-incompatible-display-khr
  +   #:error-validation-failed-ext
  +   #:nv-extension-0-error
  +   #:nv-extension-1-error
  +
      #:with-instance
      #:enumerate-physical-devices
      #:get-physical-device-properties
  
positive.code:   (:nicknames :vk)
    (:import-from
     #:%vk
     #:get-device-proc-addr
     #:get-event-status
     #:get-fence-status
  
negative.code:    #:get-physical-device-surface-formats-khr
     #:with-swapchain
     #:get-physical-device-surface-present-modes-khr
     #:create-command-pool
     #:create-swapchain-khr
     #:destroy-swapchain-khr
     #:get-swapchain-images-khr
     #:acquire-next-image-khr
     #:allocate-command-buffers
     #:device-wait-idle
     #:destroy-command-pool))
  