Index

Package: GLU

Description

package GLU is
Changed by MB for Windows 95, 980529 C replaced by Stdcall OpenGL 1.1 Ada binding, package GLU W. M. Richards, NiEstu, Phoenix AZ, December 1997 Converted from Brian Paul's Mesa package glu.h header file, version 2, 5. As noted below in Brian's original comments, this code is distributed under the terms of the GNU Library General Public License. Version 0.1, 21 December 1997 Here are the original glu.h comments: Mesa 3 - D graphics library Version : 2.4 Copyright (C) 1995 - 1997 Brian Paul This library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more details. You should have received a copy of the GNU Library General Public License along with this library; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

Types

Viewport_Rec

type Viewport_Rec is record
      X, Y :           aliased GL.Int;
      Width, Height :  aliased GL.Int;
   end record;

References:

glu.ads:58:9 (declaration)
glu.adb:21:31 (reference)
glu.adb:32:36 (reference)
glu.ads:66:41 (reference)
glu.ads:630:37 (reference)
glu.ads:658:32 (reference)
globe_3d-portals.adb:24:25 (reference)
globe_3d-software_anti_aliasing.adb:128:28 (reference)

Matrix_Float

type Matrix_Float      is array (0 .. 3, 0 .. 3) of aliased GL.C_Float;

References:

glu.ads:63:9 (declaration)
glu.ads:67:41 (reference)

Matrix_Double

type Matrix_Double     is array (0 .. 3, 0 .. 3) of aliased GL.Double;

References:

glu.ads:64:9 (declaration)
glu.adb:13:31 (reference)
glu.adb:30:36 (reference)
glu.adb:31:36 (reference)
glu.ads:68:41 (reference)
glu.ads:628:37 (reference)
glu.ads:629:37 (reference)
glu.ads:653:32 (reference)
globe_3d-portals.adb:23:25 (reference)

Viewport_Ptr

type Viewport_Ptr      is access all Viewport_Rec;

References:

glu.ads:66:9 (declaration)
glu.adb:8:30 (reference)
glu.adb:22:67 (reference)
glu.adb:38:67 (reference)
glu.ads:397:50 (reference)
glu.ads:609:37 (reference)
glu.ads:616:36 (reference)
glu.ads:641:38 (reference)
glu.ads:656:28 (reference)
glu.ads:733:36 (reference)
glu.ads:735:28 (reference)

Matrix_Float_Ptr

type Matrix_Float_Ptr  is access all Matrix_Float;

References:

glu.ads:67:9 (declaration)
glu.ads:395:50 (reference)
glu.ads:396:50 (reference)

Matrix_Double_Ptr

type Matrix_Double_Ptr is access all Matrix_Double;

References:

glu.ads:68:9 (declaration)
glu.adb:7:30 (reference)
glu.adb:14:67 (reference)
glu.adb:39:67 (reference)
glu.ads:614:36 (reference)
glu.ads:615:36 (reference)
glu.ads:639:38 (reference)
glu.ads:640:38 (reference)
glu.ads:650:28 (reference)
glu.ads:725:35 (reference)
glu.ads:727:28 (reference)

GLUquadricObj

type GLUquadricObj      is private;

References:

glu.ads:70:9 (declaration)
glu.ads:74:45 (reference)
glu.ads:664:9 (full declaration)

GLUtriangulatorObj

type GLUtriangulatorObj is private;

References:

glu.ads:71:9 (declaration)
glu.ads:75:45 (reference)
glu.ads:665:9 (full declaration)

GLUnurbsObj

type GLUnurbsObj        is private;

References:

glu.ads:72:9 (declaration)
glu.ads:76:45 (reference)
glu.ads:666:9 (full declaration)

GLUquadricObjPtr

type GLUquadricObjPtr      is access all GLUquadricObj;

References:

