anchor.diff:      (:pixel-map-g-to-g-size :integer 1)
       (:pixel-map-b-to-b-size :integer 1)
       (:pixel-map-a-to-a-size :integer 1)
  -    (:map1-vertex-3 :boolean 1)
  -    (:map1-vertex-4 :boolean 1)
  -    (:map1-index :boolean 1)
  -    (:map1-color-4 :boolean 1)
  -    (:map1-normal :boolean 1)
  -    (:map1-texture-coord-1 :boolean 1)
  -    (:map1-texture-coord-2 :boolean 1)
  -    (:map1-texture-coord-3 :boolean 1)
  -    (:map1-texture-coord-4 :boolean 1)
  -    (:map2-vertex-3 :boolean 1)
  -    (:map2-vertex-4 :boolean 1)
  -    (:map2-index :boolean 1)
  -    (:map2-color-4 :boolean 1)
  -    (:map2-normal :boolean 1)
  -    (:map2-texture-coord-1 :boolean 1)
  -    (:map2-texture-coord-2 :boolean 1)
  -    (:map2-texture-coord-3 :boolean 1)
  -    (:map2-texture-coord-4 :boolean 1)
  +    ;; 6.43
  +    (:map1-vertex-3 :enable 1)
  +    (:map1-vertex-4 :enable 1)
  +    (:map1-index :enable 1)
  +    (:map1-color-4 :enable 1)
  +    (:map1-normal :enable 1)
  +    (:map1-texture-coord-1 :enable 1)
  +    (:map1-texture-coord-2 :enable 1)
  +    (:map1-texture-coord-3 :enable 1)
  +    (:map1-texture-coord-4 :enable 1)
  +    (:map2-vertex-3 :enable 1)
  +    (:map2-vertex-4 :enable 1)
  +    (:map2-index :enable 1)
  +    (:map2-color-4 :enable 1)
  +    (:map2-normal :enable 1)
  +    (:map2-texture-coord-1 :enable 1)
  +    (:map2-texture-coord-2 :enable 1)
  +    (:map2-texture-coord-3 :enable 1)
  +    (:map2-texture-coord-4 :enable 1)
       (:map1-grid-domain :float 2)
       (:map2-grid-domain :float 4)
       (:map1-grid-segments :float 1)
       (:map2-grid-segments :float 2)
  +    (:auto-normal :enable 1)
  +    ;; 6.44
  +    ;; get-shader-iv, get-shader-info-log, get-shader-source, need extra args
  +    ;; 6.45
  +    ;; get-program-pipeline-iv get-program-pipeline-info-log need extra args
  +    ;; 6,46
       (:current-program :integer 1)
  -    (:transform-feedback-buffer-binding :integer-i 1)
  -    (:transform-feedback-buffer-start :integer-i 1)
  -    (:transform-feedback-buffer-size :integer-i 1)
  -    (:max-transform-feedback-interleaved-components :integer 1)
  -    (:max-transform-feedback-separate-attribs :integer 1)
  -    (:max-transform-feedback-separate-components :integer 1)
  +    (:program-pipeline-binding :integer 1)
  +    ;; get-program-iv etc need extra args
  +    ;; 6.47
  +    ;; 6.48
  +    ;; 6.49
  +    (:uniform-buffer-binding :integer/i 1 :max-uniform-buffer-bindings)
  +    (:uniform-buffer-start :integer64-i 1 :max-uniform-buffer-bindings)
  +    (:uniform-buffer-size :integer64-i 1 :max-uniform-buffer-bindings)
  +    ;; get-program, get-active-uniforms, get-active-uniform-block
  +    ;; 6.50
  +    ;; 6.51
  +    ;; 6.52
  +    ;; get-program-stage, get-active-subroutine-uniform,
  +    ;; get-active-subroutine-name,
  +    ;; 6.53
  +    ;; get-active-atomic-counter-buffer-bindings, ...
  +    ;; 6.54
  +    (:vertex-program-two-side :enable 1)
  +    (:current-vertex-attrib :vertex-attrib-float 4 :max-vertex-attribs)
  +    (:program-point-size :enable 1)
  +    ;; 6.55
  +    ;; get-query-object
  +    ;; 6.56
  +    (:image-binding-name :integer-i 1 :max-image-units)
  +    (:image-binding-level :integer-i 1 :max-image-units)
  +    (:image-binding-layered :boolean-i 1 :max-image-units)
  +    (:image-binding-layer :integer-i 1 :max-image-units)
  +    (:image-binding-access :enum-i 1 :max-image-units)
  +    (:image-binding-format :enum-i 1 :max-image-units)
  +    ;; 6.57
  +    (:transform-feedback-buffer-binding :integer/i 1 :max-transform-feedback-buffers)
  +    (:transform-feedback-buffer-start :integer64-i 1 :max-transform-feedback-buffers)
  +    (:transform-feedback-buffer-size :integer64-i 1 :max-transform-feedback-buffers)
  +    (:transform-feedback-buffer-paused :boolean 1)
  +    (:transform-feedback-buffer-active :boolean 1)
  +    ;; 6.58
  +    (:atomic-counter-buffer-binding :integer/i 1 :max-atomic-counter-buffer-bindings)
  +    (:atomic-counter-buffer-start :integer64-i 1 :max-atomic-counter-buffer-bindings)
  +    (:atomic-counter-buffer-size :integer64-i 1 :max-atomic-counter-buffer-bindings)
  +    ;; 6.59
  +    ;; get-sync
  +    ;; 6.60
       (:perspective-correction-hint :enum 1)
       (:point-smooth-hint :enum 1)
       (:line-smooth-hint :enum 1)
  
