Formatting of a comment of old code.
[cl-glfw.git] / lib / opengl-intel_parallel_arrays.lisp
blobfdf38a2791d05b4672af111914634a96da8826fb
2 (in-package #:gl)
4 ;;;; INTEL_parallel_arrays
6 (defconstant +parallel-arrays-intel+ #x83F4)
7 (defconstant +vertex-array-parallel-pointers-intel+ #x83F5)
8 (defconstant +normal-array-parallel-pointers-intel+ #x83F6)
9 (defconstant +color-array-parallel-pointers-intel+ #x83F7)
10 (defconstant +texture-coord-array-parallel-pointers-intel+ #x83F8)
11 (defconstant +parallel-arrays-intel+ #x83F4)
12 (defconstant +vertex-array-parallel-pointers-intel+ #x83F5)
13 (defconstant +normal-array-parallel-pointers-intel+ #x83F6)
14 (defconstant +color-array-parallel-pointers-intel+ #x83F7)
15 (defconstant +texture-coord-array-parallel-pointers-intel+ #x83F8)
16 (defglextfun
17 (("TexCoordPointervINTEL" tex-coord-pointerv-intel) :args
18 ((:name |size| :type |Int32| :direction :in)
19 (:name |type| :type |VertexPointerType| :direction :in)
20 (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4
21 :retained t))
22 :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable")
23 :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1")
24 :glsflags ("ignore" "client") :offset ("?")))
25 (defglextfun
26 (("ColorPointervINTEL" color-pointerv-intel) :args
27 ((:name |size| :type |Int32| :direction :in)
28 (:name |type| :type |VertexPointerType| :direction :in)
29 (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4
30 :retained t))
31 :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable")
32 :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1")
33 :glsflags ("ignore" "client") :offset ("?")))
34 (defglextfun
35 (("NormalPointervINTEL" normal-pointerv-intel) :args
36 ((:name |type| :type |NormalPointerType| :direction :in)
37 (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4
38 :retained t))
39 :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable")
40 :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1")
41 :glsflags ("ignore" "client") :offset ("?")))
42 (defglextfun
43 (("VertexPointervINTEL" vertex-pointerv-intel) :args
44 ((:name |size| :type |Int32| :direction :in)
45 (:name |type| :type |VertexPointerType| :direction :in)
46 (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4
47 :retained t))
48 :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable")
49 :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1")
50 :glsflags ("ignore" "client") :offset ("?")))