jfc's patch for reorganising cl-glfw-opengl and cl-glfw packages. Changed need propog...
[cl-glfw.git] / lib / opengl-sgi_color_table.lisp
blobc70e40308e465d338b21107927a4febdf35d082f
2 (in-package #:gl)
4 ;;;; SGI_color_table
6 (defglextfun
7 (("GetColorTableParameterivSGI" get-color-table-parameteriv-sgi) :args
8 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
9 (:name |pname| :type |GetColorTableParameterPNameSGI| :direction :in)
10 (:name |params| :type |Int32| :direction :out :array t :size (|pname|)))
11 :return ("void") :category ("SGI_color_table") :dlflags ("notlistable")
12 :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4100") :extension nil
13 :glsflags ("get") :glsopcode ("0x016D") :offset ("429")))
14 (defglextfun
15 (("GetColorTableParameterfvSGI" get-color-table-parameterfv-sgi) :args
16 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
17 (:name |pname| :type |GetColorTableParameterPNameSGI| :direction :in)
18 (:name |params| :type |Float32| :direction :out :array t :size (|pname|)))
19 :return ("void") :category ("SGI_color_table") :dlflags ("notlistable")
20 :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4099") :extension nil
21 :glsflags ("get") :glsopcode ("0x016C") :offset ("428")))
22 (defglextfun
23 (("GetColorTableSGI" get-color-table-sgi) :args
24 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
25 (:name |format| :type |PixelFormat| :direction :in)
26 (:name |type| :type |PixelType| :direction :in)
27 (:name |table| :type |Void| :direction :out :array t :size
28 (|target| |format| |type|)))
29 :return ("void") :category ("SGI_color_table") :dlflags ("notlistable")
30 :glxflags ("client-handcode" "server-handcode" "SGI") :version ("1.0")
31 :glxvendorpriv ("4098") :extension nil :glsflags ("get" "pixel-pack")
32 :glsopcode ("0x016B") :offset ("427")))
33 (defglextfun
34 (("CopyColorTableSGI" copy-color-table-sgi) :args
35 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
36 (:name |internalformat| :type |PixelInternalFormat| :direction :in)
37 (:name |x| :type |WinCoord| :direction :in)
38 (:name |y| :type |WinCoord| :direction :in)
39 (:name |width| :type |SizeI| :direction :in))
40 :return ("void") :category ("SGI_color_table") :version ("1.0") :glxropcode
41 ("2056") :glxflags ("SGI") :extension nil :alias ("CopyColorTable") :glsalias
42 ("CopyColorTable")))
43 (defglextfun
44 (("ColorTableParameterivSGI" color-table-parameteriv-sgi) :args
45 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
46 (:name |pname| :type |ColorTableParameterPNameSGI| :direction :in)
47 (:name |params| :type |CheckedInt32| :direction :in :array t :size
48 (|pname|)))
49 :return ("void") :category ("SGI_color_table") :version ("1.0") :glxropcode
50 ("2055") :glxflags ("SGI") :extension nil :alias ("ColorTableParameteriv")
51 :glsalias ("ColorTableParameteriv")))
52 (defglextfun
53 (("ColorTableParameterfvSGI" color-table-parameterfv-sgi) :args
54 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
55 (:name |pname| :type |ColorTableParameterPNameSGI| :direction :in)
56 (:name |params| :type |CheckedFloat32| :direction :in :array t :size
57 (|pname|)))
58 :return ("void") :category ("SGI_color_table") :version ("1.0") :glxropcode
59 ("2054") :glxflags ("SGI") :extension nil :alias ("ColorTableParameterfv")
60 :glsalias ("ColorTableParameterfv")))
61 (defglextfun
62 (("ColorTableSGI" color-table-sgi) :args
63 ((:name |target| :type |ColorTableTargetSGI| :direction :in)
64 (:name |internalformat| :type |PixelInternalFormat| :direction :in)
65 (:name |width| :type |SizeI| :direction :in)
66 (:name |format| :type |PixelFormat| :direction :in)
67 (:name |type| :type |PixelType| :direction :in)
68 (:name |table| :type |Void| :direction :in :array t :size
69 (|format| |type| |width|)))
70 :return ("void") :category ("SGI_color_table") :dlflags ("handcode")
71 :glxflags ("client-handcode" "server-handcode" "SGI") :version ("1.0")
72 :glxropcode ("2053") :extension nil :alias ("ColorTable") :glsalias
73 ("ColorTable")))