glu.ads:74:9 (declaration)
glu.ads:203:13 (reference)
glu.ads:205:37 (reference)
glu.ads:207:45 (reference)
glu.ads:210:48 (reference)
glu.ads:213:43 (reference)
glu.ads:216:46 (reference)
glu.ads:219:39 (reference)
glu.ads:223:37 (reference)
glu.ads:230:31 (reference)
glu.ads:235:34 (reference)
glu.ads:241:41 (reference)
graphics_opengl.adb:203:32 (reference)

GLUtriangulatorObjPtr

type GLUtriangulatorObjPtr is access all GLUtriangulatorObj;

References:

glu.ads:75:9 (declaration)
glu.ads:537:13 (reference)
glu.ads:539:36 (reference)
glu.ads:542:36 (reference)
glu.ads:545:36 (reference)
glu.ads:548:36 (reference)
glu.ads:551:36 (reference)
glu.ads:555:33 (reference)
glu.ads:557:35 (reference)
glu.ads:559:33 (reference)
glu.ads:561:36 (reference)
glu.ads:564:33 (reference)

GLUnurbsObjPtr

type GLUnurbsObjPtr        is access all GLUnurbsObj;

References:

glu.ads:76:9 (declaration)
glu.ads:390:13 (reference)
glu.ads:392:42 (reference)
glu.ads:394:50 (reference)
glu.ads:399:40 (reference)
glu.ads:403:43 (reference)
glu.ads:407:33 (reference)
glu.ads:409:31 (reference)
glu.ads:411:37 (reference)
glu.ads:419:35 (reference)
glu.ads:421:33 (reference)
glu.ads:423:42 (reference)
glu.ads:435:32 (reference)
glu.ads:437:30 (reference)
glu.ads:439:34 (reference)
glu.ads:445:37 (reference)

ErrorEnm

type ErrorEnm is
     (
      GL_NO_ERROR,
      GL_INVALID_ENUM,
      GL_INVALID_VALUE,
      GL_INVALID_OPERATION,
      GL_STACK_OVERFLOW,
      GL_STACK_UNDERFLOW,
      GL_OUT_OF_MEMORY,
      GLU_INVALID_ENUM,
      GLU_INVALID_VALUE,
      GLU_OUT_OF_MEMORY,
      GLU_INCOMPATIBLE_GL_VERSION
     );

References:

glu.ads:81:9 (declaration)
glu.ads:95:8 (reference)
glu.ads:109:8 (reference)
glu.ads:111:38 (reference)
glu.ads:200:63 (reference)
glu.ads:675:40 (reference)
glu.ads:676:40 (reference)
Error string

DrawStyleEnm

type DrawStyleEnm is
     (
      GLU_POINT,
      GLU_LINE,
      GLU_FILL,
      GLU_SILHOUETTE
     );

References:

glu.ads:148:9 (declaration)
glu.ads:155:8 (reference)
glu.ads:162:8 (reference)
glu.ads:208:45 (reference)
Quadric objects

OrientationEnm

type OrientationEnm is
     (
      GLU_OUTSIDE,
      GLU_INSIDE
     );

References:

glu.ads:164:9 (declaration)
glu.ads:169:8 (reference)
glu.ads:174:8 (reference)
glu.ads:211:48 (reference)

NormalsEnm

type NormalsEnm is
     (
      GLU_SMOOTH,
      GLU_FLAT,
      GLU_NONE
     );

References:

glu.ads:176:9 (declaration)
glu.ads:182:8 (reference)
glu.ads:188:8 (reference)
glu.ads:214:43 (reference)

CallbackEnm

type CallbackEnm is
     (
      GLU_ERROR
     );

References:

glu.ads:190:9 (declaration)
glu.ads:194:8 (reference)
glu.ads:198:8 (reference)
glu.ads:220:39 (reference)
glu.ads:446:37 (reference)

QuadricCallbackFunction

type QuadricCallbackFunction is access procedure (Error :  ErrorEnm);

References:

glu.ads:200:9 (declaration)
glu.ads:221:39 (reference)

NurbsPropertyEnm

