lib/opengl-arb_multitexture.lisp

   1
   2 (in-package #:gl)
   3
   4 ;;;; ARB_multitexture
   5
   6 (defconstant +texture0-arb+ #x84C0)
   7 (defconstant +texture1-arb+ #x84C1)
   8 (defconstant +texture2-arb+ #x84C2)
   9 (defconstant +texture3-arb+ #x84C3)
  10 (defconstant +texture4-arb+ #x84C4)
  11 (defconstant +texture5-arb+ #x84C5)
  12 (defconstant +texture6-arb+ #x84C6)
  13 (defconstant +texture7-arb+ #x84C7)
  14 (defconstant +texture8-arb+ #x84C8)
  15 (defconstant +texture9-arb+ #x84C9)
  16 (defconstant +texture10-arb+ #x84CA)
  17 (defconstant +texture11-arb+ #x84CB)
  18 (defconstant +texture12-arb+ #x84CC)
  19 (defconstant +texture13-arb+ #x84CD)
  20 (defconstant +texture14-arb+ #x84CE)
  21 (defconstant +texture15-arb+ #x84CF)
  22 (defconstant +texture16-arb+ #x84D0)
  23 (defconstant +texture17-arb+ #x84D1)
  24 (defconstant +texture18-arb+ #x84D2)
  25 (defconstant +texture19-arb+ #x84D3)
  26 (defconstant +texture20-arb+ #x84D4)
  27 (defconstant +texture21-arb+ #x84D5)
  28 (defconstant +texture22-arb+ #x84D6)
  29 (defconstant +texture23-arb+ #x84D7)
  30 (defconstant +texture24-arb+ #x84D8)
  31 (defconstant +texture25-arb+ #x84D9)
  32 (defconstant +texture26-arb+ #x84DA)
  33 (defconstant +texture27-arb+ #x84DB)
  34 (defconstant +texture28-arb+ #x84DC)
  35 (defconstant +texture29-arb+ #x84DD)
  36 (defconstant +texture30-arb+ #x84DE)
  37 (defconstant +texture31-arb+ #x84DF)
  38 (defconstant +active-texture-arb+ #x84E0)
  39 (defconstant +client-active-texture-arb+ #x84E1)
  40 (defconstant +max-texture-units-arb+ #x84E2)
  41 (defglextfun
  42  (("MultiTexCoord4svARB" multi-tex-coord-4sv-arb) :args
  43   ((:name |target| :type |TextureUnit| :direction :in)
  44    (:name |v| :type |CoordS| :direction :in :array t :size #x4))
  45   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  46   ("1.2") :glxropcode ("213") :alias ("MultiTexCoord4sv") :glsalias
  47   ("MultiTexCoord4sv")))
  48 (defglextfun
  49  (("MultiTexCoord4sARB" multi-tex-coord-4s-arb) :args
  50   ((:name |target| :type |TextureUnit| :direction :in)
  51    (:name |s| :type |CoordS| :direction :in)
  52    (:name |t| :type |CoordS| :direction :in)
  53    (:name |r| :type |CoordS| :direction :in)
  54    (:name |q| :type |CoordS| :direction :in))
  55   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  56   ("1.2") :vectorequiv ("MultiTexCoord4sv")))
  57 (defglextfun
  58  (("MultiTexCoord4ivARB" multi-tex-coord-4iv-arb) :args
  59   ((:name |target| :type |TextureUnit| :direction :in)
  60    (:name |v| :type |CoordI| :direction :in :array t :size #x4))
  61   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  62   ("1.2") :glxropcode ("212") :alias ("MultiTexCoord4iv") :glsalias
  63   ("MultiTexCoord4iv")))
  64 (defglextfun
  65  (("MultiTexCoord4iARB" multi-tex-coord-4i-arb) :args
  66   ((:name |target| :type |TextureUnit| :direction :in)
  67    (:name |s| :type |CoordI| :direction :in)
  68    (:name |t| :type |CoordI| :direction :in)
  69    (:name |r| :type |CoordI| :direction :in)
  70    (:name |q| :type |CoordI| :direction :in))
  71   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  72   ("1.2") :vectorequiv ("MultiTexCoord4iv")))
  73 (defglextfun
  74  (("MultiTexCoord4fvARB" multi-tex-coord-4fv-arb) :args
  75   ((:name |target| :type |TextureUnit| :direction :in)
  76    (:name |v| :type |CoordF| :direction :in :array t :size #x4))
  77   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  78   ("1.2") :glxropcode ("211") :alias ("MultiTexCoord4fv") :glsalias
  79   ("MultiTexCoord4fv")))
  80 (defglextfun
  81  (("MultiTexCoord4fARB" multi-tex-coord-4f-arb) :args
  82   ((:name |target| :type |TextureUnit| :direction :in)
  83    (:name |s| :type |CoordF| :direction :in)
  84    (:name |t| :type |CoordF| :direction :in)
  85    (:name |r| :type |CoordF| :direction :in)
  86    (:name |q| :type |CoordF| :direction :in))
  87   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  88   ("1.2") :vectorequiv ("MultiTexCoord4fv")))
  89 (defglextfun
  90  (("MultiTexCoord4dvARB" multi-tex-coord-4dv-arb) :args
  91   ((:name |target| :type |TextureUnit| :direction :in)
  92    (:name |v| :type |CoordD| :direction :in :array t :size #x4))
  93   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
  94   ("1.2") :glxropcode ("210") :alias ("MultiTexCoord4dv") :glsalias
  95   ("MultiTexCoord4dv")))
  96 (defglextfun
  97  (("MultiTexCoord4dARB" multi-tex-coord-4d-arb) :args
  98   ((:name |target| :type |TextureUnit| :direction :in)
  99    (:name |s| :type |CoordD| :direction :in)
 100    (:name |t| :type |CoordD| :direction :in)
 101    (:name |r| :type |CoordD| :direction :in)
 102    (:name |q| :type |CoordD| :direction :in))
 103   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 104   ("1.2") :vectorequiv ("MultiTexCoord4dv")))
 105 (defglextfun
 106  (("MultiTexCoord3svARB" multi-tex-coord-3sv-arb) :args
 107   ((:name |target| :type |TextureUnit| :direction :in)
 108    (:name |v| :type |CoordS| :direction :in :array t :size #x3))
 109   :return ("void") :category ("ARB_multitexture") :version ("1.2") :glxflags
 110   ("ARB") :glxropcode ("209") :alias ("MultiTexCoord3sv") :glsalias
 111   ("MultiTexCoord3sv")))
 112 (defglextfun
 113  (("MultiTexCoord3sARB" multi-tex-coord-3s-arb) :args
 114   ((:name |target| :type |TextureUnit| :direction :in)
 115    (:name |s| :type |CoordS| :direction :in)
 116    (:name |t| :type |CoordS| :direction :in)
 117    (:name |r| :type |CoordS| :direction :in))
 118   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 119   ("1.2") :vectorequiv ("MultiTexCoord3sv")))
 120 (defglextfun
 121  (("MultiTexCoord3ivARB" multi-tex-coord-3iv-arb) :args
 122   ((:name |target| :type |TextureUnit| :direction :in)
 123    (:name |v| :type |CoordI| :direction :in :array t :size #x3))
 124   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 125   ("1.2") :glxropcode ("208") :alias ("MultiTexCoord3iv") :glsalias
 126   ("MultiTexCoord3iv")))
 127 (defglextfun
 128  (("MultiTexCoord3iARB" multi-tex-coord-3i-arb) :args
 129   ((:name |target| :type |TextureUnit| :direction :in)
 130    (:name |s| :type |CoordI| :direction :in)
 131    (:name |t| :type |CoordI| :direction :in)
 132    (:name |r| :type |CoordI| :direction :in))
 133   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 134   ("1.2") :vectorequiv ("MultiTexCoord3iv")))
 135 (defglextfun
 136  (("MultiTexCoord3fvARB" multi-tex-coord-3fv-arb) :args
 137   ((:name |target| :type |TextureUnit| :direction :in)
 138    (:name |v| :type |CoordF| :direction :in :array t :size #x3))
 139   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 140   ("1.2") :glxropcode ("207") :alias ("MultiTexCoord3fv") :glsalias
 141   ("MultiTexCoord3fv")))
 142 (defglextfun
 143  (("MultiTexCoord3fARB" multi-tex-coord-3f-arb) :args
 144   ((:name |target| :type |TextureUnit| :direction :in)
 145    (:name |s| :type |CoordF| :direction :in)
 146    (:name |t| :type |CoordF| :direction :in)
 147    (:name |r| :type |CoordF| :direction :in))
 148   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 149   ("1.2") :vectorequiv ("MultiTexCoord3fv")))
 150 (defglextfun
 151  (("MultiTexCoord3dvARB" multi-tex-coord-3dv-arb) :args
 152   ((:name |target| :type |TextureUnit| :direction :in)
 153    (:name |v| :type |CoordD| :direction :in :array t :size #x3))
 154   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 155   ("1.2") :glxropcode ("206") :alias ("MultiTexCoord3dv") :glsalias
 156   ("MultiTexCoord3dv")))
 157 (defglextfun
 158  (("MultiTexCoord3dARB" multi-tex-coord-3d-arb) :args
 159   ((:name |target| :type |TextureUnit| :direction :in)
 160    (:name |s| :type |CoordD| :direction :in)
 161    (:name |t| :type |CoordD| :direction :in)
 162    (:name |r| :type |CoordD| :direction :in))
 163   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 164   ("1.2") :vectorequiv ("MultiTexCoord3dv")))
 165 (defglextfun
 166  (("MultiTexCoord2svARB" multi-tex-coord-2sv-arb) :args
 167   ((:name |target| :type |TextureUnit| :direction :in)
 168    (:name |v| :type |CoordS| :direction :in :array t :size #x2))
 169   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 170   ("1.2") :glxropcode ("205") :alias ("MultiTexCoord2sv") :glsalias
 171   ("MultiTexCoord2sv")))
 172 (defglextfun
 173  (("MultiTexCoord2sARB" multi-tex-coord-2s-arb) :args
 174   ((:name |target| :type |TextureUnit| :direction :in)
 175    (:name |s| :type |CoordS| :direction :in)
 176    (:name |t| :type |CoordS| :direction :in))
 177   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 178   ("1.2") :vectorequiv ("MultiTexCoord2sv")))
 179 (defglextfun
 180  (("MultiTexCoord2ivARB" multi-tex-coord-2iv-arb) :args
 181   ((:name |target| :type |TextureUnit| :direction :in)
 182    (:name |v| :type |CoordI| :direction :in :array t :size #x2))
 183   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 184   ("1.2") :glxropcode ("204") :alias ("MultiTexCoord2iv") :glsalias
 185   ("MultiTexCoord2iv")))
 186 (defglextfun
 187  (("MultiTexCoord2iARB" multi-tex-coord-2i-arb) :args
 188   ((:name |target| :type |TextureUnit| :direction :in)
 189    (:name |s| :type |CoordI| :direction :in)
 190    (:name |t| :type |CoordI| :direction :in))
 191   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 192   ("1.2") :vectorequiv ("MultiTexCoord2iv")))
 193 (defglextfun
 194  (("MultiTexCoord2fvARB" multi-tex-coord-2fv-arb) :args
 195   ((:name |target| :type |TextureUnit| :direction :in)
 196    (:name |v| :type |CoordF| :direction :in :array t :size #x2))
 197   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 198   ("1.2") :glxropcode ("203") :alias ("MultiTexCoord2fv") :glsalias
 199   ("MultiTexCoord2fv")))
 200 (defglextfun
 201  (("MultiTexCoord2fARB" multi-tex-coord-2f-arb) :args
 202   ((:name |target| :type |TextureUnit| :direction :in)
 203    (:name |s| :type |CoordF| :direction :in)
 204    (:name |t| :type |CoordF| :direction :in))
 205   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 206   ("1.2") :vectorequiv ("MultiTexCoord2fv")))
 207 (defglextfun
 208  (("MultiTexCoord2dvARB" multi-tex-coord-2dv-arb) :args
 209   ((:name |target| :type |TextureUnit| :direction :in)
 210    (:name |v| :type |CoordD| :direction :in :array t :size #x2))
 211   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 212   ("1.2") :glxropcode ("202") :alias ("MultiTexCoord2dv") :glsalias
 213   ("MultiTexCoord2dv")))
 214 (defglextfun
 215  (("MultiTexCoord2dARB" multi-tex-coord-2d-arb) :args
 216   ((:name |target| :type |TextureUnit| :direction :in)
 217    (:name |s| :type |CoordD| :direction :in)
 218    (:name |t| :type |CoordD| :direction :in))
 219   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 220   ("1.2") :vectorequiv ("MultiTexCoord2dv")))
 221 (defglextfun
 222  (("MultiTexCoord1svARB" multi-tex-coord-1sv-arb) :args
 223   ((:name |target| :type |TextureUnit| :direction :in)
 224    (:name |v| :type |CoordS| :direction :in :array t :size #x1))
 225   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 226   ("1.2") :glxropcode ("201") :alias ("MultiTexCoord1sv") :glsalias
 227   ("MultiTexCoord1sv")))
 228 (defglextfun
 229  (("MultiTexCoord1sARB" multi-tex-coord-1s-arb) :args
 230   ((:name |target| :type |TextureUnit| :direction :in)
 231    (:name |s| :type |CoordS| :direction :in))
 232   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 233   ("1.2") :vectorequiv ("MultiTexCoord1sv")))
 234 (defglextfun
 235  (("MultiTexCoord1ivARB" multi-tex-coord-1iv-arb) :args
 236   ((:name |target| :type |TextureUnit| :direction :in)
 237    (:name |v| :type |CoordI| :direction :in :array t :size #x1))
 238   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 239   ("1.2") :glxropcode ("200") :alias ("MultiTexCoord1iv") :glsalias
 240   ("MultiTexCoord1iv")))
 241 (defglextfun
 242  (("MultiTexCoord1iARB" multi-tex-coord-1i-arb) :args
 243   ((:name |target| :type |TextureUnit| :direction :in)
 244    (:name |s| :type |CoordI| :direction :in))
 245   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 246   ("1.2") :vectorequiv ("MultiTexCoord1iv")))
 247 (defglextfun
 248  (("MultiTexCoord1fvARB" multi-tex-coord-1fv-arb) :args
 249   ((:name |target| :type |TextureUnit| :direction :in)
 250    (:name |v| :type |CoordF| :direction :in :array t :size #x1))
 251   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 252   ("1.2") :glxropcode ("199") :alias ("MultiTexCoord1fv") :glsalias
 253   ("MultiTexCoord1fv")))
 254 (defglextfun
 255  (("MultiTexCoord1fARB" multi-tex-coord-1f-arb) :args
 256   ((:name |target| :type |TextureUnit| :direction :in)
 257    (:name |s| :type |CoordF| :direction :in))
 258   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 259   ("1.2") :vectorequiv ("MultiTexCoord1fv")))
 260 (defglextfun
 261  (("MultiTexCoord1dvARB" multi-tex-coord-1dv-arb) :args
 262   ((:name |target| :type |TextureUnit| :direction :in)
 263    (:name |v| :type |CoordD| :direction :in :array t :size #x1))
 264   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 265   ("1.2") :glxropcode ("198") :alias ("MultiTexCoord1dv") :glsalias
 266   ("MultiTexCoord1dv")))
 267 (defglextfun
 268  (("MultiTexCoord1dARB" multi-tex-coord-1d-arb) :args
 269   ((:name |target| :type |TextureUnit| :direction :in)
 270    (:name |s| :type |CoordD| :direction :in))
 271   :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version
 272   ("1.2") :vectorequiv ("MultiTexCoord1dv")))
 273 (defglextfun
 274  (("ClientActiveTextureARB" client-active-texture-arb) :args
 275   ((:name |texture| :type |TextureUnit| :direction :in)) :return ("void")
 276   :category ("ARB_multitexture") :dlflags ("notlistable") :glxflags
 277   ("ARB" "client-handcode" "client-intercept" "server-handcode") :version
 278   ("1.2") :alias ("ClientActiveTexture") :glsalias ("ClientActiveTexture")))
 279 (defglextfun
 280  (("ActiveTextureARB" active-texture-arb) :args
 281   ((:name |texture| :type |TextureUnit| :direction :in)) :return ("void")
 282   :category ("ARB_multitexture") :glxflags ("ARB") :version ("1.2") :glxropcode
 283   ("197") :alias ("ActiveTexture") :glsalias ("ActiveTexture")))