Fixes for some rare OpenGL function names. More verbosity when making exceptions...
[cl-glfw/dh.git] / lib / opengl-nv_parameter_buffer_object.lisp
bloba4c41cc30ca9f07766812a1f6c7272e728634a59
2 (in-package #:gl)
4 ;;;; NV_parameter_buffer_object
6 (defconstant +max-program-parameter-buffer-bindings-nv+ #x8DA0)
7 (defconstant +max-program-parameter-buffer-size-nv+ #x8DA1)
8 (defconstant +vertex-program-parameter-buffer-nv+ #x8DA2)
9 (defconstant +geometry-program-parameter-buffer-nv+ #x8DA3)
10 (defconstant +fragment-program-parameter-buffer-nv+ #x8DA4)
11 (defglextfun
12 (("ProgramBufferParametersIuivNV" program-buffer-parameters-i-uiv-nv) :args
13 ((:name |target| :type |ProgramTarget| :direction :in)
14 (:name |buffer| :type |UInt32| :direction :in)
15 (:name |index| :type |UInt32| :direction :in)
16 (:name |count| :type |SizeI| :direction :in)
17 (:name |params| :type |UInt32| :direction :in :array t :size count))
18 :return ("void") :category ("NV_parameter_buffer_object") :version ("1.2")
19 :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags
20 ("ignore") :glxflags ("ignore")))
21 (defglextfun
22 (("ProgramBufferParametersIivNV" program-buffer-parameters-i-iv-nv) :args
23 ((:name |target| :type |ProgramTarget| :direction :in)
24 (:name |buffer| :type |UInt32| :direction :in)
25 (:name |index| :type |UInt32| :direction :in)
26 (:name |count| :type |SizeI| :direction :in)
27 (:name |params| :type |Int32| :direction :in :array t :size count))
28 :return ("void") :category ("NV_parameter_buffer_object") :version ("1.2")
29 :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags
30 ("ignore") :glxflags ("ignore")))
31 (defglextfun
32 (("ProgramBufferParametersfvNV" program-buffer-parameters-fv-nv) :args
33 ((:name |target| :type |ProgramTarget| :direction :in)
34 (:name |buffer| :type |UInt32| :direction :in)
35 (:name |index| :type |UInt32| :direction :in)
36 (:name |count| :type |SizeI| :direction :in)
37 (:name |params| :type |Float32| :direction :in :array t :size count))
38 :return ("void") :category ("NV_parameter_buffer_object") :version ("1.2")
39 :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags
40 ("ignore") :glxflags ("ignore")))