type NurbsPropertyEnm is
     (
      GLU_AUTO_LOAD_MATRIX,
      GLU_CULLING,
      GLU_PARAMETRIC_TOLERANCE,
      GLU_SAMPLING_TOLERANCE,
      GLU_DISPLAY_MODE,
      GLU_SAMPLING_METHOD,
      GLU_U_STEP,
      GLU_V_STEP
     );

References:

glu.ads:250:9 (declaration)
glu.ads:261:8 (reference)
glu.ads:272:8 (reference)
glu.ads:400:40 (reference)
glu.ads:404:43 (reference)
Non - uniform rational B - splines (NURBS)

NurbsDisplayModeEnm

type NurbsDisplayModeEnm is
     (
      GLU_FILL,
      GLU_OUTLINE_POLYGON,
      GLU_OUTLINE_PATCH
     );

References:

glu.ads:274:9 (declaration)
glu.ads:280:8 (reference)
glu.ads:286:8 (reference)

NurbsErrorEnm

type NurbsErrorEnm is
     (
      GLU_NURBS_ERROR1,                                       -- spline order un - supported ,
      GLU_NURBS_ERROR2,                                       -- too few knots ,
      GLU_NURBS_ERROR3,                                       -- valid knot range is empty ,
      GLU_NURBS_ERROR4,                                       -- decreasing knot sequence ,
      GLU_NURBS_ERROR5,                                       -- knot multiplicity > spline order ,
      GLU_NURBS_ERROR6,                                       -- endcurve () must follow bgncurve () ,
      GLU_NURBS_ERROR7,                                       -- bgncurve () must precede endcurve () ,
      GLU_NURBS_ERROR8,                                       -- ctrlarray or knot vector is NULL ,
      GLU_NURBS_ERROR9,                                       -- can't draw pwlcurves ,
      GLU_NURBS_ERROR10,                                      -- missing gluNurbsCurve () ,
      GLU_NURBS_ERROR11,                                      -- missing gluNurbsSurface () ,
      GLU_NURBS_ERROR12,                                      -- endtrim () must precede endsurface () ,
      GLU_NURBS_ERROR13,                                      -- bgnsurface () must precede endsurface () ,
      GLU_NURBS_ERROR14,                                      -- curve of improper type passed as trim curve ,
      GLU_NURBS_ERROR15,                                      -- bgnsurface () must precede bgntrim () ,
      GLU_NURBS_ERROR16,                                      -- endtrim () must follow bgntrim () ,
      GLU_NURBS_ERROR17,                                      -- bgntrim () must precede endtrim (),
      GLU_NURBS_ERROR18,                                      -- invalid or missing trim curve,
      GLU_NURBS_ERROR19,                                      -- bgntrim () must precede pwlcurve () ,
      GLU_NURBS_ERROR20,                                      -- pwlcurve referenced twice,
      GLU_NURBS_ERROR21,                                      -- pwlcurve and nurbscurve mixed ,
      GLU_NURBS_ERROR22,                                      -- improper usage of trim data type ,
      GLU_NURBS_ERROR23,                                      -- nurbscurve referenced twice ,
      GLU_NURBS_ERROR24,                                      -- nurbscurve and pwlcurve mixed ,
      GLU_NURBS_ERROR25,                                      -- nurbssurface referenced twice ,
      GLU_NURBS_ERROR26,                                      -- invalid property ,
      GLU_NURBS_ERROR27,                                      -- endsurface () must follow bgnsurface () ,
      GLU_NURBS_ERROR28,                                      -- intersecting or misoriented trim curves ,
      GLU_NURBS_ERROR29,                                      -- intersecting trim curves ,
      GLU_NURBS_ERROR30,                                      -- UNUSED ,
      GLU_NURBS_ERROR31,                                      -- unconnected trim curves ,
      GLU_NURBS_ERROR32,                                      -- unknown knot error ,
      GLU_NURBS_ERROR33,                                      -- negative vertex count encountered ,
      GLU_NURBS_ERROR34,                                      -- negative byte - stride ,
      GLU_NURBS_ERROR35,                                      -- unknown type descriptor ,
      GLU_NURBS_ERROR36,                                      -- null control point reference ,
      GLU_NURBS_ERROR37                                       -- duplicate point on pwlcurve
     );

