Little nomenclature and do->loop clean ups.
[cl-glfw/jecs.git] / lib / glu-version_1_2.lisp
blob734af2363e8a6d2988defb046fba0dd577c9c96a
1 (in-package #:cl-glfw-glu)
3 (defcfun ("gluNextContour" next-contour) :void (tess :pointer) (type enum))
4 (defcfun ("gluEndPolygon" end-polygon) :void (tess :pointer))
5 (defcfun ("gluDeleteTess" delete-tess) :void (tess :pointer))
6 (defcfun ("gluNewTess" new-tess) :pointer )
7 (defcfun ("gluTessBeginContour" tess-begin-contour) :void (tess :pointer))
8 (defcfun ("gluTessBeginPolygon" tess-begin-polygon) :void (tess :pointer) (data :pointer))
9 (defcfun ("gluTessCallback" tess-callback) :void (tess :pointer) (which enum) (CallBackFunc :pointer))
10 (defcfun ("gluTessEndContour" tess-end-contour) :void (tess :pointer))
11 (defcfun ("gluTessEndPolygon" tess-end-polygon) :void (tess :pointer))
12 (defcfun ("gluTessNormal" tess-normal) :void (tess :pointer) (valueX double) (valueY double) (valueZ double))
13 (defcfun ("gluTessProperty" tess-property) :void (tess :pointer) (which enum) (data double))
14 (defcfun ("gluTessVertex" tess-vertex) :void (tess :pointer) (location :pointer) (data :pointer))
16 (defcfun ("gluGetTessProperty" get-tess-property) :void (tess :pointer) (which enum) (data :pointer))
17 (defcfun ("gluBeginPolygon" begin-polygon) :void (tess :pointer))