|
@@ -87,6 +87,12 @@ Const
|
|
|
{$ENDIF OS2}
|
|
{$ENDIF OS2}
|
|
|
{$endif}
|
|
{$endif}
|
|
|
|
|
|
|
|
|
|
+type
|
|
|
|
|
+ TViewPortArray = array [0..3] of GLint;
|
|
|
|
|
+ T16dArray = array [0..15] of GLdouble;
|
|
|
|
|
+ T3dArray = array [0..2] of GLdouble;
|
|
|
|
|
+ T4pArray = array [0..3] of Pointer;
|
|
|
|
|
+ T4fArray = array [0..3] of GLfloat;
|
|
|
|
|
|
|
|
const
|
|
const
|
|
|
GLU_EXT_object_space_tess = 1;
|
|
GLU_EXT_object_space_tess = 1;
|
|
@@ -283,7 +289,7 @@ Type
|
|
|
PGLdouble = ^GLdouble;
|
|
PGLdouble = ^GLdouble;
|
|
|
PGLfloat = ^GLfloat;
|
|
PGLfloat = ^GLfloat;
|
|
|
PGLint = ^GLint;
|
|
PGLint = ^GLint;
|
|
|
- PGLubyte = ^GLubyte;
|
|
|
|
|
|
|
+ PGLubyte = PAnsiChar; //< this is only used for strings in GLU
|
|
|
PGLUnurbs = ^GLUnurbs;
|
|
PGLUnurbs = ^GLUnurbs;
|
|
|
PGLUquadric = ^GLUquadric;
|
|
PGLUquadric = ^GLUquadric;
|
|
|
PGLUtesselator = ^GLUtesselator;
|
|
PGLUtesselator = ^GLUtesselator;
|
|
@@ -293,6 +299,7 @@ Type
|
|
|
GLUtesselatorObj = GLUtesselator;
|
|
GLUtesselatorObj = GLUtesselator;
|
|
|
GLUtriangulatorObj = GLUtesselator;
|
|
GLUtriangulatorObj = GLUtesselator;
|
|
|
_GLUfuncptr = procedure ;extdecl;
|
|
_GLUfuncptr = procedure ;extdecl;
|
|
|
|
|
+ TCallback = _GLUfuncptr;
|
|
|
|
|
|
|
|
{$IFDEF MORPHOS}
|
|
{$IFDEF MORPHOS}
|
|
|
|
|
|
marco