References:

glu.ads:293:9 (declaration)
glu.ads:333:8 (reference)
glu.ads:373:8 (reference)
glu.ads:387:61 (reference)

PwlCurveTypeEnm

type PwlCurveTypeEnm is
     (
      GLU_MAP1_TRIM_2,
      GLU_MAP1_TRIM_3
     );

References:

glu.ads:375:9 (declaration)
glu.ads:380:8 (reference)
glu.ads:385:8 (reference)
glu.ads:443:34 (reference)

NurbsCallbackFunction

type NurbsCallbackFunction is access procedure (Error :  NurbsErrorEnm);

References:

glu.ads:387:9 (declaration)
glu.ads:447:37 (reference)

TessCallbackEnm

type TessCallbackEnm is
     (
      GLU_BEGIN,
      GLU_VERTEX,
      GLU_END,
      GLU_ERROR,
      GLU_EDGE_FLAG
     );

References:

glu.ads:450:9 (declaration)
glu.ads:458:8 (reference)
glu.ads:466:8 (reference)
glu.ads:540:36 (reference)
glu.ads:543:36 (reference)
glu.ads:546:36 (reference)
glu.ads:549:36 (reference)
glu.ads:552:36 (reference)
Polygon tesselation

TessBeginEnm

type TessBeginEnm is
     (
      GL_LINE_LOOP,
      GL_TRIANGLES,
      GL_TRIANGLE_STRIP,
      GL_TRIANGLE_FAN
     );

References:

glu.ads:468:9 (declaration)
glu.ads:475:8 (reference)
glu.ads:482:8 (reference)
glu.ads:483:67 (reference)

TessBeginCallbackFunction

type TessBeginCallbackFunction is access procedure (ObjType :  TessBeginEnm);

References:

glu.ads:483:9 (declaration)
glu.ads:541:36 (reference)

TessVertexCallbackFunction

type TessVertexCallbackFunction is access procedure (VertexData :  GL.pointer);

References:

glu.ads:485:9 (declaration)
glu.ads:544:36 (reference)

TessEndCallbackFunction

type TessEndCallbackFunction is access procedure;

References:

glu.ads:487:9 (declaration)
glu.ads:547:36 (reference)

TessErrorEnm

type TessErrorEnm is
     (
      GLU_TESS_ERROR1,                                        -- missing gluEndPolygon ,
      GLU_TESS_ERROR2,                                        -- missing gluBeginPolygon ,
      GLU_TESS_ERROR3,                                        -- misoriented contour ,
      GLU_TESS_ERROR4,                                        -- vertex/edge intersection ,
      GLU_TESS_ERROR5,                                        -- misoriented or self - intersecting loops ,
      GLU_TESS_ERROR6,                                        -- coincident vertices ,
      GLU_TESS_ERROR7,                                        -- all vertices collinear ,
      GLU_TESS_ERROR8,                                        -- intersecting edges ,
      GLU_TESS_ERROR9                                         -- not coplanar contours
     );

References:

glu.ads:489:9 (declaration)
glu.ads:501:8 (reference)
glu.ads:513:8 (reference)
glu.ads:514:65 (reference)

TessErrorCallbackFunction

type TessErrorCallbackFunction is access procedure (Error :  TessErrorEnm);

References:

glu.ads:514:9 (declaration)
glu.ads:550:36 (reference)

TessEdgeFlagCallbackFunction

type TessEdgeFlagCallbackFunction is access procedure (Flag :  GL.GL_Boolean);

References:

glu.ads:516:9 (declaration)
glu.ads:553:36 (reference)

ContourTypeEnm

type ContourTypeEnm is
     (
      GLU_CW,
      GLU_CCW,
      GLU_INTERIOR,
      GLU_EXTERIOR,
      GLU_UNKNOWN
     );

References:

