Fix for callbacks under windows from Andrew Lyon.
[cl-glfw.git] / lib / glu-version_1_3.lisp
blobeb62dc894193944db56a9d0744fc578fd9e552e4
1 (in-package #:cl-glfw-glu)
3 (defcfun ("gluScaleImage" scale-image) int (format enum) (wIn sizei) (hIn sizei) (typeIn enum) (dataIn :pointer) (wOut sizei) (hOut sizei) (typeOut enum) (dataOut :pointer))
4 (defcfun ("gluCheckExtension" check-extension) boolean (extName :pointer) (extString :pointer))
5 (defcfun ("gluBuild1DMipmapLevels" build-1d-mipmap-levels) int (target enum) (internalFormat int) (width sizei) (format enum) (type enum) (level int) (base int) (max int) (data :pointer))
6 (defcfun ("gluBuild2DMipmapLevels" build-2d-mipmap-levels) int (target enum) (internalFormat int) (width sizei) (height sizei) (format enum) (type enum) (level int) (base int) (max int) (data :pointer))
7 (defcfun ("gluBuild3DMipmapLevels" build-3d-mipmap-levels) int (target enum) (internalFormat int) (width sizei) (height sizei) (depth sizei) (format enum) (type enum) (level int) (base int) (max int) (data :pointer))
8 (defcfun ("gluBuild3DMipmaps" build-3d-mipmaps) int (target enum) (internalFormat int) (width sizei) (height sizei) (depth sizei) (format enum) (type enum) (data :pointer))
10 (defcfun ("gluNurbsCallback" nurbs-callback) :void (nurb :pointer) (which enum) (CallBackFunc :pointer))
11 (defcfun ("gluNurbsCallbackData" nurbs-callback-data) :void (nurb :pointer) (userData :pointer))
12 (defcfun ("gluNurbsCallbackDataEXT" nurbs-callback-dataext) :void (nurb :pointer) (userData :pointer))
13 (defcfun ("gluUnProject4" un-project-4) int (winX double) (winY double) (winZ double) (clipW double) (model :pointer) (proj :pointer) (view :pointer) (nearVal double) (farVal double) (objX :pointer) (objY :pointer) (objZ :pointer) (objW :pointer))