lib/opengl-sgis_point_parameters.lisp

   1
   2 (in-package #:gl)
   3
   4 ;;;; SGIS_point_parameters
   5
   6 (defconstant +point-size-min+ #x8126)
   7 (defconstant +point-size-min-arb+ #x8126)
   8 (defconstant +point-size-min-ext+ #x8126)
   9 (defconstant +point-size-max+ #x8127)
  10 (defconstant +point-size-max-arb+ #x8127)
  11 (defconstant +point-size-max-ext+ #x8127)
  12 (defconstant +point-fade-threshold-size+ #x8128)
  13 (defconstant +point-fade-threshold-size-arb+ #x8128)
  14 (defconstant +point-fade-threshold-size-ext+ #x8128)
  15 (defconstant +point-distance-attenuation+ #x8129)
  16 (defconstant +point-distance-attenuation-arb+ #x8129)
  17 (defconstant +distance-attenuation-ext+ #x8129)
  18 (defglextfun
  19  (("PointParameterfvSGIS" point-parameter-fv-sgis) :args
  20   ((:name |pname| :type |PointParameterNameARB| :direction :in)
  21    (:name |params| :type |CheckedFloat32| :direction :in :array t :size
  22     (|pname|)))
  23   :return ("void") :category ("SGIS_point_parameters") :version ("1.0")
  24   :glxflags ("SGI") :extension nil :alias ("PointParameterfvARB") :glsalias
  25   ("PointParameterfvARB")))
  26 (defglextfun
  27  (("PointParameterfSGIS" point-parameter-f-sgis) :args
  28   ((:name |pname| :type |PointParameterNameARB| :direction :in)
  29    (:name |param| :type |CheckedFloat32| :direction :in))
  30   :return ("void") :category ("SGIS_point_parameters") :version ("1.0")
  31   :glxflags ("SGI") :extension nil :alias ("PointParameterfARB") :glsalias
  32   ("PointParameterfARB")))