glu.ads:518:9 (declaration)
glu.ads:526:8 (reference)
glu.ads:534:8 (reference)
glu.ads:562:36 (reference)

StringEnm

type StringEnm is
     (
      GLU_VERSION,
      GLU_EXTENSIONS
     );

References:

glu.ads:569:9 (declaration)
glu.ads:574:8 (reference)
glu.ads:579:8 (reference)
glu.ads:581:31 (reference)
GLU strings

Constants & Global variables

VERSION_1_1

VERSION_1_1                      : constant := 1;

References:

glu.ads:50:4 (declaration)

GL_FALSE

GL_FALSE                            : constant := GL.GL_False;

References:

glu.ads:53:4 (declaration)
The GLU boolean constants

GL_TRUE

GL_TRUE                             : constant := GL.GL_True;

References:

glu.ads:54:4 (declaration)

GLU_PATH_LENGTH

GLU_PATH_LENGTH                      : constant := 16#18777#;

References:

glu.ads:289:4 (declaration)
NURBS property values

GLU_PARAMETRIC_ERROR

GLU_PARAMETRIC_ERROR                 : constant := 16#18778#;

References:

glu.ads:290:4 (declaration)

GLU_DOMAIN_DISTANCE

GLU_DOMAIN_DISTANCE                  : constant := 16#18779#;

References:

glu.ads:291:4 (declaration)

Subprograms & Entries

ErrorString

function ErrorString 
(errorCode: ErrorEnm) return GL.ubytePtr;

References:

glu.ads:111:13 (declaration)
glu.ads:676:13 (body)

Error_String

function Error_String 
(errorCode: GL.ErrorEnm) return GL.ubytePtr;

References:

glu.ads:114:13 (declaration)
glu.ads:680:13 (body)
gl-errors.adb:23:39 (call)

Called by:

Errors.Current defined at gl-errors.ads:15:13

ScaleImage

function ScaleImage 
(format: GL.PixelFormatEnm;
widthin: GL.Int;
heightin: GL.Int;
typein: GL.PixelDataTypeEnm;
datain: GL.pointer;
widthout: GL.Int;
heightout: GL.Int;
typeout: GL.PixelDataTypeEnm;
dataout: GL.pointer) return GL.Int;

References:

glu.ads:118:13 (declaration)
glu.ads:683:28 (body)
Scale image

Build1DMipmaps

function Build1DMipmaps 
(target: GL.TargetTex1DOnlyEnm;
components: GL.Int;
width: GL.Int;
format: GL.TexPixelFormatEnm;
c_type: GL.PixelDataTypeEnm;
data: GL.pointer) return GL.Int;

References:

glu.ads:130:13 (declaration)
glu.ads:684:28 (body)
Build mipmaps

Build2DMipmaps

function Build2DMipmaps 
(target: GL.TargetTex2DOnlyEnm;
components: GL.Int;
width: GL.Int;
height: GL.Int;
format: GL.TexPixelFormatEnm;
c_type: GL.PixelDataTypeEnm;
data: GL.pointer) return GL.Int;

References:

glu.ads:138:13 (declaration)
glu.ads:685:28 (body)

NewQuadric

function NewQuadric return GLUquadricObjPtr;

References:

glu.ads:202:13 (declaration)
glu.ads:686:28 (body)
graphics_opengl.adb:203:56 (call)

DeleteQuadric

procedure DeleteQuadric 
(state: GLUquadricObjPtr);

References:

glu.ads:205:14 (declaration)
glu.ads:687:28 (body)
graphics_opengl.adb:222:11 (call)

QuadricDrawStyle

procedure QuadricDrawStyle 
(quadObject: GLUquadricObjPtr;
drawStyle: DrawStyleEnm);

References:

glu.ads:207:14 (declaration)
glu.ads:688:28 (body)

QuadricNormals

procedure QuadricNormals 
(quadObject: GLUquadricObjPtr;
normals: NormalsEnm);

References:

glu.ads:213:14 (declaration)
glu.ads:690:28 (body)

QuadricTexture

