Silently fail if load-extension extension doesn't have anything to load.
[cl-glfw.git] / lib / opengl-ati_element_array.lisp
blobcfdf335b0c40cce569866edc59186e38e9123bfc
2 (in-package #:gl)
4 ;;;; ATI_element_array
6 (defconstant +element-array-ati+ #x8768)
7 (defconstant +element-array-type-ati+ #x8769)
8 (defconstant +element-array-pointer-ati+ #x876A)
9 (defglextfun
10 (("DrawRangeElementArrayATI" draw-range-element-array-ati) :args
11 ((:name |mode| :type |BeginMode| :direction :in)
12 (:name |start| :type |UInt32| :direction :in)
13 (:name |end| :type |UInt32| :direction :in)
14 (:name |count| :type |SizeI| :direction :in))
15 :return ("void") :category ("ATI_element_array") :dlflags ("handcode")
16 :glxflags ("client-handcode" "client-intercept" "server-handcode") :version
17 ("1.2") :glsopcode ("?") :offset ("?")))
18 (defglextfun
19 (("DrawElementArrayATI" draw-element-array-ati) :args
20 ((:name |mode| :type |BeginMode| :direction :in)
21 (:name |count| :type |SizeI| :direction :in))
22 :return ("void") :category ("ATI_element_array") :dlflags ("handcode")
23 :glxflags ("client-handcode" "client-intercept" "server-handcode") :version
24 ("1.2") :glsopcode ("?") :offset ("?")))
25 (defglextfun
26 (("ElementPointerATI" element-pointer-ati) :args
27 ((:name |type| :type |ElementPointerTypeATI| :direction :in)
28 (:name |pointer| :type |Void| :direction :in :array t :size (|type|)
29 :retained t))
30 :return ("void") :category ("ATI_element_array") :dlflags ("notlistable")
31 :glxflags ("client-handcode" "client-intercept" "server-handcode") :version
32 ("1.2") :glsflags ("ignore") :offset ("?")))