positive.code:     (:pack-skip-rows :integer 1)
      (:pack-skip-pixels :integer 1)
      (:pack-alignment :integer 1)
      (:pixel-pack-buffer-binding :integer 1)
      (:pixel-unpack-buffer-binding :integer 1)
      (:map-color :boolean 1)
  
negative.code:     (:shading-language-version :string 1)
      (:vendor :string 1)
      (:version :string 1)
      ;; ?
      (:max-texture-units :integer 1)
      ;; 6.65
      (:max-vertex-attribs :integer 1)
      (:max-vertex-uniform-components :integer 1)
      (:max-vertex-uniform-vectors :integer 1)
      (:max-vertex-uniform-blocks :integer 1)
      (:max-vertex-output-components :integer 1)
      (:max-vertex-texture-image-units :integer 1)
      (:max-vertex-atomic-counter-buffers :integer 1)
      (:max-vertex-atomic-counters :integer 1)
      ;; 6.66
      (:max-tess-gen-level :integer 1)
      (:max-patch-vertices :integer 1)
      (:max-tess-control-uniform-components :integer 1)
      (:max-tess-evaluation-uniform-components :integer 1)
      (:max-tess-control-texture-image-units :integer 1)
      (:max-tess-evaluation-texture-image-units :integer 1)
      (:max-tess-control-output-components :integer 1)
      (:max-tess-patch-components :integer 1)
      (:max-tess-control-total-output-components :integer 1)
      (:max-tess-evaluation-output-components :integer 1)
      (:max-tess-control-input-components :integer 1)
      (:max-tess-evaluation-input-components :integer 1)
      (:max-tess-control-uniform-blocks :integer 1)
      (:max-tess-evaluation-uniform-blocks :integer 1)
      (:max-tess-control-atomic-counter-buffers :integer 1)
      (:max-tess-evaluation-atomic-counter-buffers :integer 1)
      (:max-tess-control-atomic-counters :integer 1)
      (:max-tess-evaluation-atomic-counters :integer 1)
      ;; 6.67
      (:max-geometry-uniform-components :integer 1)
      (:max-geometry-uniform-blocks :integer 1)
      (:max-geometry-input-components :integer 1)
      (:max-geometry-output-components :integer 1)
      (:max-geometry-output-vertices :integer 1)
      (:max-geometry-total-output-components :integer 1)
      (:max-geometry-texture-image-units :integer 1)
      (:max-geometry-shader-invocations :integer 1)
      (:max-vertex-streams :integer 1)
      (:max-geometry-atomic-counter-buffers :integer 1)
      (:max-geometry-atomic-counters :integer 1)
      ;; 6.68
      (:max-fragment-uniform-components :integer 1)
      (:max-fragment-uniform-vectors :integer 1)
      (:max-fragment-uniform-blocks :integer 1)
      (:max-fragment-input-components :integer 1)
      (:max-texture-image-units :integer 1)
      (:min-program-texture-gather-offset :integer 1)
      (:max-program-texture-gather-offset :integer 1)
      (:max-texture-units :integer 1)
      (:max-texture-coords :integer 1)
      (:max-fragment-atomic-counter-buffers :integer 1)
      (:max-fragment-atomic-counters :integer 1)
      ;; 6.69
      (:min-program-texel-offset :integer 1)
      (:max-program-texel-offset :integer 1)
      (:max-uniform-buffer-bindings :integer 1)
      (:max-uniform-block-size :integer 1)
      (:uniform-buffer-offset-alignment :integer 1)
      (:max-combined-uniform-blocks :integer 1)
      (:max-varying-components :integer 1)
      (:max-varying-vectors :integer 1)
      (:max-combined-texture-image-units :integer 1)
      (:max-subroutines :integer 1)
      (:max-subroutine-uniform-locations :integer 1)
      (:max-atomic-counter-buffer-bindings :integer 1)
      (:max-atomic-counter-buffer-size :integer 1)
      (:max-combined-atomic-counter-buffers :integer 1)
      (:max-combined-atomic-counters :integer 1)
      ;; 6.70
      (:max-image-units :integer 1)
      (:max-combined-image-units-and-fragment-outputs :integer 1)
      (:max-image-samples :integer 1)
      (:max-vertex-image-uniforms :integer 1)
      (:max-tess-control-image-uniforms :integer 1)
      (:max-tess-evaluation-image-uniforms :integer 1)
      (:max-geometry-image-uniforms :integer 1)
      (:max-fragment-image-uniforms :integer 1)
      (:max-combined-image-uniforms :integer 1)
      (:max-combined-vertex-uniform-components :integer 1)
      (:max-combined-geometry-uniform-components :integer 1)
      (:max-combined-tess-control-uniform-components :integer 1)
      (:max-combined-tess-evaluation-uniform-components :integer 1)
      (:max-combined-fragment-uniform-components :integer 1)
      ;; 6.71
      (:max-sample-mask-words :integer 1)
      (:max-samples :integer 1)
      (:max-color-texture-samples :integer 1)
      (:max-depth-texture-samples :integer 1)
      (:max-integer-samples :integer 1)
      (:quads-follow-provoking-vertex-convention :boolean 1)
      ;; (:query-counter-bits :... 1) ;; %gl:get-query-iv
      (:max-server-wait-timeout :integer64 1)
      (:min-fragment-interpolation-offset :float 1)
      (:max-fragment-interpolation-offset :float 1)
      (:fragment-interpolation-offset-bits :integer 1)
      ;; 6.72
      ;; get-internal-format-iv
      ;; 6.73
      (:max-transform-feedback-interleaved-components :integer 1)
      (:max-transform-feedback-separate-attribs :integer 1)
      (:max-transform-feedback-separate-components :integer 1)
      (:max-transform-feedback-buffers :integer 1)
      ;; 6.74
      (:aux-buffers :integer 1)
      (:max-draw-buffers :integer 1)
      (:max-dual-source-draw-buffers :integer 1)
      (:rgba-mode :boolean 1)
      (:index-mode :boolean 1)
      (:doublebuffer :boolean 1)
      (:stereo :boolean 1)
      (:sample-buffers :integer 1)
      (:samples :integer 1)
      (:sample-position :multisample-i 2 :samples)
      (:max-color-attachments :integer 1)
      (:red-bits :integer 1)
      (:green-bits :integer 1)
      (:blue-bits :integer 1)
  