lib/opengl-ext_vertex_shader.lisp

   1
   2 (in-package #:gl)
   3
   4 ;;;; EXT_vertex_shader
   5
   6 (defconstant +vertex-shader-ext+ #x8780)
   7 (defconstant +vertex-shader-binding-ext+ #x8781)
   8 (defconstant +op-index-ext+ #x8782)
   9 (defconstant +op-negate-ext+ #x8783)
  10 (defconstant +op-dot3-ext+ #x8784)
  11 (defconstant +op-dot4-ext+ #x8785)
  12 (defconstant +op-mul-ext+ #x8786)
  13 (defconstant +op-add-ext+ #x8787)
  14 (defconstant +op-madd-ext+ #x8788)
  15 (defconstant +op-frac-ext+ #x8789)
  16 (defconstant +op-max-ext+ #x878A)
  17 (defconstant +op-min-ext+ #x878B)
  18 (defconstant +op-set-ge-ext+ #x878C)
  19 (defconstant +op-set-lt-ext+ #x878D)
  20 (defconstant +op-clamp-ext+ #x878E)
  21 (defconstant +op-floor-ext+ #x878F)
  22 (defconstant +op-round-ext+ #x8790)
  23 (defconstant +op-exp-base-2-ext+ #x8791)
  24 (defconstant +op-log-base-2-ext+ #x8792)
  25 (defconstant +op-power-ext+ #x8793)
  26 (defconstant +op-recip-ext+ #x8794)
  27 (defconstant +op-recip-sqrt-ext+ #x8795)
  28 (defconstant +op-sub-ext+ #x8796)
  29 (defconstant +op-cross-product-ext+ #x8797)
  30 (defconstant +op-multiply-matrix-ext+ #x8798)
  31 (defconstant +op-mov-ext+ #x8799)
  32 (defconstant +output-vertex-ext+ #x879A)
  33 (defconstant +output-color0-ext+ #x879B)
  34 (defconstant +output-color1-ext+ #x879C)
  35 (defconstant +output-texture-coord0-ext+ #x879D)
  36 (defconstant +output-texture-coord1-ext+ #x879E)
  37 (defconstant +output-texture-coord2-ext+ #x879F)
  38 (defconstant +output-texture-coord3-ext+ #x87A0)
  39 (defconstant +output-texture-coord4-ext+ #x87A1)
  40 (defconstant +output-texture-coord5-ext+ #x87A2)
  41 (defconstant +output-texture-coord6-ext+ #x87A3)
  42 (defconstant +output-texture-coord7-ext+ #x87A4)
  43 (defconstant +output-texture-coord8-ext+ #x87A5)
  44 (defconstant +output-texture-coord9-ext+ #x87A6)
  45 (defconstant +output-texture-coord10-ext+ #x87A7)
  46 (defconstant +output-texture-coord11-ext+ #x87A8)
  47 (defconstant +output-texture-coord12-ext+ #x87A9)
  48 (defconstant +output-texture-coord13-ext+ #x87AA)
  49 (defconstant +output-texture-coord14-ext+ #x87AB)
  50 (defconstant +output-texture-coord15-ext+ #x87AC)
  51 (defconstant +output-texture-coord16-ext+ #x87AD)
  52 (defconstant +output-texture-coord17-ext+ #x87AE)
  53 (defconstant +output-texture-coord18-ext+ #x87AF)
  54 (defconstant +output-texture-coord19-ext+ #x87B0)
  55 (defconstant +output-texture-coord20-ext+ #x87B1)
  56 (defconstant +output-texture-coord21-ext+ #x87B2)
  57 (defconstant +output-texture-coord22-ext+ #x87B3)
  58 (defconstant +output-texture-coord23-ext+ #x87B4)
  59 (defconstant +output-texture-coord24-ext+ #x87B5)
  60 (defconstant +output-texture-coord25-ext+ #x87B6)
  61 (defconstant +output-texture-coord26-ext+ #x87B7)
  62 (defconstant +output-texture-coord27-ext+ #x87B8)
  63 (defconstant +output-texture-coord28-ext+ #x87B9)
  64 (defconstant +output-texture-coord29-ext+ #x87BA)
  65 (defconstant +output-texture-coord30-ext+ #x87BB)
  66 (defconstant +output-texture-coord31-ext+ #x87BC)
  67 (defconstant +output-fog-ext+ #x87BD)
  68 (defconstant +scalar-ext+ #x87BE)
  69 (defconstant +vector-ext+ #x87BF)
  70 (defconstant +matrix-ext+ #x87C0)
  71 (defconstant +variant-ext+ #x87C1)
  72 (defconstant +invariant-ext+ #x87C2)
  73 (defconstant +local-constant-ext+ #x87C3)
  74 (defconstant +local-ext+ #x87C4)
  75 (defconstant +max-vertex-shader-instructions-ext+ #x87C5)
  76 (defconstant +max-vertex-shader-variants-ext+ #x87C6)
  77 (defconstant +max-vertex-shader-invariants-ext+ #x87C7)
  78 (defconstant +max-vertex-shader-local-constants-ext+ #x87C8)
  79 (defconstant +max-vertex-shader-locals-ext+ #x87C9)
  80 (defconstant +max-optimized-vertex-shader-instructions-ext+ #x87CA)
  81 (defconstant +max-optimized-vertex-shader-variants-ext+ #x87CB)
  82 (defconstant +max-optimized-vertex-shader-local-constants-ext+ #x87CC)
  83 (defconstant +max-optimized-vertex-shader-invariants-ext+ #x87CD)
  84 (defconstant +max-optimized-vertex-shader-locals-ext+ #x87CE)
  85 (defconstant +vertex-shader-instructions-ext+ #x87CF)
  86 (defconstant +vertex-shader-variants-ext+ #x87D0)
  87 (defconstant +vertex-shader-invariants-ext+ #x87D1)
  88 (defconstant +vertex-shader-local-constants-ext+ #x87D2)
  89 (defconstant +vertex-shader-locals-ext+ #x87D3)
  90 (defconstant +vertex-shader-optimized-ext+ #x87D4)
  91 (defconstant +x-ext+ #x87D5)
  92 (defconstant +y-ext+ #x87D6)
  93 (defconstant +z-ext+ #x87D7)
  94 (defconstant +w-ext+ #x87D8)
  95 (defconstant +negative-x-ext+ #x87D9)
  96 (defconstant +negative-y-ext+ #x87DA)
  97 (defconstant +negative-z-ext+ #x87DB)
  98 (defconstant +negative-w-ext+ #x87DC)
  99 (defconstant +zero-ext+ #x87DD)
 100 (defconstant +one-ext+ #x87DE)
 101 (defconstant +negative-one-ext+ #x87DF)
 102 (defconstant +normalized-range-ext+ #x87E0)
 103 (defconstant +full-range-ext+ #x87E1)
 104 (defconstant +current-vertex-ext+ #x87E2)
 105 (defconstant +mvp-matrix-ext+ #x87E3)
 106 (defconstant +variant-value-ext+ #x87E4)
 107 (defconstant +variant-datatype-ext+ #x87E5)
 108 (defconstant +variant-array-stride-ext+ #x87E6)
 109 (defconstant +variant-array-type-ext+ #x87E7)
 110 (defconstant +variant-array-ext+ #x87E8)
 111 (defconstant +variant-array-pointer-ext+ #x87E9)
 112 (defconstant +invariant-value-ext+ #x87EA)
 113 (defconstant +invariant-datatype-ext+ #x87EB)
 114 (defconstant +local-constant-value-ext+ #x87EC)
 115 (defconstant +local-constant-datatype-ext+ #x87ED)
 116 (defglextfun
 117  (("GetLocalConstantFloatvEXT" get-local-constant-floatv-ext) :args
 118   ((:name |id| :type |UInt32| :direction :in)
 119    (:name |value| :type |GetVariantValueEXT| :direction :in)
 120    (:name |data| :type |Float32| :direction :out :array t :size (|id|)))
 121   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 122   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 123   :glsflags ("ignore" "get") :offset ("?")))
 124 (defglextfun
 125  (("GetLocalConstantIntegervEXT" get-local-constant-integerv-ext) :args
 126   ((:name |id| :type |UInt32| :direction :in)
 127    (:name |value| :type |GetVariantValueEXT| :direction :in)
 128    (:name |data| :type |Int32| :direction :out :array t :size (|id|)))
 129   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 130   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 131   :glsflags ("ignore" "get") :offset ("?")))
 132 (defglextfun
 133  (("GetLocalConstantBooleanvEXT" get-local-constant-booleanv-ext) :args
 134   ((:name |id| :type |UInt32| :direction :in)
 135    (:name |value| :type |GetVariantValueEXT| :direction :in)
 136    (:name |data| :type |Boolean| :direction :out :array t :size (|id|)))
 137   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 138   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 139   :glsflags ("ignore" "get") :offset ("?")))
 140 (defglextfun
 141  (("GetInvariantFloatvEXT" get-invariant-floatv-ext) :args
 142   ((:name |id| :type |UInt32| :direction :in)
 143    (:name |value| :type |GetVariantValueEXT| :direction :in)
 144    (:name |data| :type |Float32| :direction :out :array t :size (|id|)))
 145   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 146   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 147   :glsflags ("ignore" "get") :offset ("?")))
 148 (defglextfun
 149  (("GetInvariantIntegervEXT" get-invariant-integerv-ext) :args
 150   ((:name |id| :type |UInt32| :direction :in)
 151    (:name |value| :type |GetVariantValueEXT| :direction :in)
 152    (:name |data| :type |Int32| :direction :out :array t :size (|id|)))
 153   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 154   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 155   :glsflags ("ignore" "get") :offset ("?")))
 156 (defglextfun
 157  (("GetInvariantBooleanvEXT" get-invariant-booleanv-ext) :args
 158   ((:name |id| :type |UInt32| :direction :in)
 159    (:name |value| :type |GetVariantValueEXT| :direction :in)
 160    (:name |data| :type |Boolean| :direction :out :array t :size (|id|)))
 161   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 162   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 163   :glsflags ("ignore" "get") :offset ("?")))
 164 (defglextfun
 165  (("GetVariantPointervEXT" get-variant-pointerv-ext) :args
 166   ((:name |id| :type |UInt32| :direction :in)
 167    (:name |value| :type |GetVariantValueEXT| :direction :in)
 168    (:name |data| :type |VoidPointer| :direction :out :array t :size (|id|)))
 169   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 170   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 171   :glsflags ("ignore" "get") :offset ("?")))
 172 (defglextfun
 173  (("GetVariantFloatvEXT" get-variant-floatv-ext) :args
 174   ((:name |id| :type |UInt32| :direction :in)
 175    (:name |value| :type |GetVariantValueEXT| :direction :in)
 176    (:name |data| :type |Float32| :direction :out :array t :size (|id|)))
 177   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 178   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 179   :glsflags ("ignore" "get") :offset ("?")))
 180 (defglextfun
 181  (("GetVariantIntegervEXT" get-variant-integerv-ext) :args
 182   ((:name |id| :type |UInt32| :direction :in)
 183    (:name |value| :type |GetVariantValueEXT| :direction :in)
 184    (:name |data| :type |Int32| :direction :out :array t :size (|id|)))
 185   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 186   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 187   :glsflags ("ignore" "get") :offset ("?")))
 188 (defglextfun
 189  (("GetVariantBooleanvEXT" get-variant-booleanv-ext) :args
 190   ((:name |id| :type |UInt32| :direction :in)
 191    (:name |value| :type |GetVariantValueEXT| :direction :in)
 192    (:name |data| :type |Boolean| :direction :out :array t :size (|id|)))
 193   :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable")
 194   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
 195   :glsflags ("ignore" "get") :offset ("?")))
 196 (defglextfun
 197  (("IsVariantEnabledEXT" is-variant-enabled-ext) :args
 198   ((:name |id| :type |UInt32| :direction :in)
 199    (:name |cap| :type |VariantCapEXT| :direction :in))
 200   :return ("Boolean") :category ("EXT_vertex_shader") :version ("1.2")
 201   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 202   :offset ("?")))
 203 (defglextfun
 204  (("BindParameterEXT" bind-parameter-ext) :args
 205   ((:name |value| :type |VertexShaderParameterEXT| :direction :in)) :return
 206   ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") :extension nil
 207   :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 208 (defglextfun
 209  (("BindTextureUnitParameterEXT" bind-texture-unit-parameter-ext) :args
 210   ((:name |unit| :type |TextureUnit| :direction :in)
 211    (:name |value| :type |VertexShaderTextureUnitParameter| :direction :in))
 212   :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2")
 213   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 214   :offset ("?")))
 215 (defglextfun
 216  (("BindTexGenParameterEXT" bind-tex-gen-parameter-ext) :args
 217   ((:name |unit| :type |TextureUnit| :direction :in)
 218    (:name |coord| :type |TextureCoordName| :direction :in)
 219    (:name |value| :type |TextureGenParameter| :direction :in))
 220   :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2")
 221   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 222   :offset ("?")))
 223 (defglextfun
 224  (("BindMaterialParameterEXT" bind-material-parameter-ext) :args
 225   ((:name |face| :type |MaterialFace| :direction :in)
 226    (:name |value| :type |MaterialParameter| :direction :in))
 227   :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2")
 228   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 229   :offset ("?")))
 230 (defglextfun
 231  (("BindLightParameterEXT" bind-light-parameter-ext) :args
 232   ((:name |light| :type |LightName| :direction :in)
 233    (:name |value| :type |LightParameter| :direction :in))
 234   :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2")
 235   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 236   :offset ("?")))
 237 (defglextfun
 238  (("DisableVariantClientStateEXT" disable-variant-client-state-ext) :args
 239   ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category
 240   ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?")
 241   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 242 (defglextfun
 243  (("EnableVariantClientStateEXT" enable-variant-client-state-ext) :args
 244   ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category
 245   ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?")
 246   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 247 (defglextfun
 248  (("VariantPointerEXT" variant-pointer-ext) :args
 249   ((:name |id| :type |UInt32| :direction :in)
 250    (:name |type| :type |ScalarType| :direction :in)
 251    (:name |stride| :type |UInt32| :direction :in)
 252    (:name |addr| :type |Void| :direction :in :array t :size
 253     (|id| |type| |stride|)))
 254   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 255   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 256   ("?")))
 257 (defglextfun
 258  (("VariantuivEXT" variant-uiv-ext) :args
 259   ((:name |id| :type |UInt32| :direction :in)
 260    (:name |addr| :type |UInt32| :direction :in :array t :size (|id|)))
 261   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 262   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 263   ("?")))
 264 (defglextfun
 265  (("VariantusvEXT" variant-usv-ext) :args
 266   ((:name |id| :type |UInt32| :direction :in)
 267    (:name |addr| :type |UInt16| :direction :in :array t :size (|id|)))
 268   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 269   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 270   ("?")))
 271 (defglextfun
 272  (("VariantubvEXT" variant-ubv-ext) :args
 273   ((:name |id| :type |UInt32| :direction :in)
 274    (:name |addr| :type |UInt8| :direction :in :array t :size (|id|)))
 275   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 276   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 277   ("?")))
 278 (defglextfun
 279  (("VariantdvEXT" variant-dv-ext) :args
 280   ((:name |id| :type |UInt32| :direction :in)
 281    (:name |addr| :type |Float64| :direction :in :array t :size (|id|)))
 282   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 283   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 284   ("?")))
 285 (defglextfun
 286  (("VariantfvEXT" variant-fv-ext) :args
 287   ((:name |id| :type |UInt32| :direction :in)
 288    (:name |addr| :type |Float32| :direction :in :array t :size (|id|)))
 289   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 290   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 291   ("?")))
 292 (defglextfun
 293  (("VariantivEXT" variant-iv-ext) :args
 294   ((:name |id| :type |UInt32| :direction :in)
 295    (:name |addr| :type |Int32| :direction :in :array t :size (|id|)))
 296   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 297   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 298   ("?")))
 299 (defglextfun
 300  (("VariantsvEXT" variant-sv-ext) :args
 301   ((:name |id| :type |UInt32| :direction :in)
 302    (:name |addr| :type |Int16| :direction :in :array t :size (|id|)))
 303   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 304   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 305   ("?")))
 306 (defglextfun
 307  (("VariantbvEXT" variant-bv-ext) :args
 308   ((:name |id| :type |UInt32| :direction :in)
 309    (:name |addr| :type |Int8| :direction :in :array t :size (|id|)))
 310   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 311   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 312   ("?")))
 313 (defglextfun
 314  (("SetLocalConstantEXT" set-local-constant-ext) :args
 315   ((:name |id| :type |UInt32| :direction :in)
 316    (:name |type| :type |ScalarType| :direction :in)
 317    (:name |addr| :type |Void| :direction :in :array t :size (|id| |type|)))
 318   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 319   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 320   ("?")))
 321 (defglextfun
 322  (("SetInvariantEXT" set-invariant-ext) :args
 323   ((:name |id| :type |UInt32| :direction :in)
 324    (:name |type| :type |ScalarType| :direction :in)
 325    (:name |addr| :type |Void| :direction :in :array t :size (|id| |type|)))
 326   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 327   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 328   ("?")))
 329 (defglextfun
 330  (("GenSymbolsEXT" gen-symbols-ext) :args
 331   ((:name |datatype| :type |DataTypeEXT| :direction :in)
 332    (:name |storagetype| :type |VertexShaderStorageTypeEXT| :direction :in)
 333    (:name |range| :type |ParameterRangeEXT| :direction :in)
 334    (:name |components| :type |UInt32| :direction :in))
 335   :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2")
 336   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 337   :offset ("?")))
 338 (defglextfun
 339  (("ExtractComponentEXT" extract-component-ext) :args
 340   ((:name |res| :type |UInt32| :direction :in)
 341    (:name |src| :type |UInt32| :direction :in)
 342    (:name |num| :type |UInt32| :direction :in))
 343   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 344   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 345   ("?")))
 346 (defglextfun
 347  (("InsertComponentEXT" insert-component-ext) :args
 348   ((:name |res| :type |UInt32| :direction :in)
 349    (:name |src| :type |UInt32| :direction :in)
 350    (:name |num| :type |UInt32| :direction :in))
 351   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 352   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 353   ("?")))
 354 (defglextfun
 355  (("WriteMaskEXT" write-mask-ext) :args
 356   ((:name |res| :type |UInt32| :direction :in)
 357    (:name |in| :type |UInt32| :direction :in)
 358    (:name |outX| :type |VertexShaderWriteMaskEXT| :direction :in)
 359    (:name |outY| :type |VertexShaderWriteMaskEXT| :direction :in)
 360    (:name |outZ| :type |VertexShaderWriteMaskEXT| :direction :in)
 361    (:name |outW| :type |VertexShaderWriteMaskEXT| :direction :in))
 362   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 363   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 364   ("?")))
 365 (defglextfun
 366  (("SwizzleEXT" swizzle-ext) :args
 367   ((:name |res| :type |UInt32| :direction :in)
 368    (:name |in| :type |UInt32| :direction :in)
 369    (:name |outX| :type |VertexShaderCoordOutEXT| :direction :in)
 370    (:name |outY| :type |VertexShaderCoordOutEXT| :direction :in)
 371    (:name |outZ| :type |VertexShaderCoordOutEXT| :direction :in)
 372    (:name |outW| :type |VertexShaderCoordOutEXT| :direction :in))
 373   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 374   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 375   ("?")))
 376 (defglextfun
 377  (("ShaderOp3EXT" shader-op-3-ext) :args
 378   ((:name |op| :type |VertexShaderOpEXT| :direction :in)
 379    (:name |res| :type |UInt32| :direction :in)
 380    (:name |arg1| :type |UInt32| :direction :in)
 381    (:name |arg2| :type |UInt32| :direction :in)
 382    (:name |arg3| :type |UInt32| :direction :in))
 383   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 384   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 385   ("?")))
 386 (defglextfun
 387  (("ShaderOp2EXT" shader-op-2-ext) :args
 388   ((:name |op| :type |VertexShaderOpEXT| :direction :in)
 389    (:name |res| :type |UInt32| :direction :in)
 390    (:name |arg1| :type |UInt32| :direction :in)
 391    (:name |arg2| :type |UInt32| :direction :in))
 392   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 393   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 394   ("?")))
 395 (defglextfun
 396  (("ShaderOp1EXT" shader-op-1-ext) :args
 397   ((:name |op| :type |VertexShaderOpEXT| :direction :in)
 398    (:name |res| :type |UInt32| :direction :in)
 399    (:name |arg1| :type |UInt32| :direction :in))
 400   :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension
 401   nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset
 402   ("?")))
 403 (defglextfun
 404  (("DeleteVertexShaderEXT" delete-vertex-shader-ext) :args
 405   ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category
 406   ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?")
 407   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 408 (defglextfun
 409  (("GenVertexShadersEXT" gen-vertex-shaders-ext) :args
 410   ((:name |range| :type |UInt32| :direction :in)) :return ("UInt32") :category
 411   ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?")
 412   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 413 (defglextfun
 414  (("BindVertexShaderEXT" bind-vertex-shader-ext) :args
 415   ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category
 416   ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?")
 417   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 418 (defglextfun
 419  (("EndVertexShaderEXT" end-vertex-shader-ext) :args nil :return ("void")
 420   :category ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode
 421   ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 422 (defglextfun
 423  (("BeginVertexShaderEXT" begin-vertex-shader-ext) :args nil :return ("void")
 424   :category ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode
 425   ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))