Formatting of a comment of old code.
[cl-glfw.git] / lib / opengl-sgix_async.lisp
blob4f6e7a05358592d69c7f0081b67d41a1fd8c4bde
2 (in-package #:gl)
4 ;;;; SGIX_async
6 (defglextfun
7 (("IsAsyncMarkerSGIX" is-async-marker-sgix) :args
8 ((:name |marker| :type |UInt32| :direction :in)) :return ("Boolean")
9 :category ("SGIX_async") :version ("1.0") :dlflags ("notlistable") :glxflags
10 ("ignore") :extension nil :glsopcode ("0x019D") :offset ("?")))
11 (defglextfun
12 (("DeleteAsyncMarkersSGIX" delete-async-markers-sgix) :args
13 ((:name |marker| :type |UInt32| :direction :in)
14 (:name |range| :type |SizeI| :direction :in))
15 :return ("void") :category ("SGIX_async") :version ("1.0") :dlflags
16 ("notlistable") :glxflags ("ignore") :extension nil :glsopcode ("0x019C")
17 :offset ("?")))
18 (defglextfun
19 (("GenAsyncMarkersSGIX" gen-async-markers-sgix) :args
20 ((:name |range| :type |SizeI| :direction :in)) :return ("UInt32") :category
21 ("SGIX_async") :version ("1.0") :dlflags ("notlistable") :glxflags ("ignore")
22 :extension nil :glsopcode ("0x019B") :offset ("?")))
23 (defglextfun
24 (("PollAsyncSGIX" poll-async-sgix) :args
25 ((:name |markerp| :type |UInt32| :direction :out :array t :size #x1)) :return
26 ("Int32") :category ("SGIX_async") :version ("1.0") :dlflags ("notlistable")
27 :glxflags ("ignore") :extension nil :glsopcode ("0x019A") :offset ("?")))
28 (defglextfun
29 (("FinishAsyncSGIX" finish-async-sgix) :args
30 ((:name |markerp| :type |UInt32| :direction :out :array t :size #x1)) :return
31 ("Int32") :category ("SGIX_async") :version ("1.0") :dlflags ("notlistable")
32 :glxflags ("ignore") :extension nil :glsopcode ("0x0199") :offset ("?")))
33 (defglextfun
34 (("AsyncMarkerSGIX" async-marker-sgix) :args
35 ((:name |marker| :type |UInt32| :direction :in)) :return ("void") :category
36 ("SGIX_async") :version ("1.0") :glxflags ("ignore") :extension nil
37 :glsopcode ("0x0198") :offset ("?")))