procedure QuadricTexture 
(quadObject: GLUquadricObjPtr;
textureCoords: GL.GL_Boolean);

References:

glu.ads:216:14 (declaration)
glu.ads:691:28 (body)

QuadricCallback

procedure QuadricCallback 
(qobj: GLUquadricObjPtr;
which: CallbackEnm;
fn: QuadricCallbackFunction);

References:

glu.ads:219:14 (declaration)
glu.ads:692:28 (body)

Cylinder

procedure Cylinder 
(qobj: GLUquadricObjPtr;
baseRadius: GL.Double;
topRadius: GL.Double;
height: GL.Double;
slices: GL.Int;
stacks: GL.Int);

References:

glu.ads:223:14 (declaration)
glu.ads:693:28 (body)
graphics_opengl.adb:210:11 (call)

Sphere

procedure Sphere 
(qobj: GLUquadricObjPtr;
radius: GL.Double;
slices: GL.Int;
stacks: GL.Int);

References:

glu.ads:230:14 (declaration)
glu.ads:694:28 (body)

PartialDisk

procedure PartialDisk 
(qobj: GLUquadricObjPtr;
innerRadius: GL.Double;
outerRadius: GL.Double;
slices: GL.Int;
loops: GL.Int;
startAngle: GL.Double;
sweepAngle: GL.Double);

References:

glu.ads:241:14 (declaration)
glu.ads:696:28 (body)

NewNurbsRenderer

function NewNurbsRenderer return GLUnurbsObjPtr;

References:

glu.ads:389:13 (declaration)
glu.ads:697:28 (body)

DeleteNurbsRenderer

procedure DeleteNurbsRenderer 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:392:14 (declaration)
glu.ads:698:28 (body)

LoadSamplingMatrices

procedure LoadSamplingMatrices 
(nobj: GLUnurbsObjPtr;
modelMatrix: Matrix_Float_Ptr;
projMatrix: Matrix_Float_Ptr;
viewport: Viewport_Ptr);

References:

glu.ads:394:14 (declaration)
glu.ads:699:28 (body)

NurbsProperty

procedure NurbsProperty 
(nobj: GLUnurbsObjPtr;
property: NurbsPropertyEnm;
value: GL.C_Float);

References:

glu.ads:399:14 (declaration)
glu.ads:700:28 (body)

GetNurbsProperty

procedure GetNurbsProperty 
(nobj: GLUnurbsObjPtr;
property: NurbsPropertyEnm;
value: GL.floatPtr);

References:

glu.ads:403:14 (declaration)
glu.ads:701:28 (body)

BeginCurve

procedure BeginCurve 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:407:14 (declaration)
glu.ads:702:28 (body)

EndCurve

procedure EndCurve 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:409:14 (declaration)
glu.ads:703:28 (body)

NurbsCurve

procedure NurbsCurve 
(nobj: GLUnurbsObjPtr;
nknots: GL.Int;
knot: GL.floatPtr;
stride: GL.Int;
ctlarray: GL.floatPtr;
order: GL.Int;
c_type: GL.Map1TargetEnm);

References:

glu.ads:411:14 (declaration)
glu.ads:704:28 (body)

BeginSurface

procedure BeginSurface 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:419:14 (declaration)
glu.ads:705:28 (body)

EndSurface

procedure EndSurface 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:421:14 (declaration)
glu.ads:706:28 (body)

NurbsSurface

procedure NurbsSurface 
(nobj: GLUnurbsObjPtr;
sknot_count: GL.Int;
sknot: GL.floatPtr;
tknot_count: GL.Int;
tknot: GL.floatPtr;
s_stride: GL.Int;
t_stride: GL.Int;
ctlarray: GL.floatPtr;
sorder: GL.Int;
torder: GL.Int;
c_type: GL.Map2TargetEnm);

References:

glu.ads:423:14 (declaration)
glu.ads:707:28 (body)

BeginTrim

procedure BeginTrim 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:435:14 (declaration)
glu.ads:708:28 (body)

EndTrim

