lib/opengl-ati_fragment_shader.lisp

   1
   2 (in-package #:gl)
   3
   4 ;;;; ATI_fragment_shader
   5
   6 (defconstant +fragment-shader-ati+ #x8920)
   7 (defconstant +reg-0-ati+ #x8921)
   8 (defconstant +reg-1-ati+ #x8922)
   9 (defconstant +reg-2-ati+ #x8923)
  10 (defconstant +reg-3-ati+ #x8924)
  11 (defconstant +reg-4-ati+ #x8925)
  12 (defconstant +reg-5-ati+ #x8926)
  13 (defconstant +reg-6-ati+ #x8927)
  14 (defconstant +reg-7-ati+ #x8928)
  15 (defconstant +reg-8-ati+ #x8929)
  16 (defconstant +reg-9-ati+ #x892A)
  17 (defconstant +reg-10-ati+ #x892B)
  18 (defconstant +reg-11-ati+ #x892C)
  19 (defconstant +reg-12-ati+ #x892D)
  20 (defconstant +reg-13-ati+ #x892E)
  21 (defconstant +reg-14-ati+ #x892F)
  22 (defconstant +reg-15-ati+ #x8930)
  23 (defconstant +reg-16-ati+ #x8931)
  24 (defconstant +reg-17-ati+ #x8932)
  25 (defconstant +reg-18-ati+ #x8933)
  26 (defconstant +reg-19-ati+ #x8934)
  27 (defconstant +reg-20-ati+ #x8935)
  28 (defconstant +reg-21-ati+ #x8936)
  29 (defconstant +reg-22-ati+ #x8937)
  30 (defconstant +reg-23-ati+ #x8938)
  31 (defconstant +reg-24-ati+ #x8939)
  32 (defconstant +reg-25-ati+ #x893A)
  33 (defconstant +reg-26-ati+ #x893B)
  34 (defconstant +reg-27-ati+ #x893C)
  35 (defconstant +reg-28-ati+ #x893D)
  36 (defconstant +reg-29-ati+ #x893E)
  37 (defconstant +reg-30-ati+ #x893F)
  38 (defconstant +reg-31-ati+ #x8940)
  39 (defconstant +con-0-ati+ #x8941)
  40 (defconstant +con-1-ati+ #x8942)
  41 (defconstant +con-2-ati+ #x8943)
  42 (defconstant +con-3-ati+ #x8944)
  43 (defconstant +con-4-ati+ #x8945)
  44 (defconstant +con-5-ati+ #x8946)
  45 (defconstant +con-6-ati+ #x8947)
  46 (defconstant +con-7-ati+ #x8948)
  47 (defconstant +con-8-ati+ #x8949)
  48 (defconstant +con-9-ati+ #x894A)
  49 (defconstant +con-10-ati+ #x894B)
  50 (defconstant +con-11-ati+ #x894C)
  51 (defconstant +con-12-ati+ #x894D)
  52 (defconstant +con-13-ati+ #x894E)
  53 (defconstant +con-14-ati+ #x894F)
  54 (defconstant +con-15-ati+ #x8950)
  55 (defconstant +con-16-ati+ #x8951)
  56 (defconstant +con-17-ati+ #x8952)
  57 (defconstant +con-18-ati+ #x8953)
  58 (defconstant +con-19-ati+ #x8954)
  59 (defconstant +con-20-ati+ #x8955)
  60 (defconstant +con-21-ati+ #x8956)
  61 (defconstant +con-22-ati+ #x8957)
  62 (defconstant +con-23-ati+ #x8958)
  63 (defconstant +con-24-ati+ #x8959)
  64 (defconstant +con-25-ati+ #x895A)
  65 (defconstant +con-26-ati+ #x895B)
  66 (defconstant +con-27-ati+ #x895C)
  67 (defconstant +con-28-ati+ #x895D)
  68 (defconstant +con-29-ati+ #x895E)
  69 (defconstant +con-30-ati+ #x895F)
  70 (defconstant +con-31-ati+ #x8960)
  71 (defconstant +mov-ati+ #x8961)
  72 (defconstant +add-ati+ #x8963)
  73 (defconstant +mul-ati+ #x8964)
  74 (defconstant +sub-ati+ #x8965)
  75 (defconstant +dot3-ati+ #x8966)
  76 (defconstant +dot4-ati+ #x8967)
  77 (defconstant +mad-ati+ #x8968)
  78 (defconstant +lerp-ati+ #x8969)
  79 (defconstant +cnd-ati+ #x896A)
  80 (defconstant +cnd0-ati+ #x896B)
  81 (defconstant +dot2-add-ati+ #x896C)
  82 (defconstant +secondary-interpolator-ati+ #x896D)
  83 (defconstant +num-fragment-registers-ati+ #x896E)
  84 (defconstant +num-fragment-constants-ati+ #x896F)
  85 (defconstant +num-passes-ati+ #x8970)
  86 (defconstant +num-instructions-per-pass-ati+ #x8971)
  87 (defconstant +num-instructions-total-ati+ #x8972)
  88 (defconstant +num-input-interpolator-components-ati+ #x8973)
  89 (defconstant +num-loopback-components-ati+ #x8974)
  90 (defconstant +color-alpha-pairing-ati+ #x8975)
  91 (defconstant +swizzle-str-ati+ #x8976)
  92 (defconstant +swizzle-stq-ati+ #x8977)
  93 (defconstant +swizzle-str-dr-ati+ #x8978)
  94 (defconstant +swizzle-stq-dq-ati+ #x8979)
  95 (defconstant +swizzle-strq-ati+ #x897A)
  96 (defconstant +swizzle-strq-dq-ati+ #x897B)
  97 (defconstant +red-bit-ati+ #x1)
  98 (defconstant +green-bit-ati+ #x2)
  99 (defconstant +blue-bit-ati+ #x4)
 100 (defconstant +2x-bit-ati+ #x1)
 101 (defconstant +4x-bit-ati+ #x2)
 102 (defconstant +8x-bit-ati+ #x4)
 103 (defconstant +half-bit-ati+ #x8)
 104 (defconstant +quarter-bit-ati+ #x10)
 105 (defconstant +eighth-bit-ati+ #x20)
 106 (defconstant +saturate-bit-ati+ #x40)
 107 (defconstant +2x-bit-ati+ #x1)
 108 (defconstant +comp-bit-ati+ #x2)
 109 (defconstant +negate-bit-ati+ #x4)
 110 (defconstant +bias-bit-ati+ #x8)
 111 (defglextfun
 112  (("SetFragmentShaderConstantATI" set-fragment-shader-constant-ati) :args
 113   ((:name |dst| :type |UInt32| :direction :in)
 114    (:name |value| :type |ConstFloat32| :direction :in :array t :size #x4))
 115   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 116   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 117   :offset ("?")))
 118 (defglextfun
 119  (("AlphaFragmentOp3ATI" alpha-fragment-op-3-ati) :args
 120   ((:name |op| :type |FragmentOpATI| :direction :in)
 121    (:name |dst| :type |UInt32| :direction :in)
 122    (:name |dstMod| :type |UInt32| :direction :in)
 123    (:name |arg1| :type |UInt32| :direction :in)
 124    (:name |arg1Rep| :type |UInt32| :direction :in)
 125    (:name |arg1Mod| :type |UInt32| :direction :in)
 126    (:name |arg2| :type |UInt32| :direction :in)
 127    (:name |arg2Rep| :type |UInt32| :direction :in)
 128    (:name |arg2Mod| :type |UInt32| :direction :in)
 129    (:name |arg3| :type |UInt32| :direction :in)
 130    (:name |arg3Rep| :type |UInt32| :direction :in)
 131    (:name |arg3Mod| :type |UInt32| :direction :in))
 132   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 133   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 134   :offset ("?")))
 135 (defglextfun
 136  (("AlphaFragmentOp2ATI" alpha-fragment-op-2-ati) :args
 137   ((:name |op| :type |FragmentOpATI| :direction :in)
 138    (:name |dst| :type |UInt32| :direction :in)
 139    (:name |dstMod| :type |UInt32| :direction :in)
 140    (:name |arg1| :type |UInt32| :direction :in)
 141    (:name |arg1Rep| :type |UInt32| :direction :in)
 142    (:name |arg1Mod| :type |UInt32| :direction :in)
 143    (:name |arg2| :type |UInt32| :direction :in)
 144    (:name |arg2Rep| :type |UInt32| :direction :in)
 145    (:name |arg2Mod| :type |UInt32| :direction :in))
 146   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 147   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 148   :offset ("?")))
 149 (defglextfun
 150  (("AlphaFragmentOp1ATI" alpha-fragment-op-1-ati) :args
 151   ((:name |op| :type |FragmentOpATI| :direction :in)
 152    (:name |dst| :type |UInt32| :direction :in)
 153    (:name |dstMod| :type |UInt32| :direction :in)
 154    (:name |arg1| :type |UInt32| :direction :in)
 155    (:name |arg1Rep| :type |UInt32| :direction :in)
 156    (:name |arg1Mod| :type |UInt32| :direction :in))
 157   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 158   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 159   :offset ("?")))
 160 (defglextfun
 161  (("ColorFragmentOp3ATI" color-fragment-op-3-ati) :args
 162   ((:name |op| :type |FragmentOpATI| :direction :in)
 163    (:name |dst| :type |UInt32| :direction :in)
 164    (:name |dstMask| :type |UInt32| :direction :in)
 165    (:name |dstMod| :type |UInt32| :direction :in)
 166    (:name |arg1| :type |UInt32| :direction :in)
 167    (:name |arg1Rep| :type |UInt32| :direction :in)
 168    (:name |arg1Mod| :type |UInt32| :direction :in)
 169    (:name |arg2| :type |UInt32| :direction :in)
 170    (:name |arg2Rep| :type |UInt32| :direction :in)
 171    (:name |arg2Mod| :type |UInt32| :direction :in)
 172    (:name |arg3| :type |UInt32| :direction :in)
 173    (:name |arg3Rep| :type |UInt32| :direction :in)
 174    (:name |arg3Mod| :type |UInt32| :direction :in))
 175   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 176   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 177   :offset ("?")))
 178 (defglextfun
 179  (("ColorFragmentOp2ATI" color-fragment-op-2-ati) :args
 180   ((:name |op| :type |FragmentOpATI| :direction :in)
 181    (:name |dst| :type |UInt32| :direction :in)
 182    (:name |dstMask| :type |UInt32| :direction :in)
 183    (:name |dstMod| :type |UInt32| :direction :in)
 184    (:name |arg1| :type |UInt32| :direction :in)
 185    (:name |arg1Rep| :type |UInt32| :direction :in)
 186    (:name |arg1Mod| :type |UInt32| :direction :in)
 187    (:name |arg2| :type |UInt32| :direction :in)
 188    (:name |arg2Rep| :type |UInt32| :direction :in)
 189    (:name |arg2Mod| :type |UInt32| :direction :in))
 190   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 191   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 192   :offset ("?")))
 193 (defglextfun
 194  (("ColorFragmentOp1ATI" color-fragment-op-1-ati) :args
 195   ((:name |op| :type |FragmentOpATI| :direction :in)
 196    (:name |dst| :type |UInt32| :direction :in)
 197    (:name |dstMask| :type |UInt32| :direction :in)
 198    (:name |dstMod| :type |UInt32| :direction :in)
 199    (:name |arg1| :type |UInt32| :direction :in)
 200    (:name |arg1Rep| :type |UInt32| :direction :in)
 201    (:name |arg1Mod| :type |UInt32| :direction :in))
 202   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 203   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 204   :offset ("?")))
 205 (defglextfun
 206  (("SampleMapATI" sample-map-ati) :args
 207   ((:name |dst| :type |UInt32| :direction :in)
 208    (:name |interp| :type |UInt32| :direction :in)
 209    (:name |swizzle| :type |SwizzleOpATI| :direction :in))
 210   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 211   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 212   :offset ("?")))
 213 (defglextfun
 214  (("PassTexCoordATI" pass-tex-coord-ati) :args
 215   ((:name |dst| :type |UInt32| :direction :in)
 216    (:name |coord| :type |UInt32| :direction :in)
 217    (:name |swizzle| :type |SwizzleOpATI| :direction :in))
 218   :return ("void") :category ("ATI_fragment_shader") :version ("1.2")
 219   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore")
 220   :offset ("?")))
 221 (defglextfun
 222  (("EndFragmentShaderATI" end-fragment-shader-ati) :args nil :return ("void")
 223   :category ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode
 224   ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 225 (defglextfun
 226  (("BeginFragmentShaderATI" begin-fragment-shader-ati) :args nil :return
 227   ("void") :category ("ATI_fragment_shader") :version ("1.2") :extension nil
 228   :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 229 (defglextfun
 230  (("DeleteFragmentShaderATI" delete-fragment-shader-ati) :args
 231   ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category
 232   ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode ("?")
 233   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 234 (defglextfun
 235  (("BindFragmentShaderATI" bind-fragment-shader-ati) :args
 236   ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category
 237   ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode ("?")
 238   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))
 239 (defglextfun
 240  (("GenFragmentShadersATI" gen-fragment-shaders-ati) :args
 241   ((:name |range| :type |UInt32| :direction :in)) :return ("UInt32") :category
 242   ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode ("?")
 243   :glxflags ("ignore") :glsflags ("ignore") :offset ("?")))