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
))