lib/opengl-nv_fragment_program.lisp

   1
   2 (in-package #:gl)
   3
   4 ;;;; NV_fragment_program
   5
   6 (defconstant +max-fragment-program-local-parameters-nv+ #x8868)
   7 (defconstant +fragment-program-nv+ #x8870)
   8 (defconstant +max-texture-coords-nv+ #x8871)
   9 (defconstant +max-texture-image-units-nv+ #x8872)
  10 (defconstant +fragment-program-binding-nv+ #x8873)
  11 (defconstant +program-error-string-nv+ #x8874)
  12 (defglextfun
  13  (("GetProgramNamedParameterdvNV" get-program-named-parameter-dv-nv) :args
  14   ((:name |id| :type |UInt32| :direction :in)
  15    (:name |len| :type |SizeI| :direction :in)
  16    (:name |name| :type |UInt8| :direction :in :array t :size #x1)
  17    (:name |params| :type |Float64| :direction :out :array t :size #x4))
  18   :return ("void") :category ("NV_fragment_program") :dlflags ("notlistable")
  19   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
  20   :glsflags ("get") :glsopcode ("?") :offset ("687")))
  21 (defglextfun
  22  (("GetProgramNamedParameterfvNV" get-program-named-parameter-fv-nv) :args
  23   ((:name |id| :type |UInt32| :direction :in)
  24    (:name |len| :type |SizeI| :direction :in)
  25    (:name |name| :type |UInt8| :direction :in :array t :size #x1)
  26    (:name |params| :type |Float32| :direction :out :array t :size #x4))
  27   :return ("void") :category ("NV_fragment_program") :dlflags ("notlistable")
  28   :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore")
  29   :glsflags ("get") :glsopcode ("?") :offset ("686")))
  30 (defglextfun
  31  (("ProgramNamedParameter4dvNV" program-named-parameter-4dv-nv) :args
  32   ((:name |id| :type |UInt32| :direction :in)
  33    (:name |len| :type |SizeI| :direction :in)
  34    (:name |name| :type |UInt8| :direction :in :array t :size #x1)
  35    (:name |v| :type |Float64| :direction :in :array t :size #x4))
  36   :return ("void") :category ("NV_fragment_program") :version ("1.2")
  37   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?")
  38   :offset ("685")))
  39 (defglextfun
  40  (("ProgramNamedParameter4fvNV" program-named-parameter-4fv-nv) :args
  41   ((:name |id| :type |UInt32| :direction :in)
  42    (:name |len| :type |SizeI| :direction :in)
  43    (:name |name| :type |UInt8| :direction :in :array t :size #x1)
  44    (:name |v| :type |Float32| :direction :in :array t :size #x4))
  45   :return ("void") :category ("NV_fragment_program") :version ("1.2")
  46   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?")
  47   :offset ("684")))
  48 (defglextfun
  49  (("ProgramNamedParameter4dNV" program-named-parameter-4d-nv) :args
  50   ((:name |id| :type |UInt32| :direction :in)
  51    (:name |len| :type |SizeI| :direction :in)
  52    (:name |name| :type |UInt8| :direction :in :array t :size #x1)
  53    (:name |x| :type |Float64| :direction :in)
  54    (:name |y| :type |Float64| :direction :in)
  55    (:name |z| :type |Float64| :direction :in)
  56    (:name |w| :type |Float64| :direction :in))
  57   :return ("void") :category ("NV_fragment_program") :version ("1.2")
  58   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?")
  59   :offset ("683")))
  60 (defglextfun
  61  (("ProgramNamedParameter4fNV" program-named-parameter-4f-nv) :args
  62   ((:name |id| :type |UInt32| :direction :in)
  63    (:name |len| :type |SizeI| :direction :in)
  64    (:name |name| :type |UInt8| :direction :in :array t :size #x1)
  65    (:name |x| :type |Float32| :direction :in)
  66    (:name |y| :type |Float32| :direction :in)
  67    (:name |z| :type |Float32| :direction :in)
  68    (:name |w| :type |Float32| :direction :in))
  69   :return ("void") :category ("NV_fragment_program") :version ("1.2")
  70   :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?")
  71   :offset ("682")))