lib/opengl-arb_occlusion_query.lisp

   1
   2 (in-package #:gl)
   3
   4 ;;;; ARB_occlusion_query
   5
   6 (defconstant +query-counter-bits-arb+ #x8864)
   7 (defconstant +current-query-arb+ #x8865)
   8 (defconstant +query-result-arb+ #x8866)
   9 (defconstant +query-result-available-arb+ #x8867)
  10 (defconstant +samples-passed-arb+ #x8914)
  11 (defglextfun
  12  (("GetQueryObjectuivARB" get-query-object-uiv-arb) :args
  13   ((:name |id| :type |UInt32| :direction :in)
  14    (:name |pname| :type |GLenum| :direction :in)
  15    (:name |params| :type |UInt32| :direction :out :array t :size pname))
  16   :return ("void") :category ("ARB_occlusion_query") :dlflags ("notlistable")
  17   :version ("1.5") :extension nil :alias ("GetQueryObjectuiv") :glsalias
  18   ("GetQueryObjectuiv")))
  19 (defglextfun
  20  (("GetQueryObjectivARB" get-query-object-iv-arb) :args
  21   ((:name |id| :type |UInt32| :direction :in)
  22    (:name |pname| :type |GLenum| :direction :in)
  23    (:name |params| :type |Int32| :direction :out :array t :size pname))
  24   :return ("void") :category ("ARB_occlusion_query") :dlflags ("notlistable")
  25   :version ("1.5") :extension nil :alias ("GetQueryObjectiv") :glsalias
  26   ("GetQueryObjectiv")))
  27 (defglextfun
  28  (("GetQueryivARB" get-queryiv-arb) :args
  29   ((:name |target| :type |GLenum| :direction :in)
  30    (:name |pname| :type |GLenum| :direction :in)
  31    (:name |params| :type |Int32| :direction :out :array t :size pname))
  32   :return ("void") :category ("ARB_occlusion_query") :dlflags ("notlistable")
  33   :version ("1.5") :extension nil :alias ("GetQueryiv") :glsalias
  34   ("GetQueryiv")))
  35 (defglextfun
  36  (("EndQueryARB" end-query-arb) :args
  37   ((:name |target| :type |GLenum| :direction :in)) :return ("void") :category
  38   ("ARB_occlusion_query") :version ("1.5") :extension nil :alias ("EndQuery")
  39   :glsalias ("EndQuery")))
  40 (defglextfun
  41  (("BeginQueryARB" begin-query-arb) :args
  42   ((:name |target| :type |GLenum| :direction :in)
  43    (:name |id| :type |UInt32| :direction :in))
  44   :return ("void") :category ("ARB_occlusion_query") :version ("1.5")
  45   :extension nil :alias ("BeginQuery") :glsalias ("BeginQuery")))
  46 (defglextfun
  47  (("IsQueryARB" is-query-arb) :args
  48   ((:name |id| :type |UInt32| :direction :in)) :return ("Boolean") :category
  49   ("ARB_occlusion_query") :version ("1.5") :extension nil :alias ("IsQuery")
  50   :glsalias ("IsQuery")))
  51 (defglextfun
  52  (("DeleteQueriesARB" delete-queries-arb) :args
  53   ((:name |n| :type |SizeI| :direction :in)
  54    (:name |ids| :type |UInt32| :direction :in :array t :size n))
  55   :return ("void") :category ("ARB_occlusion_query") :version ("1.5")
  56   :extension nil :alias ("DeleteQueries") :glsalias ("DeleteQueries")))
  57 (defglextfun
  58  (("GenQueriesARB" gen-queries-arb) :args
  59   ((:name |n| :type |SizeI| :direction :in)
  60    (:name |ids| :type |UInt32| :direction :out :array t :size n))
  61   :return ("void") :category ("ARB_occlusion_query") :version ("1.5")
  62   :extension nil :alias ("GenQueries") :glsalias ("GenQueries")))