procedure EndTrim 
(nobj: GLUnurbsObjPtr);

References:

glu.ads:437:14 (declaration)
glu.ads:709:28 (body)

PwlCurve

procedure PwlCurve 
(nobj: GLUnurbsObjPtr;
count: GL.Int;
c_array: GL.floatPtr;
stride: GL.Int;
c_type: PwlCurveTypeEnm);

References:

glu.ads:439:14 (declaration)
glu.ads:710:28 (body)

NurbsCallback

procedure NurbsCallback 
(nobj: GLUnurbsObjPtr;
which: CallbackEnm;
fn: NurbsCallbackFunction);

References:

glu.ads:445:14 (declaration)
glu.ads:711:28 (body)

NewTess

function NewTess return GLUtriangulatorObjPtr;

References:

glu.ads:536:13 (declaration)
glu.ads:712:28 (body)

TessCallback

procedure TessCallback 
(tobj: GLUtriangulatorObjPtr;
which: TessCallbackEnm;
fn: TessBeginCallbackFunction);

References:

glu.ads:539:14 (declaration)
glu.ads:713:28 (body)

TessCallback

procedure TessCallback 
(tobj: GLUtriangulatorObjPtr;
which: TessCallbackEnm;
fn: TessVertexCallbackFunction);

References:

glu.ads:542:14 (declaration)
glu.ads:713:28 (body)

TessCallback

procedure TessCallback 
(tobj: GLUtriangulatorObjPtr;
which: TessCallbackEnm;
fn: TessEndCallbackFunction);

References:

glu.ads:545:14 (declaration)
glu.ads:713:28 (body)

TessCallback

procedure TessCallback 
(tobj: GLUtriangulatorObjPtr;
which: TessCallbackEnm;
fn: TessErrorCallbackFunction);

References:

glu.ads:548:14 (declaration)
glu.ads:713:28 (body)

TessCallback

procedure TessCallback 
(tobj: GLUtriangulatorObjPtr;
which: TessCallbackEnm;
fn: TessEdgeFlagCallbackFunction);

References:

glu.ads:551:14 (declaration)
glu.ads:713:28 (body)

DeleteTess

procedure DeleteTess 
(tobj: GLUtriangulatorObjPtr);

References:

glu.ads:555:14 (declaration)
glu.ads:714:28 (body)

BeginPolygon

procedure BeginPolygon 
(tobj: GLUtriangulatorObjPtr);

References:

glu.ads:557:14 (declaration)
glu.ads:715:28 (body)

EndPolygon

procedure EndPolygon 
(tobj: GLUtriangulatorObjPtr);

References:

glu.ads:559:14 (declaration)
glu.ads:716:28 (body)

NextContour

procedure NextContour 
(tobj: GLUtriangulatorObjPtr;
c_type: ContourTypeEnm);

References:

glu.ads:561:14 (declaration)
glu.ads:717:28 (body)

TessVertex

procedure TessVertex 
(tobj: GLUtriangulatorObjPtr;
v: GL.doublePtr;
data: GL.pointer);

References:

glu.ads:564:14 (declaration)
glu.ads:718:28 (body)

GetString

function GetString 
(name: StringEnm) return GL.ubytePtr;

References:

glu.ads:581:13 (declaration)
glu.ads:719:28 (body)

LookAt

procedure LookAt 
(eyex: GL.Double;
eyey: GL.Double;
eyez: GL.Double;
centerx: GL.Double;
centery: GL.Double;
centerz: GL.Double;
upx: GL.Double;
upy: GL.Double;
upz: GL.Double);

References:

glu.ads:585:14 (declaration)
glu.ads:668:28 (body)
Projections

Ortho2D

procedure Ortho2D 
(left: GL.Double;
right: GL.Double;
bottom: GL.Double;
top: GL.Double);

References:

glu.ads:595:14 (declaration)
glu.ads:669:28 (body)

PickMatrix

procedure PickMatrix 
(x: GL.Double;
y: GL.Double;
width: GL.Double;
height: GL.Double;
viewport: Viewport_Ptr);

References:

glu.ads:605:14 (declaration)
glu.ads:671:28 (body)

Project

function Project 
(objx: GL.Double;
objy: GL.Double;
objz: GL.Double;
modelMatrix: Matrix_Double_Ptr;
projMatrix: Matrix_Double_Ptr;
viewport: Viewport_Ptr;
winx: GL.doublePtr;
winy: GL.doublePtr;
winz: GL.doublePtr) return GL.Int;

References:

glu.ads:611:13 (declaration)
glu.adb:45:15 (call)
glu.ads:621:28 (body)

Called by:

Project defined at glu.ads:625:14

Project

procedure Project 
(objx: GL.Double;
objy: GL.Double;
objz: GL.Double;
modelMatrix: Matrix_Double;
projMatrix: Matrix_Double;
viewport: Viewport_Rec;
winx: out GL.Double;
winy: out GL.Double;
winz: out GL.Double;
result: out Boolean);

References:

glu.ads:625:14 (declaration)
glu.adb:27:13 (body)
glu.adb:59:7 (label)
globe_3d-portals.adb:37:11 (call)

Calls:

GLU.Project.CvM defined at glu.adb:39:14
GLU.Project.Cvt defined at glu.adb:40:14
GLU.Project.CvV defined at glu.adb:38:14
Project defined at glu.ads:611:13
Unchecked_Conversion defined at a-unccon.ads:20:14

UnProject

function UnProject 
(winx: GL.Double;
winy: GL.Double;
winz: GL.Double;
modelMatrix: Matrix_Double_Ptr;
projMatrix: Matrix_Double_Ptr;
viewport: Viewport_Ptr;
objx: GL.doublePtr;
objy: GL.doublePtr;
objz: GL.doublePtr) return GL.Int;

References:

glu.ads:636:13 (declaration)
glu.ads:673:28 (body)

Get

procedure Get 
(pname: GL.ParameterNameEnm;
params: Matrix_Double_Ptr);

References:

glu.ads:649:14 (declaration)
glu.adb:18:5 (call)
glu.ads:726:14 (body)

Called by:

Get defined at glu.ads:652:14

Get

procedure Get 
(pname: GL.ParameterNameEnm;
params: out Matrix_Double);

References:

glu.ads:652:14 (declaration)
glu.adb:12:13 (body)
glu.adb:19:7 (label)
globe_3d-portals.adb:34:11 (call)
globe_3d-portals.adb:35:11 (call)

Calls:

Get defined at glu.ads:649:14
GLU.Get.Cvt defined at glu.adb:14:14
Unchecked_Conversion defined at a-unccon.ads:20:14

Get

procedure Get 
(pname: GL.ParameterNameEnm;
params: Viewport_Ptr);

References:

glu.ads:655:14 (declaration)
glu.adb:24:5 (call)
glu.ads:734:14 (body)

Called by:

Get defined at glu.ads:658:14

ErrorString_1 (private)

function ErrorString_1 
(errorCode: ErrorEnm) return GL.ubytePtr;

References:

glu.ads:675:13 (declaration)
glu.ads:676:78 (reference)
glu.ads:677:28 (body)

ErrorString_2 (private)

function ErrorString_2 
(errorCode: GL.ErrorEnm) return GL.ubytePtr;

References:

glu.ads:679:13 (declaration)
glu.ads:680:81 (reference)
glu.ads:681:28 (body)

GetDoublev (private)

procedure GetDoublev 
(pname: GL.ParameterNameEnm;
params: Matrix_Double_Ptr);

References:

glu.ads:724:14 (declaration)
glu.ads:727:55 (reference)
glu.ads:728:28 (body)
Wrappers for Get (doubleMatrix)

GetIntegerv (private)

procedure GetIntegerv 
(pname: GL.ParameterNameEnm;
params: Viewport_Ptr);

References:

glu.ads:732:14 (declaration)
glu.ads:735:50 (reference)
glu.ads:736:28 (body)