remove python2.x support
[blender.git] / source / blender / python / generic / BGL.c
1 /* 
2  * $Id$
3  *
4  * ***** BEGIN GPL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19  *
20  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
21  * All rights reserved.
22  *
23  * This is a new part of Blender.
24  *
25  * Contributor(s): Willian P. Germano
26  *
27  * ***** END GPL LICENSE BLOCK *****
28 */
29
30 /* This file is the Blender.BGL part of opy_draw.c, from the old
31  * bpython/intern dir, with minor changes to adapt it to the new Python
32  * implementation.  The BGL submodule "wraps" OpenGL functions and constants,
33  * allowing script writers to make OpenGL calls in their Python scripts. */
34
35 #include "BGL.h" /*This must come first */
36
37 #include "MEM_guardedalloc.h"
38
39 static int type_size( int type );
40 static Buffer *make_buffer( int type, int ndimensions, int *dimensions );
41
42 static char Method_Buffer_doc[] =
43         "(type, dimensions, [template]) - Create a new Buffer object\n\n\
44 (type) - The format to store data in\n\
45 (dimensions) - An int or sequence specifying the dimensions of the buffer\n\
46 [template] - A sequence of matching dimensions to the buffer to be created\n\
47   which will be used to initialize the Buffer.\n\n\
48 If a template is not passed in all fields will be initialized to 0.\n\n\
49 The type should be one of GL_BYTE, GL_SHORT, GL_INT, GL_FLOAT, or GL_DOUBLE.\n\
50 If the dimensions are specified as an int a linear buffer will be\n\
51 created. If a sequence is passed for the dimensions the buffer\n\
52 will have len(sequence) dimensions, where the size for each dimension\n\
53 is determined by the value in the sequence at that index.\n\n\
54 For example, passing [100, 100] will create a 2 dimensional\n\
55 square buffer. Passing [16, 16, 32] will create a 3 dimensional\n\
56 buffer which is twice as deep as it is wide or high.";
57
58 static PyObject *Method_Buffer( PyObject * self, PyObject * args );
59
60 /* Buffer sequence methods */
61
62 static int Buffer_len( PyObject * self );
63 static PyObject *Buffer_item( PyObject * self, int i );
64 static PyObject *Buffer_slice( PyObject * self, int begin, int end );
65 static int Buffer_ass_item( PyObject * self, int i, PyObject * v );
66 static int Buffer_ass_slice( PyObject * self, int begin, int end,
67                              PyObject * seq );
68
69 static PySequenceMethods Buffer_SeqMethods = {
70         ( inquiry ) Buffer_len, /*sq_length */
71         ( binaryfunc ) 0,       /*sq_concat */
72         ( ssizeargfunc ) 0,     /*sq_repeat */
73         ( ssizeargfunc ) Buffer_item,   /*sq_item */
74         ( ssizessizeargfunc ) Buffer_slice,     /*sq_slice */
75         ( ssizeobjargproc ) Buffer_ass_item,    /*sq_ass_item */
76         ( ssizessizeobjargproc ) Buffer_ass_slice,      /*sq_ass_slice */
77 };
78
79 static void Buffer_dealloc( PyObject * self );
80 static PyObject *Buffer_tolist( PyObject * self );
81 static PyObject *Buffer_dimensions( PyObject * self );
82 static PyObject *Buffer_getattr( PyObject * self, char *name );
83 static PyObject *Buffer_repr( PyObject * self );
84
85 PyTypeObject buffer_Type = {
86         PyVarObject_HEAD_INIT(NULL, 0)
87         "buffer",               /*tp_name */
88         sizeof( Buffer ),       /*tp_basicsize */
89         0,                      /*tp_itemsize */
90         ( destructor ) Buffer_dealloc,  /*tp_dealloc */
91         ( printfunc ) 0,        /*tp_print */
92         ( getattrfunc ) Buffer_getattr, /*tp_getattr */
93         ( setattrfunc ) 0,      /*tp_setattr */
94         0,              /*tp_compare */
95         ( reprfunc ) Buffer_repr,       /*tp_repr */
96         0,                      /*tp_as_number */
97         &Buffer_SeqMethods,     /*tp_as_sequence */
98 };
99
100 /* #ifndef __APPLE__ */
101
102 #define BGL_Wrap(nargs, funcname, ret, arg_list) \
103 static PyObject *Method_##funcname (PyObject *self, PyObject *args) {\
104         arg_def##nargs arg_list; \
105         ret_def_##ret; \
106         if(!PyArg_ParseTuple(args, arg_str##nargs arg_list, arg_ref##nargs arg_list)) return NULL;\
107         ret_set_##ret gl##funcname (arg_var##nargs arg_list);\
108         ret_ret_##ret; \
109 }
110
111 #define BGLU_Wrap(nargs, funcname, ret, arg_list) \
112 static PyObject *Method_##funcname (PyObject *self, PyObject *args) {\
113         arg_def##nargs arg_list; \
114         ret_def_##ret; \
115         if(!PyArg_ParseTuple(args, arg_str##nargs arg_list, arg_ref##nargs arg_list)) return NULL;\
116         ret_set_##ret glu##funcname (arg_var##nargs arg_list);\
117         ret_ret_##ret; \
118 }
119
120 /* #endif */
121
122 /********/
123 static int type_size(int type)
124 {
125         switch (type) {
126                 case GL_BYTE: 
127                   return sizeof(char);
128                 case GL_SHORT: 
129                   return sizeof(short);
130                 case GL_INT: 
131                   return sizeof(int);
132                 case GL_FLOAT: 
133                   return sizeof(float);
134                 case GL_DOUBLE:
135                   return sizeof(double);
136         }
137         return -1;
138 }
139
140 static Buffer *make_buffer(int type, int ndimensions, int *dimensions)
141 {
142         Buffer *buffer;
143         void *buf= NULL;
144         int i, size, length;
145  
146         length= 1;
147         for (i=0; i<ndimensions; i++) 
148                 length*= dimensions[i];
149  
150         size= type_size(type);
151  
152         buf= MEM_mallocN(length*size, "Buffer buffer");
153  
154         buffer= (Buffer *) PyObject_NEW(Buffer, &buffer_Type);
155         buffer->parent= NULL;
156         buffer->ndimensions= ndimensions;
157         buffer->dimensions= dimensions;
158         buffer->type= type;
159         buffer->buf.asvoid= buf;
160  
161         for (i= 0; i<length; i++) {
162                 if (type==GL_BYTE) 
163                         buffer->buf.asbyte[i]= 0;
164                 else if (type==GL_SHORT) 
165                         buffer->buf.asshort[i]= 0;
166                 else if (type==GL_INT) 
167                         buffer->buf.asint[i]= 0;
168                 else if (type==GL_FLOAT) 
169                     buffer->buf.asfloat[i]= 0.0f;
170                 else if (type==GL_DOUBLE)
171                         buffer->buf.asdouble[i]= 0.0;
172         }
173         return buffer;
174 }
175
176 static PyObject *Method_Buffer (PyObject *self, PyObject *args)
177 {
178         PyObject *length_ob= NULL, *template= NULL;
179         Buffer *buffer;
180         
181         int i, type;
182         int *dimensions = 0, ndimensions = 0;
183         
184         if (!PyArg_ParseTuple(args, "iO|O", &type, &length_ob, &template)) {
185                 PyErr_SetString(PyExc_AttributeError, "expected an int and one or two PyObjects");
186                 return NULL;
187         }
188         if (type!=GL_BYTE && type!=GL_SHORT && type!=GL_INT && type!=GL_FLOAT && type!=GL_DOUBLE) {
189                 PyErr_SetString(PyExc_AttributeError, "invalid first argument type, should be one of GL_BYTE, GL_SHORT, GL_INT, GL_FLOAT or GL_DOUBLE");
190                 return NULL;
191         }
192
193         if (PyNumber_Check(length_ob)) {
194                 ndimensions= 1;
195                 dimensions= MEM_mallocN(ndimensions*sizeof(int), "Buffer dimensions");
196                 dimensions[0]= PyLong_AsLong(length_ob);
197         } else if (PySequence_Check(length_ob)) {
198                 ndimensions= PySequence_Length(length_ob);
199                 dimensions= MEM_mallocN(ndimensions*sizeof(int), "Buffer dimensions");
200                 for (i=0; i<ndimensions; i++) {
201                         PyObject *ob= PySequence_GetItem(length_ob, i);
202
203                         if (!PyNumber_Check(ob)) dimensions[i]= 1;
204                         else dimensions[i]= PyLong_AsLong(ob);
205                         Py_DECREF(ob);
206                 }
207         }
208         
209         buffer= make_buffer(type, ndimensions, dimensions);
210         if (template && ndimensions) {
211                 if (Buffer_ass_slice((PyObject *) buffer, 0, dimensions[0], template)) {
212                         Py_DECREF(buffer);
213                         return NULL;
214                 }
215         }
216         
217         return (PyObject *) buffer;
218 }
219
220 /*@ Buffer sequence methods */
221
222 static int Buffer_len(PyObject *self)
223 {
224         Buffer *buf= (Buffer *) self;
225         return buf->dimensions[0];
226 }
227
228 static PyObject *Buffer_item(PyObject *self, int i)
229 {
230         Buffer *buf= (Buffer *) self;
231
232         if (i >= buf->dimensions[0]) {
233                 PyErr_SetString(PyExc_IndexError, "array index out of range");
234                 return NULL;
235         }
236
237         if (buf->ndimensions==1) {
238                 switch (buf->type) {
239                         case GL_BYTE: return Py_BuildValue("b", buf->buf.asbyte[i]);
240                         case GL_SHORT: return Py_BuildValue("h", buf->buf.asshort[i]);
241                         case GL_INT: return Py_BuildValue("i", buf->buf.asint[i]);
242                         case GL_FLOAT: return PyFloat_FromDouble(buf->buf.asfloat[i]);
243                         case GL_DOUBLE: return Py_BuildValue("d", buf->buf.asdouble[i]);
244                 }
245         } else {
246                 Buffer *newbuf;
247                 int j, length, size;
248  
249                 length= 1;
250                 for (j=1; j<buf->ndimensions; j++) {
251                         length*= buf->dimensions[j];
252                 }
253                 size= type_size(buf->type);
254
255                 newbuf= (Buffer *) PyObject_NEW(Buffer, &buffer_Type);
256     
257                 Py_INCREF(self);
258                 newbuf->parent= self;
259
260                 newbuf->ndimensions= buf->ndimensions-1;
261                 newbuf->type= buf->type;
262                 newbuf->buf.asvoid= buf->buf.asbyte + i*length*size;
263                 newbuf->dimensions= MEM_mallocN(newbuf->ndimensions*sizeof(int),
264                         "Buffer dimensions");
265                 memcpy(newbuf->dimensions, buf->dimensions+1,
266                         newbuf->ndimensions*sizeof(int));
267
268                 return (PyObject *) newbuf;
269         }
270   
271         return NULL;
272 }
273
274 static PyObject *Buffer_slice(PyObject *self, int begin, int end)
275 {
276         Buffer *buf= (Buffer *) self;
277         PyObject *list;
278         int count;
279         
280         if (begin<0) begin= 0;
281         if (end>buf->dimensions[0]) 
282                 end= buf->dimensions[0];
283         if (begin>end) begin= end;
284           
285         list= PyList_New(end-begin);
286
287         for (count= begin; count<end; count++)
288                 PyList_SetItem(list, count-begin, Buffer_item(self, count));
289         
290         return list;
291 }
292
293 static int Buffer_ass_item(PyObject *self, int i, PyObject *v)
294 {
295         Buffer *buf= (Buffer *) self;
296         
297         if (i >= buf->dimensions[0]) {
298                 PyErr_SetString(PyExc_IndexError, "array assignment index out of range");
299                 return -1;
300         }
301         
302         if (buf->ndimensions!=1) {
303                 PyObject *row= Buffer_item(self, i);
304                 int ret;
305
306                 if (!row) return -1;
307                 ret= Buffer_ass_slice(row, 0, buf->dimensions[1], v);
308                 Py_DECREF(row);
309                 return ret;
310         }
311
312         if (buf->type==GL_BYTE) {
313                 if (!PyArg_Parse(v, "b;Coordinates must be ints", &buf->buf.asbyte[i]))
314                 return -1;
315         } else if (buf->type==GL_SHORT) {
316                 if (!PyArg_Parse(v, "h;Coordinates must be ints", &buf->buf.asshort[i]))
317                         return -1;
318           
319         } else if (buf->type==GL_INT) {
320                 if (!PyArg_Parse(v, "i;Coordinates must be ints", &buf->buf.asint[i]))
321                         return -1;
322         } else if (buf->type==GL_FLOAT) {
323                 if (!PyArg_Parse(v, "f;Coordinates must be floats", &buf->buf.asfloat[i]))
324                         return -1;
325         } else if (buf->type==GL_DOUBLE) {
326                 if (!PyArg_Parse(v, "d;Coordinates must be floats", &buf->buf.asdouble[i]))
327                         return -1;
328         }
329         return 0;
330 }
331
332 static int Buffer_ass_slice(PyObject *self, int begin, int end, PyObject *seq)
333 {
334         Buffer *buf= (Buffer *) self;
335         PyObject *item;
336         int count, err=0;
337         
338         if (begin<0) begin= 0;
339         if (end>buf->dimensions[0]) end= buf->dimensions[0];
340         if (begin>end) begin= end;
341         
342         if (!PySequence_Check(seq)) {
343                 PyErr_SetString(PyExc_TypeError,
344                         "illegal argument type for built-in operation");
345                 return -1;
346         }
347
348         if (PySequence_Length(seq)!=(end-begin)) {
349                 PyErr_SetString(PyExc_TypeError, "size mismatch in assignment");
350                 return -1;
351         }
352         
353         for (count= begin; count<end; count++) {
354                 item= PySequence_GetItem(seq, count-begin);
355                 err= Buffer_ass_item(self, count, item);
356                 Py_DECREF(item);
357                 if (err) break;
358         }
359         return err;
360 }
361
362 static void Buffer_dealloc(PyObject *self)
363 {
364         Buffer *buf = (Buffer *)self;
365
366         if (buf->parent) Py_DECREF (buf->parent);
367         else MEM_freeN (buf->buf.asvoid);
368
369         MEM_freeN (buf->dimensions);
370         
371         PyObject_DEL (self);
372 }
373
374 static PyObject *Buffer_tolist(PyObject *self)
375 {
376         int i, len= ((Buffer *)self)->dimensions[0];
377         PyObject *list= PyList_New(len);
378         
379         for (i=0; i<len; i++) {
380           PyList_SetItem(list, i, Buffer_item(self, i));
381         }
382         
383         return list;
384 }
385
386 static PyObject *Buffer_dimensions(PyObject *self)
387 {
388         Buffer *buffer= (Buffer *) self;
389         PyObject *list= PyList_New(buffer->ndimensions);
390         int i;
391           
392         for (i= 0; i<buffer->ndimensions; i++) {
393           PyList_SetItem(list, i, PyLong_FromLong(buffer->dimensions[i]));
394         }
395         
396         return list;
397 }
398
399 static PyObject *Buffer_getattr(PyObject *self, char *name)
400 {
401         if (strcmp(name, "list")==0) return Buffer_tolist(self);
402         else if (strcmp(name, "dimensions")==0) return Buffer_dimensions(self);
403         
404         PyErr_SetString(PyExc_AttributeError, name);
405         return NULL;
406 }
407
408 static PyObject *Buffer_repr(PyObject *self)
409 {
410         PyObject *list= Buffer_tolist(self);
411         PyObject *repr= PyObject_Repr(list);
412         Py_DECREF(list);
413         
414         return repr;
415 }
416
417
418 BGL_Wrap(2, Accum,          void,     (GLenum, GLfloat))
419 BGL_Wrap(2, AlphaFunc,      void,     (GLenum, GLclampf))
420 BGL_Wrap(3, AreTexturesResident,  GLboolean,  (GLsizei, GLuintP, GLbooleanP))
421 BGL_Wrap(1, Begin,          void,     (GLenum))
422 BGL_Wrap(2, BindTexture,    void,   (GLenum, GLuint))
423 BGL_Wrap(7, Bitmap,         void,     (GLsizei, GLsizei, GLfloat,
424                         GLfloat, GLfloat, GLfloat, GLubyteP))
425 BGL_Wrap(2, BlendFunc,        void,     (GLenum, GLenum))
426 BGL_Wrap(1, CallList,         void,     (GLuint))
427 BGL_Wrap(3, CallLists,        void,     (GLsizei, GLenum, GLvoidP))
428 BGL_Wrap(1, Clear,            void,     (GLbitfield))
429 BGL_Wrap(4, ClearAccum,       void,     (GLfloat, GLfloat, GLfloat, GLfloat))
430 BGL_Wrap(4, ClearColor,       void,     (GLclampf, GLclampf, GLclampf, GLclampf))
431 BGL_Wrap(1, ClearDepth,       void,     (GLclampd))
432 BGL_Wrap(1, ClearIndex,       void,     (GLfloat))
433 BGL_Wrap(1, ClearStencil,     void,     (GLint))
434 BGL_Wrap(2, ClipPlane,        void,     (GLenum, GLdoubleP))
435 BGL_Wrap(3, Color3b,          void,     (GLbyte, GLbyte, GLbyte))
436 BGL_Wrap(1, Color3bv,         void,     (GLbyteP))
437 BGL_Wrap(3, Color3d,          void,     (GLdouble, GLdouble, GLdouble))
438 BGL_Wrap(1, Color3dv,         void,     (GLdoubleP))
439 BGL_Wrap(3, Color3f,          void,     (GLfloat, GLfloat, GLfloat))
440 BGL_Wrap(1, Color3fv,         void,     (GLfloatP))
441 BGL_Wrap(3, Color3i,          void,     (GLint, GLint, GLint))
442 BGL_Wrap(1, Color3iv,         void,     (GLintP))
443 BGL_Wrap(3, Color3s,          void,     (GLshort, GLshort, GLshort))
444 BGL_Wrap(1, Color3sv,         void,     (GLshortP))
445 BGL_Wrap(3, Color3ub,         void,     (GLubyte, GLubyte, GLubyte))
446 BGL_Wrap(1, Color3ubv,        void,     (GLubyteP))
447 BGL_Wrap(3, Color3ui,         void,     (GLuint, GLuint, GLuint))
448 BGL_Wrap(1, Color3uiv,        void,     (GLuintP))
449 BGL_Wrap(3, Color3us,         void,     (GLushort, GLushort, GLushort))
450 BGL_Wrap(1, Color3usv,        void,     (GLushortP))
451 BGL_Wrap(4, Color4b,          void,     (GLbyte, GLbyte, GLbyte, GLbyte))
452 BGL_Wrap(1, Color4bv,         void,     (GLbyteP))
453 BGL_Wrap(4, Color4d,          void,     (GLdouble, GLdouble, GLdouble, GLdouble))
454 BGL_Wrap(1, Color4dv,         void,     (GLdoubleP))
455 BGL_Wrap(4, Color4f,          void,     (GLfloat, GLfloat, GLfloat, GLfloat))
456 BGL_Wrap(1, Color4fv,         void,     (GLfloatP))
457 BGL_Wrap(4, Color4i,          void,     (GLint, GLint, GLint, GLint))
458 BGL_Wrap(1, Color4iv,         void,     (GLintP))
459 BGL_Wrap(4, Color4s,          void,     (GLshort, GLshort, GLshort, GLshort))
460 BGL_Wrap(1, Color4sv,         void,     (GLshortP))
461 BGL_Wrap(4, Color4ub,         void,     (GLubyte, GLubyte, GLubyte, GLubyte))
462 BGL_Wrap(1, Color4ubv,        void,     (GLubyteP))
463 BGL_Wrap(4, Color4ui,         void,     (GLuint, GLuint, GLuint, GLuint))
464 BGL_Wrap(1, Color4uiv,        void,     (GLuintP))
465 BGL_Wrap(4, Color4us,         void,     (GLushort, GLushort, GLushort, GLushort))
466 BGL_Wrap(1, Color4usv,        void,     (GLushortP))
467 BGL_Wrap(4, ColorMask,        void,     (GLboolean, GLboolean, GLboolean, GLboolean))
468 BGL_Wrap(2, ColorMaterial,    void,     (GLenum, GLenum))
469 BGL_Wrap(5, CopyPixels,       void,     (GLint, GLint, GLsizei, GLsizei, GLenum))
470 BGL_Wrap(1, CullFace,         void,     (GLenum))
471 BGL_Wrap(2, DeleteLists,      void,     (GLuint, GLsizei))
472 BGL_Wrap(2, DeleteTextures,   void,   (GLsizei, GLuintP))
473 BGL_Wrap(1, DepthFunc,        void,     (GLenum))
474 BGL_Wrap(1, DepthMask,        void,     (GLboolean))
475 BGL_Wrap(2, DepthRange,       void,     (GLclampd, GLclampd))
476 BGL_Wrap(1, Disable,          void,     (GLenum))
477 BGL_Wrap(1, DrawBuffer,       void,     (GLenum))
478 BGL_Wrap(5, DrawPixels,       void,     (GLsizei, GLsizei, GLenum, GLenum, GLvoidP))
479 BGL_Wrap(1, EdgeFlag,         void,     (GLboolean))
480 BGL_Wrap(1, EdgeFlagv,        void,     (GLbooleanP))
481 BGL_Wrap(1, Enable,           void,     (GLenum))
482 BGL_Wrap(1, End,              void,     (void))
483 BGL_Wrap(1, EndList,          void,     (void))
484 BGL_Wrap(1, EvalCoord1d,      void,     (GLdouble))
485 BGL_Wrap(1, EvalCoord1dv,     void,     (GLdoubleP))
486 BGL_Wrap(1, EvalCoord1f,      void,     (GLfloat))
487 BGL_Wrap(1, EvalCoord1fv,     void,     (GLfloatP))
488 BGL_Wrap(2, EvalCoord2d,      void,     (GLdouble, GLdouble))
489 BGL_Wrap(1, EvalCoord2dv,     void,     (GLdoubleP))
490 BGL_Wrap(2, EvalCoord2f,      void,     (GLfloat, GLfloat))
491 BGL_Wrap(1, EvalCoord2fv,     void,     (GLfloatP))
492 BGL_Wrap(3, EvalMesh1,        void,     (GLenum, GLint, GLint))
493 BGL_Wrap(5, EvalMesh2,        void,     (GLenum, GLint, GLint, GLint, GLint))
494 BGL_Wrap(1, EvalPoint1,       void,     (GLint))
495 BGL_Wrap(2, EvalPoint2,       void,     (GLint, GLint))
496 BGL_Wrap(3, FeedbackBuffer,   void,     (GLsizei, GLenum, GLfloatP))
497 BGL_Wrap(1, Finish,           void,     (void))
498 BGL_Wrap(1, Flush,            void,     (void))
499 BGL_Wrap(2, Fogf,             void,     (GLenum, GLfloat))
500 BGL_Wrap(2, Fogfv,            void,     (GLenum, GLfloatP))
501 BGL_Wrap(2, Fogi,             void,     (GLenum, GLint))
502 BGL_Wrap(2, Fogiv,            void,     (GLenum, GLintP))
503 BGL_Wrap(1, FrontFace,        void,     (GLenum))
504 BGL_Wrap(6, Frustum,          void,     (GLdouble, GLdouble,
505                         GLdouble, GLdouble, GLdouble, GLdouble))
506 BGL_Wrap(1, GenLists,         GLuint,   (GLsizei))
507 BGL_Wrap(2, GenTextures,      void,   (GLsizei, GLuintP))
508 BGL_Wrap(2, GetBooleanv,      void,     (GLenum, GLbooleanP))
509 BGL_Wrap(2, GetClipPlane,     void,     (GLenum, GLdoubleP))
510 BGL_Wrap(2, GetDoublev,       void,     (GLenum, GLdoubleP))
511 BGL_Wrap(1, GetError,         GLenum,   (void))
512 BGL_Wrap(2, GetFloatv,        void,     (GLenum, GLfloatP))
513 BGL_Wrap(2, GetIntegerv,      void,     (GLenum, GLintP))
514 BGL_Wrap(3, GetLightfv,       void,     (GLenum, GLenum, GLfloatP))
515 BGL_Wrap(3, GetLightiv,       void,     (GLenum, GLenum, GLintP))
516 BGL_Wrap(3, GetMapdv,         void,     (GLenum, GLenum, GLdoubleP))
517 BGL_Wrap(3, GetMapfv,         void,     (GLenum, GLenum, GLfloatP))
518 BGL_Wrap(3, GetMapiv,         void,     (GLenum, GLenum, GLintP))
519 BGL_Wrap(3, GetMaterialfv,    void,     (GLenum, GLenum, GLfloatP))
520 BGL_Wrap(3, GetMaterialiv,    void,     (GLenum, GLenum, GLintP))
521 BGL_Wrap(2, GetPixelMapfv,    void,     (GLenum, GLfloatP))
522 BGL_Wrap(2, GetPixelMapuiv,   void,     (GLenum, GLuintP))
523 BGL_Wrap(2, GetPixelMapusv,   void,     (GLenum, GLushortP))
524 BGL_Wrap(1, GetPolygonStipple,void,     (GLubyteP))
525 BGL_Wrap(1, GetString,        GLstring,   (GLenum))
526 BGL_Wrap(3, GetTexEnvfv,      void,     (GLenum, GLenum, GLfloatP))
527 BGL_Wrap(3, GetTexEnviv,      void,     (GLenum, GLenum, GLintP))
528 BGL_Wrap(3, GetTexGendv,      void,     (GLenum, GLenum, GLdoubleP))
529 BGL_Wrap(3, GetTexGenfv,      void,     (GLenum, GLenum, GLfloatP))
530 BGL_Wrap(3, GetTexGeniv,      void,     (GLenum, GLenum, GLintP))
531 BGL_Wrap(5, GetTexImage,      void,     (GLenum, GLint, GLenum, GLenum, GLvoidP))
532 BGL_Wrap(4, GetTexLevelParameterfv, void,     (GLenum, GLint, GLenum, GLfloatP))
533 BGL_Wrap(4, GetTexLevelParameteriv, void,     (GLenum, GLint, GLenum, GLintP))
534 BGL_Wrap(3, GetTexParameterfv,    void,     (GLenum, GLenum, GLfloatP))
535 BGL_Wrap(3, GetTexParameteriv,    void,     (GLenum, GLenum, GLintP))
536 BGL_Wrap(2, Hint,           void,     (GLenum, GLenum))
537 BGL_Wrap(1, IndexMask,      void,     (GLuint))
538 BGL_Wrap(1, Indexd,         void,     (GLdouble))
539 BGL_Wrap(1, Indexdv,        void,     (GLdoubleP))
540 BGL_Wrap(1, Indexf,         void,     (GLfloat))
541 BGL_Wrap(1, Indexfv,        void,     (GLfloatP))
542 BGL_Wrap(1, Indexi,         void,     (GLint))
543 BGL_Wrap(1, Indexiv,        void,     (GLintP))
544 BGL_Wrap(1, Indexs,         void,     (GLshort))
545 BGL_Wrap(1, Indexsv,        void,     (GLshortP))
546 BGL_Wrap(1, InitNames,      void,     (void))
547 BGL_Wrap(1, IsEnabled,      GLboolean,  (GLenum))
548 BGL_Wrap(1, IsList,         GLboolean,  (GLuint))
549 BGL_Wrap(1, IsTexture,      GLboolean,  (GLuint))
550 BGL_Wrap(2, LightModelf,    void,     (GLenum, GLfloat))
551 BGL_Wrap(2, LightModelfv,   void,     (GLenum, GLfloatP))
552 BGL_Wrap(2, LightModeli,    void,     (GLenum, GLint))
553 BGL_Wrap(2, LightModeliv,   void,     (GLenum, GLintP))
554 BGL_Wrap(3, Lightf,         void,     (GLenum, GLenum, GLfloat))
555 BGL_Wrap(3, Lightfv,        void,     (GLenum, GLenum, GLfloatP))
556 BGL_Wrap(3, Lighti,         void,     (GLenum, GLenum, GLint))
557 BGL_Wrap(3, Lightiv,        void,     (GLenum, GLenum, GLintP))
558 BGL_Wrap(2, LineStipple,    void,     (GLint, GLushort))
559 BGL_Wrap(1, LineWidth,      void,     (GLfloat))
560 BGL_Wrap(1, ListBase,       void,     (GLuint))
561 BGL_Wrap(1, LoadIdentity,   void,     (void))
562 BGL_Wrap(1, LoadMatrixd,    void,     (GLdoubleP))
563 BGL_Wrap(1, LoadMatrixf,    void,     (GLfloatP))
564 BGL_Wrap(1, LoadName,       void,     (GLuint))
565 BGL_Wrap(1, LogicOp,        void,     (GLenum))
566 BGL_Wrap(6, Map1d,          void,     (GLenum, GLdouble, GLdouble,
567                         GLint, GLint, GLdoubleP))
568 BGL_Wrap(6, Map1f,          void,     (GLenum, GLfloat, GLfloat,
569                         GLint, GLint, GLfloatP))
570 BGL_Wrap(10, Map2d,         void,     (GLenum, GLdouble, GLdouble,
571                         GLint, GLint, GLdouble, GLdouble, GLint, GLint, GLdoubleP))
572 BGL_Wrap(10, Map2f,         void,     (GLenum, GLfloat, GLfloat,
573                         GLint, GLint, GLfloat, GLfloat, GLint, GLint, GLfloatP))
574 BGL_Wrap(3, MapGrid1d,        void,     (GLint, GLdouble, GLdouble))
575 BGL_Wrap(3, MapGrid1f,        void,     (GLint, GLfloat, GLfloat))
576 BGL_Wrap(6, MapGrid2d,        void,     (GLint, GLdouble, GLdouble,
577                         GLint, GLdouble, GLdouble))
578 BGL_Wrap(6, MapGrid2f,        void,     (GLint, GLfloat, GLfloat,
579                         GLint, GLfloat, GLfloat))
580 BGL_Wrap(3, Materialf,        void,     (GLenum, GLenum, GLfloat))
581 BGL_Wrap(3, Materialfv,       void,     (GLenum, GLenum, GLfloatP))
582 BGL_Wrap(3, Materiali,        void,     (GLenum, GLenum, GLint))
583 BGL_Wrap(3, Materialiv,       void,     (GLenum, GLenum, GLintP))
584 BGL_Wrap(1, MatrixMode,       void,     (GLenum))
585 BGL_Wrap(1, MultMatrixd,      void,     (GLdoubleP))
586 BGL_Wrap(1, MultMatrixf,      void,     (GLfloatP))
587 BGL_Wrap(2, NewList,          void,     (GLuint, GLenum))
588 BGL_Wrap(3, Normal3b,         void,     (GLbyte, GLbyte, GLbyte))
589 BGL_Wrap(1, Normal3bv,        void,     (GLbyteP))
590 BGL_Wrap(3, Normal3d,         void,     (GLdouble, GLdouble, GLdouble))
591 BGL_Wrap(1, Normal3dv,        void,     (GLdoubleP))
592 BGL_Wrap(3, Normal3f,         void,     (GLfloat, GLfloat, GLfloat))
593 BGL_Wrap(1, Normal3fv,        void,     (GLfloatP))
594 BGL_Wrap(3, Normal3i,         void,     (GLint, GLint, GLint))
595 BGL_Wrap(1, Normal3iv,        void,     (GLintP))
596 BGL_Wrap(3, Normal3s,         void,     (GLshort, GLshort, GLshort))
597 BGL_Wrap(1, Normal3sv,        void,     (GLshortP))
598 BGL_Wrap(6, Ortho,            void,     (GLdouble, GLdouble,
599                         GLdouble, GLdouble, GLdouble, GLdouble))
600 BGL_Wrap(1, PassThrough,      void,     (GLfloat))
601 BGL_Wrap(3, PixelMapfv,       void,     (GLenum, GLint, GLfloatP))
602 BGL_Wrap(3, PixelMapuiv,      void,     (GLenum, GLint, GLuintP))
603 BGL_Wrap(3, PixelMapusv,      void,     (GLenum, GLint, GLushortP))
604 BGL_Wrap(2, PixelStoref,      void,     (GLenum, GLfloat))
605 BGL_Wrap(2, PixelStorei,      void,     (GLenum, GLint))
606 BGL_Wrap(2, PixelTransferf,   void,     (GLenum, GLfloat))
607 BGL_Wrap(2, PixelTransferi,   void,     (GLenum, GLint))
608 BGL_Wrap(2, PixelZoom,        void,     (GLfloat, GLfloat))
609 BGL_Wrap(1, PointSize,        void,     (GLfloat))
610 BGL_Wrap(2, PolygonMode,      void,     (GLenum, GLenum))
611 BGL_Wrap(2, PolygonOffset,    void,     (GLfloat, GLfloat))
612 BGL_Wrap(1, PolygonStipple,   void,     (GLubyteP))
613 BGL_Wrap(1, PopAttrib,        void,     (void))
614 BGL_Wrap(1, PopClientAttrib,  void,     (void))
615 BGL_Wrap(1, PopMatrix,        void,     (void))
616 BGL_Wrap(1, PopName,          void,     (void))
617 BGL_Wrap(3, PrioritizeTextures,   void,   (GLsizei, GLuintP, GLclampfP))
618 BGL_Wrap(1, PushAttrib,       void,     (GLbitfield))
619 BGL_Wrap(1, PushClientAttrib, void,     (GLbitfield))
620 BGL_Wrap(1, PushMatrix,       void,     (void))
621 BGL_Wrap(1, PushName,         void,     (GLuint))
622 BGL_Wrap(2, RasterPos2d,      void,     (GLdouble, GLdouble))
623 BGL_Wrap(1, RasterPos2dv,     void,     (GLdoubleP))
624 BGL_Wrap(2, RasterPos2f,      void,     (GLfloat, GLfloat))
625 BGL_Wrap(1, RasterPos2fv,     void,     (GLfloatP))
626 BGL_Wrap(2, RasterPos2i,      void,     (GLint, GLint))
627 BGL_Wrap(1, RasterPos2iv,     void,     (GLintP))
628 BGL_Wrap(2, RasterPos2s,      void,     (GLshort, GLshort))
629 BGL_Wrap(1, RasterPos2sv,     void,     (GLshortP))
630 BGL_Wrap(3, RasterPos3d,      void,     (GLdouble, GLdouble, GLdouble))
631 BGL_Wrap(1, RasterPos3dv,     void,     (GLdoubleP))
632 BGL_Wrap(3, RasterPos3f,      void,     (GLfloat, GLfloat, GLfloat))
633 BGL_Wrap(1, RasterPos3fv,     void,     (GLfloatP))
634 BGL_Wrap(3, RasterPos3i,      void,     (GLint, GLint, GLint))
635 BGL_Wrap(1, RasterPos3iv,     void,     (GLintP))
636 BGL_Wrap(3, RasterPos3s,      void,     (GLshort, GLshort, GLshort))
637 BGL_Wrap(1, RasterPos3sv,     void,     (GLshortP))
638 BGL_Wrap(4, RasterPos4d,      void,     (GLdouble, GLdouble, GLdouble, GLdouble))
639 BGL_Wrap(1, RasterPos4dv,     void,     (GLdoubleP))
640 BGL_Wrap(4, RasterPos4f,      void,     (GLfloat, GLfloat, GLfloat, GLfloat))
641 BGL_Wrap(1, RasterPos4fv,     void,     (GLfloatP))
642 BGL_Wrap(4, RasterPos4i,      void,     (GLint, GLint, GLint, GLint))
643 BGL_Wrap(1, RasterPos4iv,     void,     (GLintP))
644 BGL_Wrap(4, RasterPos4s,      void,     (GLshort, GLshort, GLshort, GLshort))
645 BGL_Wrap(1, RasterPos4sv,     void,     (GLshortP))
646 BGL_Wrap(1, ReadBuffer,       void,     (GLenum))
647 BGL_Wrap(7, ReadPixels,       void,     (GLint, GLint, GLsizei,
648                         GLsizei, GLenum, GLenum, GLvoidP))
649 BGL_Wrap(4, Rectd,          void,     (GLdouble, GLdouble, GLdouble, GLdouble))
650 BGL_Wrap(2, Rectdv,         void,     (GLdoubleP, GLdoubleP))
651 BGL_Wrap(4, Rectf,          void,     (GLfloat, GLfloat, GLfloat, GLfloat))
652 BGL_Wrap(2, Rectfv,         void,     (GLfloatP, GLfloatP))
653 BGL_Wrap(4, Recti,          void,     (GLint, GLint, GLint, GLint))
654 BGL_Wrap(2, Rectiv,         void,     (GLintP, GLintP))
655 BGL_Wrap(4, Rects,          void,     (GLshort, GLshort, GLshort, GLshort))
656 BGL_Wrap(2, Rectsv,         void,     (GLshortP, GLshortP))
657 BGL_Wrap(1, RenderMode,     GLint,    (GLenum))
658 BGL_Wrap(4, Rotated,        void,     (GLdouble, GLdouble, GLdouble, GLdouble))
659 BGL_Wrap(4, Rotatef,        void,     (GLfloat, GLfloat, GLfloat, GLfloat))
660 BGL_Wrap(3, Scaled,         void,     (GLdouble, GLdouble, GLdouble))
661 BGL_Wrap(3, Scalef,         void,     (GLfloat, GLfloat, GLfloat))
662 BGL_Wrap(4, Scissor,        void,     (GLint, GLint, GLsizei, GLsizei))
663 BGL_Wrap(2, SelectBuffer,   void,     (GLsizei, GLuintP))
664 BGL_Wrap(1, ShadeModel,       void,     (GLenum))
665 BGL_Wrap(3, StencilFunc,      void,     (GLenum, GLint, GLuint))
666 BGL_Wrap(1, StencilMask,      void,     (GLuint))
667 BGL_Wrap(3, StencilOp,        void,     (GLenum, GLenum, GLenum))
668 BGL_Wrap(1, TexCoord1d,       void,     (GLdouble))
669 BGL_Wrap(1, TexCoord1dv,      void,     (GLdoubleP))
670 BGL_Wrap(1, TexCoord1f,       void,     (GLfloat))
671 BGL_Wrap(1, TexCoord1fv,      void,     (GLfloatP))
672 BGL_Wrap(1, TexCoord1i,       void,     (GLint))
673 BGL_Wrap(1, TexCoord1iv,      void,     (GLintP))
674 BGL_Wrap(1, TexCoord1s,       void,     (GLshort))
675 BGL_Wrap(1, TexCoord1sv,      void,     (GLshortP))
676 BGL_Wrap(2, TexCoord2d,       void,     (GLdouble, GLdouble))
677 BGL_Wrap(1, TexCoord2dv,      void,     (GLdoubleP))
678 BGL_Wrap(2, TexCoord2f,       void,     (GLfloat, GLfloat))
679 BGL_Wrap(1, TexCoord2fv,      void,     (GLfloatP))
680 BGL_Wrap(2, TexCoord2i,       void,     (GLint, GLint))
681 BGL_Wrap(1, TexCoord2iv,      void,     (GLintP))
682 BGL_Wrap(2, TexCoord2s,       void,     (GLshort, GLshort))
683 BGL_Wrap(1, TexCoord2sv,      void,     (GLshortP))
684 BGL_Wrap(3, TexCoord3d,       void,     (GLdouble, GLdouble, GLdouble))
685 BGL_Wrap(1, TexCoord3dv,      void,     (GLdoubleP))
686 BGL_Wrap(3, TexCoord3f,       void,     (GLfloat, GLfloat, GLfloat))
687 BGL_Wrap(1, TexCoord3fv,      void,     (GLfloatP))
688 BGL_Wrap(3, TexCoord3i,       void,     (GLint, GLint, GLint))
689 BGL_Wrap(1, TexCoord3iv,      void,     (GLintP))
690 BGL_Wrap(3, TexCoord3s,       void,     (GLshort, GLshort, GLshort))
691 BGL_Wrap(1, TexCoord3sv,      void,     (GLshortP))
692 BGL_Wrap(4, TexCoord4d,       void,     (GLdouble, GLdouble, GLdouble, GLdouble))
693 BGL_Wrap(1, TexCoord4dv,      void,     (GLdoubleP))
694 BGL_Wrap(4, TexCoord4f,       void,     (GLfloat, GLfloat, GLfloat, GLfloat))
695 BGL_Wrap(1, TexCoord4fv,      void,     (GLfloatP))
696 BGL_Wrap(4, TexCoord4i,       void,     (GLint, GLint, GLint, GLint))
697 BGL_Wrap(1, TexCoord4iv,      void,     (GLintP))
698 BGL_Wrap(4, TexCoord4s,       void,     (GLshort, GLshort, GLshort, GLshort))
699 BGL_Wrap(1, TexCoord4sv,      void,     (GLshortP))
700 BGL_Wrap(3, TexEnvf,        void,     (GLenum, GLenum, GLfloat))
701 BGL_Wrap(3, TexEnvfv,       void,     (GLenum, GLenum, GLfloatP))
702 BGL_Wrap(3, TexEnvi,        void,     (GLenum, GLenum, GLint))
703 BGL_Wrap(3, TexEnviv,       void,     (GLenum, GLenum, GLintP))
704 BGL_Wrap(3, TexGend,        void,     (GLenum, GLenum, GLdouble))
705 BGL_Wrap(3, TexGendv,       void,     (GLenum, GLenum, GLdoubleP))
706 BGL_Wrap(3, TexGenf,        void,     (GLenum, GLenum, GLfloat))
707 BGL_Wrap(3, TexGenfv,       void,     (GLenum, GLenum, GLfloatP))
708 BGL_Wrap(3, TexGeni,        void,     (GLenum, GLenum, GLint))
709 BGL_Wrap(3, TexGeniv,       void,     (GLenum, GLenum, GLintP))
710 BGL_Wrap(8, TexImage1D,     void,     (GLenum, GLint, GLint,
711                         GLsizei, GLint, GLenum, GLenum, GLvoidP))
712 BGL_Wrap(9, TexImage2D,     void,     (GLenum, GLint, GLint,
713                         GLsizei, GLsizei, GLint, GLenum, GLenum, GLvoidP))
714 BGL_Wrap(3, TexParameterf,      void,     (GLenum, GLenum, GLfloat))
715 BGL_Wrap(3, TexParameterfv,     void,     (GLenum, GLenum, GLfloatP))
716 BGL_Wrap(3, TexParameteri,      void,     (GLenum, GLenum, GLint))
717 BGL_Wrap(3, TexParameteriv,     void,     (GLenum, GLenum, GLintP))
718 BGL_Wrap(3, Translated,         void,     (GLdouble, GLdouble, GLdouble))
719 BGL_Wrap(3, Translatef,         void,     (GLfloat, GLfloat, GLfloat))
720 BGL_Wrap(2, Vertex2d,           void,     (GLdouble, GLdouble))
721 BGL_Wrap(1, Vertex2dv,          void,     (GLdoubleP))
722 BGL_Wrap(2, Vertex2f,           void,     (GLfloat, GLfloat))
723 BGL_Wrap(1, Vertex2fv,          void,     (GLfloatP))
724 BGL_Wrap(2, Vertex2i,           void,     (GLint, GLint))
725 BGL_Wrap(1, Vertex2iv,          void,     (GLintP))
726 BGL_Wrap(2, Vertex2s,           void,     (GLshort, GLshort))
727 BGL_Wrap(1, Vertex2sv,          void,     (GLshortP))
728 BGL_Wrap(3, Vertex3d,           void,     (GLdouble, GLdouble, GLdouble))
729 BGL_Wrap(1, Vertex3dv,          void,     (GLdoubleP))
730 BGL_Wrap(3, Vertex3f,           void,     (GLfloat, GLfloat, GLfloat))
731 BGL_Wrap(1, Vertex3fv,          void,     (GLfloatP))
732 BGL_Wrap(3, Vertex3i,           void,     (GLint, GLint, GLint))
733 BGL_Wrap(1, Vertex3iv,          void,     (GLintP))
734 BGL_Wrap(3, Vertex3s,           void,     (GLshort, GLshort, GLshort))
735 BGL_Wrap(1, Vertex3sv,          void,     (GLshortP))
736 BGL_Wrap(4, Vertex4d,           void,     (GLdouble, GLdouble, GLdouble, GLdouble))
737 BGL_Wrap(1, Vertex4dv,          void,     (GLdoubleP))
738 BGL_Wrap(4, Vertex4f,           void,     (GLfloat, GLfloat, GLfloat, GLfloat))
739 BGL_Wrap(1, Vertex4fv,          void,     (GLfloatP))
740 BGL_Wrap(4, Vertex4i,           void,     (GLint, GLint, GLint, GLint))
741 BGL_Wrap(1, Vertex4iv,          void,     (GLintP))
742 BGL_Wrap(4, Vertex4s,           void,     (GLshort, GLshort, GLshort, GLshort))
743 BGL_Wrap(1, Vertex4sv,          void,     (GLshortP))
744 BGL_Wrap(4, Viewport,           void,     (GLint, GLint, GLsizei, GLsizei))
745 BGLU_Wrap(4, Perspective,       void,           (GLdouble, GLdouble, GLdouble, GLdouble))
746 BGLU_Wrap(9, LookAt,                    void,           (GLdouble, GLdouble, GLdouble, GLdouble, GLdouble, GLdouble, GLdouble, GLdouble, GLdouble))
747 BGLU_Wrap(4, Ortho2D,           void,           (GLdouble, GLdouble, GLdouble, GLdouble))
748 BGLU_Wrap(5, PickMatrix,        void,           (GLdouble, GLdouble, GLdouble, GLdouble, GLintP))
749 BGLU_Wrap(9, Project,                   GLint,          (GLdouble, GLdouble, GLdouble, GLdoubleP, GLdoubleP, GLintP, GLdoubleP, GLdoubleP, GLdoubleP))
750 BGLU_Wrap(9, UnProject,                 GLint,          (GLdouble, GLdouble, GLdouble, GLdoubleP, GLdoubleP, GLintP, GLdoubleP, GLdoubleP, GLdoubleP))
751
752 #undef MethodDef
753 #define MethodDef(func) {"gl"#func, Method_##func, METH_VARARGS, "no string"}
754 #define MethodDefu(func) {"glu"#func, Method_##func, METH_VARARGS, "no string"}
755 /* So that MethodDef(Accum) becomes:
756  * {"glAccum", Method_Accumfunc, METH_VARARGS} */
757
758 static struct PyMethodDef BGL_methods[] = {
759   {"Buffer", Method_Buffer, METH_VARARGS, Method_Buffer_doc}, 
760
761 /* #ifndef __APPLE__ */
762         MethodDef(Accum),
763         MethodDef(AlphaFunc),
764         MethodDef(AreTexturesResident), 
765         MethodDef(Begin),
766         MethodDef(BindTexture), 
767         MethodDef(Bitmap),
768         MethodDef(BlendFunc),
769         MethodDef(CallList),
770         MethodDef(CallLists),
771         MethodDef(Clear),
772         MethodDef(ClearAccum),
773         MethodDef(ClearColor),
774         MethodDef(ClearDepth),
775         MethodDef(ClearIndex),
776         MethodDef(ClearStencil),
777         MethodDef(ClipPlane),
778         MethodDef(Color3b),
779         MethodDef(Color3bv),
780         MethodDef(Color3d),
781         MethodDef(Color3dv),
782         MethodDef(Color3f),
783         MethodDef(Color3fv),
784         MethodDef(Color3i),
785         MethodDef(Color3iv),
786         MethodDef(Color3s),
787         MethodDef(Color3sv),
788         MethodDef(Color3ub),
789         MethodDef(Color3ubv),
790         MethodDef(Color3ui),
791         MethodDef(Color3uiv),
792         MethodDef(Color3us),
793         MethodDef(Color3usv),
794         MethodDef(Color4b),
795         MethodDef(Color4bv),
796         MethodDef(Color4d),
797         MethodDef(Color4dv),
798         MethodDef(Color4f),
799         MethodDef(Color4fv),
800         MethodDef(Color4i),
801         MethodDef(Color4iv),
802         MethodDef(Color4s),
803         MethodDef(Color4sv),
804         MethodDef(Color4ub),
805         MethodDef(Color4ubv),
806         MethodDef(Color4ui),
807         MethodDef(Color4uiv),
808         MethodDef(Color4us),
809         MethodDef(Color4usv),
810         MethodDef(ColorMask),
811         MethodDef(ColorMaterial),
812         MethodDef(CopyPixels),
813         MethodDef(CullFace),
814         MethodDef(DeleteLists),
815         MethodDef(DeleteTextures),
816         MethodDef(DepthFunc),
817         MethodDef(DepthMask),
818         MethodDef(DepthRange),
819         MethodDef(Disable),
820         MethodDef(DrawBuffer),
821         MethodDef(DrawPixels),
822         MethodDef(EdgeFlag),
823         MethodDef(EdgeFlagv),
824         MethodDef(Enable),
825         MethodDef(End),
826         MethodDef(EndList),
827         MethodDef(EvalCoord1d),
828         MethodDef(EvalCoord1dv),
829         MethodDef(EvalCoord1f),
830         MethodDef(EvalCoord1fv),
831         MethodDef(EvalCoord2d),
832         MethodDef(EvalCoord2dv),
833         MethodDef(EvalCoord2f),
834         MethodDef(EvalCoord2fv),
835         MethodDef(EvalMesh1),
836         MethodDef(EvalMesh2),
837         MethodDef(EvalPoint1),
838         MethodDef(EvalPoint2),
839         MethodDef(FeedbackBuffer),
840         MethodDef(Finish),
841         MethodDef(Flush),
842         MethodDef(Fogf),
843         MethodDef(Fogfv),
844         MethodDef(Fogi),
845         MethodDef(Fogiv),
846         MethodDef(FrontFace),
847         MethodDef(Frustum),
848         MethodDef(GenLists),
849         MethodDef(GenTextures), 
850         MethodDef(GetBooleanv),
851         MethodDef(GetClipPlane),
852         MethodDef(GetDoublev),
853         MethodDef(GetError),
854         MethodDef(GetFloatv),
855         MethodDef(GetIntegerv),
856         MethodDef(GetLightfv),
857         MethodDef(GetLightiv),
858         MethodDef(GetMapdv),
859         MethodDef(GetMapfv),
860         MethodDef(GetMapiv),
861         MethodDef(GetMaterialfv),
862         MethodDef(GetMaterialiv),
863         MethodDef(GetPixelMapfv),
864         MethodDef(GetPixelMapuiv),
865         MethodDef(GetPixelMapusv),
866         MethodDef(GetPolygonStipple),
867         MethodDef(GetString),
868         MethodDef(GetTexEnvfv),
869         MethodDef(GetTexEnviv),
870         MethodDef(GetTexGendv),
871         MethodDef(GetTexGenfv),
872         MethodDef(GetTexGeniv),
873         MethodDef(GetTexImage),
874         MethodDef(GetTexLevelParameterfv),
875         MethodDef(GetTexLevelParameteriv),
876         MethodDef(GetTexParameterfv),
877         MethodDef(GetTexParameteriv),
878         MethodDef(Hint),
879         MethodDef(IndexMask),
880         MethodDef(Indexd),
881         MethodDef(Indexdv),
882         MethodDef(Indexf),
883         MethodDef(Indexfv),
884         MethodDef(Indexi),
885         MethodDef(Indexiv),
886         MethodDef(Indexs),
887         MethodDef(Indexsv),
888         MethodDef(InitNames),
889         MethodDef(IsEnabled),
890         MethodDef(IsList),
891         MethodDef(IsTexture), 
892         MethodDef(LightModelf),
893         MethodDef(LightModelfv),
894         MethodDef(LightModeli),
895         MethodDef(LightModeliv),
896         MethodDef(Lightf),
897         MethodDef(Lightfv),
898         MethodDef(Lighti),
899         MethodDef(Lightiv),
900         MethodDef(LineStipple),
901         MethodDef(LineWidth),
902         MethodDef(ListBase),
903         MethodDef(LoadIdentity),
904         MethodDef(LoadMatrixd),
905         MethodDef(LoadMatrixf),
906         MethodDef(LoadName),
907         MethodDef(LogicOp),
908         MethodDef(Map1d),
909         MethodDef(Map1f),
910         MethodDef(Map2d),
911         MethodDef(Map2f),
912         MethodDef(MapGrid1d),
913         MethodDef(MapGrid1f),
914         MethodDef(MapGrid2d),
915         MethodDef(MapGrid2f),
916         MethodDef(Materialf),
917         MethodDef(Materialfv),
918         MethodDef(Materiali),
919         MethodDef(Materialiv),
920         MethodDef(MatrixMode),
921         MethodDef(MultMatrixd),
922         MethodDef(MultMatrixf),
923         MethodDef(NewList),
924         MethodDef(Normal3b),
925         MethodDef(Normal3bv),
926         MethodDef(Normal3d),
927         MethodDef(Normal3dv),
928         MethodDef(Normal3f),
929         MethodDef(Normal3fv),
930         MethodDef(Normal3i),
931         MethodDef(Normal3iv),
932         MethodDef(Normal3s),
933         MethodDef(Normal3sv),
934         MethodDef(Ortho),
935         MethodDef(PassThrough),
936         MethodDef(PixelMapfv),
937         MethodDef(PixelMapuiv),
938         MethodDef(PixelMapusv),
939         MethodDef(PixelStoref),
940         MethodDef(PixelStorei),
941         MethodDef(PixelTransferf),
942         MethodDef(PixelTransferi),
943         MethodDef(PixelZoom),
944         MethodDef(PointSize),
945         MethodDef(PolygonMode),
946         MethodDef(PolygonOffset),
947         MethodDef(PolygonStipple),
948         MethodDef(PopAttrib),
949         MethodDef(PopClientAttrib),
950         MethodDef(PopMatrix),
951         MethodDef(PopName),
952         MethodDef(PrioritizeTextures), 
953         MethodDef(PushAttrib),
954         MethodDef(PushClientAttrib),
955         MethodDef(PushMatrix),
956         MethodDef(PushName),
957         MethodDef(RasterPos2d),
958         MethodDef(RasterPos2dv),
959         MethodDef(RasterPos2f),
960         MethodDef(RasterPos2fv),
961         MethodDef(RasterPos2i),
962         MethodDef(RasterPos2iv),
963         MethodDef(RasterPos2s),
964         MethodDef(RasterPos2sv),
965         MethodDef(RasterPos3d),
966         MethodDef(RasterPos3dv),
967         MethodDef(RasterPos3f),
968         MethodDef(RasterPos3fv),
969         MethodDef(RasterPos3i),
970         MethodDef(RasterPos3iv),
971         MethodDef(RasterPos3s),
972         MethodDef(RasterPos3sv),
973         MethodDef(RasterPos4d),
974         MethodDef(RasterPos4dv),
975         MethodDef(RasterPos4f),
976         MethodDef(RasterPos4fv),
977         MethodDef(RasterPos4i),
978         MethodDef(RasterPos4iv),
979         MethodDef(RasterPos4s),
980         MethodDef(RasterPos4sv),
981         MethodDef(ReadBuffer),
982         MethodDef(ReadPixels),
983         MethodDef(Rectd),
984         MethodDef(Rectdv),
985         MethodDef(Rectf),
986         MethodDef(Rectfv),
987         MethodDef(Recti),
988         MethodDef(Rectiv),
989         MethodDef(Rects),
990         MethodDef(Rectsv),
991         MethodDef(RenderMode),
992         MethodDef(Rotated),
993         MethodDef(Rotatef),
994         MethodDef(Scaled),
995         MethodDef(Scalef),
996         MethodDef(Scissor),
997         MethodDef(SelectBuffer),
998         MethodDef(ShadeModel),
999         MethodDef(StencilFunc),
1000         MethodDef(StencilMask),
1001         MethodDef(StencilOp),
1002         MethodDef(TexCoord1d),
1003         MethodDef(TexCoord1dv),
1004         MethodDef(TexCoord1f),
1005         MethodDef(TexCoord1fv),
1006         MethodDef(TexCoord1i),
1007         MethodDef(TexCoord1iv),
1008         MethodDef(TexCoord1s),
1009         MethodDef(TexCoord1sv),
1010         MethodDef(TexCoord2d),
1011         MethodDef(TexCoord2dv),
1012         MethodDef(TexCoord2f),
1013         MethodDef(TexCoord2fv),
1014         MethodDef(TexCoord2i),
1015         MethodDef(TexCoord2iv),
1016         MethodDef(TexCoord2s),
1017         MethodDef(TexCoord2sv),
1018         MethodDef(TexCoord3d),
1019         MethodDef(TexCoord3dv),
1020         MethodDef(TexCoord3f),
1021         MethodDef(TexCoord3fv),
1022         MethodDef(TexCoord3i),
1023         MethodDef(TexCoord3iv),
1024         MethodDef(TexCoord3s),
1025         MethodDef(TexCoord3sv),
1026         MethodDef(TexCoord4d),
1027         MethodDef(TexCoord4dv),
1028         MethodDef(TexCoord4f),
1029         MethodDef(TexCoord4fv),
1030         MethodDef(TexCoord4i),
1031         MethodDef(TexCoord4iv),
1032         MethodDef(TexCoord4s),
1033         MethodDef(TexCoord4sv),
1034         MethodDef(TexEnvf),
1035         MethodDef(TexEnvfv),
1036         MethodDef(TexEnvi),
1037         MethodDef(TexEnviv),
1038         MethodDef(TexGend),
1039         MethodDef(TexGendv),
1040         MethodDef(TexGenf),
1041         MethodDef(TexGenfv),
1042         MethodDef(TexGeni),
1043         MethodDef(TexGeniv),
1044         MethodDef(TexImage1D),
1045         MethodDef(TexImage2D),
1046         MethodDef(TexParameterf),
1047         MethodDef(TexParameterfv),
1048         MethodDef(TexParameteri),
1049         MethodDef(TexParameteriv),
1050         MethodDef(Translated),
1051         MethodDef(Translatef),
1052         MethodDef(Vertex2d),
1053         MethodDef(Vertex2dv),
1054         MethodDef(Vertex2f),
1055         MethodDef(Vertex2fv),
1056         MethodDef(Vertex2i),
1057         MethodDef(Vertex2iv),
1058         MethodDef(Vertex2s),
1059         MethodDef(Vertex2sv),
1060         MethodDef(Vertex3d),
1061         MethodDef(Vertex3dv),
1062         MethodDef(Vertex3f),
1063         MethodDef(Vertex3fv),
1064         MethodDef(Vertex3i),
1065         MethodDef(Vertex3iv),
1066         MethodDef(Vertex3s),
1067         MethodDef(Vertex3sv),
1068         MethodDef(Vertex4d),
1069         MethodDef(Vertex4dv),
1070         MethodDef(Vertex4f),
1071         MethodDef(Vertex4fv),
1072         MethodDef(Vertex4i),
1073         MethodDef(Vertex4iv),
1074         MethodDef(Vertex4s),
1075         MethodDef(Vertex4sv),
1076         MethodDef(Viewport),
1077         MethodDefu(Perspective),
1078         MethodDefu(LookAt),
1079         MethodDefu(Ortho2D),
1080         MethodDefu(PickMatrix),
1081         MethodDefu(Project),
1082         MethodDefu(UnProject),
1083 /* #endif */
1084         {NULL, NULL, 0, NULL}
1085 };
1086
1087 static struct PyModuleDef BGL_module_def = {
1088         PyModuleDef_HEAD_INIT,
1089         "BGL",  /* m_name */
1090         0,  /* m_doc */
1091         0,  /* m_size */
1092         BGL_methods,  /* m_methods */
1093         0,  /* m_reload */
1094         0,  /* m_traverse */
1095         0,  /* m_clear */
1096         0,  /* m_free */
1097 };
1098
1099
1100 PyObject *BGL_Init(void)
1101 {
1102         PyObject *mod, *dict, *item;
1103         mod = PyModule_Create(&BGL_module_def);
1104         PyDict_SetItemString(PySys_GetObject("modules"), BGL_module_def.m_name, mod);
1105         dict= PyModule_GetDict(mod);
1106         
1107         if( PyType_Ready( &buffer_Type) < 0)
1108                 return NULL; /* should never happen */
1109
1110 #define EXPP_ADDCONST(x) PyDict_SetItemString(dict, #x, item=PyLong_FromLong((int)x)); Py_DECREF(item)
1111
1112 /* So, for example:
1113  * EXPP_ADDCONST(GL_CURRENT_BIT) becomes
1114  * PyDict_SetItemString(dict, "GL_CURRENT_BIT", item=PyLong_FromLong(GL_CURRENT_BIT)); Py_DECREF(item) */
1115
1116         EXPP_ADDCONST(GL_CURRENT_BIT);
1117         EXPP_ADDCONST(GL_POINT_BIT);
1118         EXPP_ADDCONST(GL_LINE_BIT);
1119         EXPP_ADDCONST(GL_POLYGON_BIT);
1120         EXPP_ADDCONST(GL_POLYGON_STIPPLE_BIT);
1121         EXPP_ADDCONST(GL_PIXEL_MODE_BIT);
1122         EXPP_ADDCONST(GL_LIGHTING_BIT);
1123         EXPP_ADDCONST(GL_FOG_BIT);
1124         EXPP_ADDCONST(GL_DEPTH_BUFFER_BIT);
1125         EXPP_ADDCONST(GL_ACCUM_BUFFER_BIT);
1126         EXPP_ADDCONST(GL_STENCIL_BUFFER_BIT);
1127         EXPP_ADDCONST(GL_VIEWPORT_BIT);
1128         EXPP_ADDCONST(GL_TRANSFORM_BIT);
1129         EXPP_ADDCONST(GL_ENABLE_BIT);
1130         EXPP_ADDCONST(GL_COLOR_BUFFER_BIT);
1131         EXPP_ADDCONST(GL_HINT_BIT);
1132         EXPP_ADDCONST(GL_EVAL_BIT);
1133         EXPP_ADDCONST(GL_LIST_BIT);
1134         EXPP_ADDCONST(GL_TEXTURE_BIT);
1135         EXPP_ADDCONST(GL_SCISSOR_BIT);
1136         EXPP_ADDCONST(GL_ALL_ATTRIB_BITS);
1137         EXPP_ADDCONST(GL_CLIENT_ALL_ATTRIB_BITS);
1138         
1139         EXPP_ADDCONST(GL_FALSE);
1140         EXPP_ADDCONST(GL_TRUE);
1141
1142         EXPP_ADDCONST(GL_POINTS);
1143         EXPP_ADDCONST(GL_LINES);
1144         EXPP_ADDCONST(GL_LINE_LOOP);
1145         EXPP_ADDCONST(GL_LINE_STRIP);
1146         EXPP_ADDCONST(GL_TRIANGLES);
1147         EXPP_ADDCONST(GL_TRIANGLE_STRIP);
1148         EXPP_ADDCONST(GL_TRIANGLE_FAN);
1149         EXPP_ADDCONST(GL_QUADS);
1150         EXPP_ADDCONST(GL_QUAD_STRIP);
1151         EXPP_ADDCONST(GL_POLYGON);
1152
1153         EXPP_ADDCONST(GL_ACCUM);
1154         EXPP_ADDCONST(GL_LOAD);
1155         EXPP_ADDCONST(GL_RETURN);
1156         EXPP_ADDCONST(GL_MULT);
1157         EXPP_ADDCONST(GL_ADD);
1158
1159         EXPP_ADDCONST(GL_NEVER);
1160         EXPP_ADDCONST(GL_LESS);
1161         EXPP_ADDCONST(GL_EQUAL);
1162         EXPP_ADDCONST(GL_LEQUAL);
1163         EXPP_ADDCONST(GL_GREATER);
1164         EXPP_ADDCONST(GL_NOTEQUAL);
1165         EXPP_ADDCONST(GL_GEQUAL);
1166         EXPP_ADDCONST(GL_ALWAYS);
1167
1168         EXPP_ADDCONST(GL_ZERO);
1169         EXPP_ADDCONST(GL_ONE);
1170         EXPP_ADDCONST(GL_SRC_COLOR);
1171         EXPP_ADDCONST(GL_ONE_MINUS_SRC_COLOR);
1172         EXPP_ADDCONST(GL_SRC_ALPHA);
1173         EXPP_ADDCONST(GL_ONE_MINUS_SRC_ALPHA);
1174         EXPP_ADDCONST(GL_DST_ALPHA);
1175         EXPP_ADDCONST(GL_ONE_MINUS_DST_ALPHA);
1176
1177         EXPP_ADDCONST(GL_DST_COLOR);
1178         EXPP_ADDCONST(GL_ONE_MINUS_DST_COLOR);
1179         EXPP_ADDCONST(GL_SRC_ALPHA_SATURATE);
1180
1181         EXPP_ADDCONST(GL_NONE);
1182         EXPP_ADDCONST(GL_FRONT_LEFT);
1183         EXPP_ADDCONST(GL_FRONT_RIGHT);
1184         EXPP_ADDCONST(GL_BACK_LEFT);
1185         EXPP_ADDCONST(GL_BACK_RIGHT);
1186         EXPP_ADDCONST(GL_FRONT);
1187         EXPP_ADDCONST(GL_BACK);
1188         EXPP_ADDCONST(GL_LEFT);
1189         EXPP_ADDCONST(GL_RIGHT);
1190         EXPP_ADDCONST(GL_FRONT_AND_BACK);
1191         EXPP_ADDCONST(GL_AUX0);
1192         EXPP_ADDCONST(GL_AUX1);
1193         EXPP_ADDCONST(GL_AUX2);
1194         EXPP_ADDCONST(GL_AUX3);
1195
1196         EXPP_ADDCONST(GL_NO_ERROR);
1197         EXPP_ADDCONST(GL_INVALID_ENUM);
1198         EXPP_ADDCONST(GL_INVALID_VALUE);
1199         EXPP_ADDCONST(GL_INVALID_OPERATION);
1200         EXPP_ADDCONST(GL_STACK_OVERFLOW);
1201         EXPP_ADDCONST(GL_STACK_UNDERFLOW);
1202         EXPP_ADDCONST(GL_OUT_OF_MEMORY);
1203
1204         EXPP_ADDCONST(GL_2D);
1205         EXPP_ADDCONST(GL_3D);
1206         EXPP_ADDCONST(GL_3D_COLOR);
1207         EXPP_ADDCONST(GL_3D_COLOR_TEXTURE);
1208         EXPP_ADDCONST(GL_4D_COLOR_TEXTURE);
1209
1210         EXPP_ADDCONST(GL_PASS_THROUGH_TOKEN);
1211         EXPP_ADDCONST(GL_POINT_TOKEN);
1212         EXPP_ADDCONST(GL_LINE_TOKEN);
1213         EXPP_ADDCONST(GL_POLYGON_TOKEN);
1214         EXPP_ADDCONST(GL_BITMAP_TOKEN);
1215         EXPP_ADDCONST(GL_DRAW_PIXEL_TOKEN);
1216         EXPP_ADDCONST(GL_COPY_PIXEL_TOKEN);
1217         EXPP_ADDCONST(GL_LINE_RESET_TOKEN);
1218
1219         EXPP_ADDCONST(GL_EXP);
1220         EXPP_ADDCONST(GL_EXP2);
1221
1222         EXPP_ADDCONST(GL_CW);
1223         EXPP_ADDCONST(GL_CCW);
1224
1225         EXPP_ADDCONST(GL_COEFF);
1226         EXPP_ADDCONST(GL_ORDER);
1227         EXPP_ADDCONST(GL_DOMAIN);
1228
1229         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_I);
1230         EXPP_ADDCONST(GL_PIXEL_MAP_S_TO_S);
1231         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_R);
1232         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_G);
1233         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_B);
1234         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_A);
1235         EXPP_ADDCONST(GL_PIXEL_MAP_R_TO_R);
1236         EXPP_ADDCONST(GL_PIXEL_MAP_G_TO_G);
1237         EXPP_ADDCONST(GL_PIXEL_MAP_B_TO_B);
1238         EXPP_ADDCONST(GL_PIXEL_MAP_A_TO_A);
1239
1240         EXPP_ADDCONST(GL_CURRENT_COLOR);
1241         EXPP_ADDCONST(GL_CURRENT_INDEX);
1242         EXPP_ADDCONST(GL_CURRENT_NORMAL);
1243         EXPP_ADDCONST(GL_CURRENT_TEXTURE_COORDS);
1244         EXPP_ADDCONST(GL_CURRENT_RASTER_COLOR);
1245         EXPP_ADDCONST(GL_CURRENT_RASTER_INDEX);
1246         EXPP_ADDCONST(GL_CURRENT_RASTER_TEXTURE_COORDS);
1247         EXPP_ADDCONST(GL_CURRENT_RASTER_POSITION);
1248         EXPP_ADDCONST(GL_CURRENT_RASTER_POSITION_VALID);
1249         EXPP_ADDCONST(GL_CURRENT_RASTER_DISTANCE);
1250         EXPP_ADDCONST(GL_POINT_SMOOTH);
1251         EXPP_ADDCONST(GL_POINT_SIZE);
1252         EXPP_ADDCONST(GL_POINT_SIZE_RANGE);
1253         EXPP_ADDCONST(GL_POINT_SIZE_GRANULARITY);
1254         EXPP_ADDCONST(GL_LINE_SMOOTH);
1255         EXPP_ADDCONST(GL_LINE_WIDTH);
1256         EXPP_ADDCONST(GL_LINE_WIDTH_RANGE);
1257         EXPP_ADDCONST(GL_LINE_WIDTH_GRANULARITY);
1258         EXPP_ADDCONST(GL_LINE_STIPPLE);
1259         EXPP_ADDCONST(GL_LINE_STIPPLE_PATTERN);
1260         EXPP_ADDCONST(GL_LINE_STIPPLE_REPEAT);
1261         EXPP_ADDCONST(GL_LIST_MODE);
1262         EXPP_ADDCONST(GL_MAX_LIST_NESTING);
1263         EXPP_ADDCONST(GL_LIST_BASE);
1264         EXPP_ADDCONST(GL_LIST_INDEX);
1265         EXPP_ADDCONST(GL_POLYGON_MODE);
1266         EXPP_ADDCONST(GL_POLYGON_SMOOTH);
1267         EXPP_ADDCONST(GL_POLYGON_STIPPLE);
1268         EXPP_ADDCONST(GL_EDGE_FLAG);
1269         EXPP_ADDCONST(GL_CULL_FACE);
1270         EXPP_ADDCONST(GL_CULL_FACE_MODE);
1271         EXPP_ADDCONST(GL_FRONT_FACE);
1272         EXPP_ADDCONST(GL_LIGHTING);
1273         EXPP_ADDCONST(GL_LIGHT_MODEL_LOCAL_VIEWER);
1274         EXPP_ADDCONST(GL_LIGHT_MODEL_TWO_SIDE);
1275         EXPP_ADDCONST(GL_LIGHT_MODEL_AMBIENT);
1276         EXPP_ADDCONST(GL_SHADE_MODEL);
1277         EXPP_ADDCONST(GL_COLOR_MATERIAL_FACE);
1278         EXPP_ADDCONST(GL_COLOR_MATERIAL_PARAMETER);
1279         EXPP_ADDCONST(GL_COLOR_MATERIAL);
1280         EXPP_ADDCONST(GL_FOG);
1281         EXPP_ADDCONST(GL_FOG_INDEX);
1282         EXPP_ADDCONST(GL_FOG_DENSITY);
1283         EXPP_ADDCONST(GL_FOG_START);
1284         EXPP_ADDCONST(GL_FOG_END);
1285         EXPP_ADDCONST(GL_FOG_MODE);
1286         EXPP_ADDCONST(GL_FOG_COLOR);
1287         EXPP_ADDCONST(GL_DEPTH_RANGE);
1288         EXPP_ADDCONST(GL_DEPTH_TEST);
1289         EXPP_ADDCONST(GL_DEPTH_WRITEMASK);
1290         EXPP_ADDCONST(GL_DEPTH_CLEAR_VALUE);
1291         EXPP_ADDCONST(GL_DEPTH_FUNC);
1292         EXPP_ADDCONST(GL_ACCUM_CLEAR_VALUE);
1293         EXPP_ADDCONST(GL_STENCIL_TEST);
1294         EXPP_ADDCONST(GL_STENCIL_CLEAR_VALUE);
1295         EXPP_ADDCONST(GL_STENCIL_FUNC);
1296         EXPP_ADDCONST(GL_STENCIL_VALUE_MASK);
1297         EXPP_ADDCONST(GL_STENCIL_FAIL);
1298         EXPP_ADDCONST(GL_STENCIL_PASS_DEPTH_FAIL);
1299         EXPP_ADDCONST(GL_STENCIL_PASS_DEPTH_PASS);
1300         EXPP_ADDCONST(GL_STENCIL_REF);
1301         EXPP_ADDCONST(GL_STENCIL_WRITEMASK);
1302         EXPP_ADDCONST(GL_MATRIX_MODE);
1303         EXPP_ADDCONST(GL_NORMALIZE);
1304         EXPP_ADDCONST(GL_VIEWPORT);
1305         EXPP_ADDCONST(GL_MODELVIEW_STACK_DEPTH);
1306         EXPP_ADDCONST(GL_PROJECTION_STACK_DEPTH);
1307         EXPP_ADDCONST(GL_TEXTURE_STACK_DEPTH);
1308         EXPP_ADDCONST(GL_MODELVIEW_MATRIX);
1309         EXPP_ADDCONST(GL_PROJECTION_MATRIX);
1310         EXPP_ADDCONST(GL_TEXTURE_MATRIX);
1311         EXPP_ADDCONST(GL_ATTRIB_STACK_DEPTH);
1312         EXPP_ADDCONST(GL_ALPHA_TEST);
1313         EXPP_ADDCONST(GL_ALPHA_TEST_FUNC);
1314         EXPP_ADDCONST(GL_ALPHA_TEST_REF);
1315         EXPP_ADDCONST(GL_DITHER);
1316         EXPP_ADDCONST(GL_BLEND_DST);
1317         EXPP_ADDCONST(GL_BLEND_SRC);
1318         EXPP_ADDCONST(GL_BLEND);
1319         EXPP_ADDCONST(GL_LOGIC_OP_MODE);
1320         EXPP_ADDCONST(GL_LOGIC_OP);
1321         EXPP_ADDCONST(GL_AUX_BUFFERS);
1322         EXPP_ADDCONST(GL_DRAW_BUFFER);
1323         EXPP_ADDCONST(GL_READ_BUFFER);
1324         EXPP_ADDCONST(GL_SCISSOR_BOX);
1325         EXPP_ADDCONST(GL_SCISSOR_TEST);
1326         EXPP_ADDCONST(GL_INDEX_CLEAR_VALUE);
1327         EXPP_ADDCONST(GL_INDEX_WRITEMASK);
1328         EXPP_ADDCONST(GL_COLOR_CLEAR_VALUE);
1329         EXPP_ADDCONST(GL_COLOR_WRITEMASK);
1330         EXPP_ADDCONST(GL_INDEX_MODE);
1331         EXPP_ADDCONST(GL_RGBA_MODE);
1332         EXPP_ADDCONST(GL_DOUBLEBUFFER);
1333         EXPP_ADDCONST(GL_STEREO);
1334         EXPP_ADDCONST(GL_RENDER_MODE);
1335         EXPP_ADDCONST(GL_PERSPECTIVE_CORRECTION_HINT);
1336         EXPP_ADDCONST(GL_POINT_SMOOTH_HINT);
1337         EXPP_ADDCONST(GL_LINE_SMOOTH_HINT);
1338         EXPP_ADDCONST(GL_POLYGON_SMOOTH_HINT);
1339         EXPP_ADDCONST(GL_FOG_HINT);
1340         EXPP_ADDCONST(GL_TEXTURE_GEN_S);
1341         EXPP_ADDCONST(GL_TEXTURE_GEN_T);
1342         EXPP_ADDCONST(GL_TEXTURE_GEN_R);
1343         EXPP_ADDCONST(GL_TEXTURE_GEN_Q);
1344         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_I_SIZE);
1345         EXPP_ADDCONST(GL_PIXEL_MAP_S_TO_S_SIZE);
1346         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_R_SIZE);
1347         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_G_SIZE);
1348         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_B_SIZE);
1349         EXPP_ADDCONST(GL_PIXEL_MAP_I_TO_A_SIZE);
1350         EXPP_ADDCONST(GL_PIXEL_MAP_R_TO_R_SIZE);
1351         EXPP_ADDCONST(GL_PIXEL_MAP_G_TO_G_SIZE);
1352         EXPP_ADDCONST(GL_PIXEL_MAP_B_TO_B_SIZE);
1353         EXPP_ADDCONST(GL_PIXEL_MAP_A_TO_A_SIZE);
1354         EXPP_ADDCONST(GL_UNPACK_SWAP_BYTES);
1355         EXPP_ADDCONST(GL_UNPACK_LSB_FIRST);
1356         EXPP_ADDCONST(GL_UNPACK_ROW_LENGTH);
1357         EXPP_ADDCONST(GL_UNPACK_SKIP_ROWS);
1358         EXPP_ADDCONST(GL_UNPACK_SKIP_PIXELS);
1359         EXPP_ADDCONST(GL_UNPACK_ALIGNMENT);
1360         EXPP_ADDCONST(GL_PACK_SWAP_BYTES);
1361         EXPP_ADDCONST(GL_PACK_LSB_FIRST);
1362         EXPP_ADDCONST(GL_PACK_ROW_LENGTH);
1363         EXPP_ADDCONST(GL_PACK_SKIP_ROWS);
1364         EXPP_ADDCONST(GL_PACK_SKIP_PIXELS);
1365         EXPP_ADDCONST(GL_PACK_ALIGNMENT);
1366         EXPP_ADDCONST(GL_MAP_COLOR);
1367         EXPP_ADDCONST(GL_MAP_STENCIL);
1368         EXPP_ADDCONST(GL_INDEX_SHIFT);
1369         EXPP_ADDCONST(GL_INDEX_OFFSET);
1370         EXPP_ADDCONST(GL_RED_SCALE);
1371         EXPP_ADDCONST(GL_RED_BIAS);
1372         EXPP_ADDCONST(GL_ZOOM_X);
1373         EXPP_ADDCONST(GL_ZOOM_Y);
1374         EXPP_ADDCONST(GL_GREEN_SCALE);
1375         EXPP_ADDCONST(GL_GREEN_BIAS);
1376         EXPP_ADDCONST(GL_BLUE_SCALE);
1377         EXPP_ADDCONST(GL_BLUE_BIAS);
1378         EXPP_ADDCONST(GL_ALPHA_SCALE);
1379         EXPP_ADDCONST(GL_ALPHA_BIAS);
1380         EXPP_ADDCONST(GL_DEPTH_SCALE);
1381         EXPP_ADDCONST(GL_DEPTH_BIAS);
1382         EXPP_ADDCONST(GL_MAX_EVAL_ORDER);
1383         EXPP_ADDCONST(GL_MAX_LIGHTS);
1384         EXPP_ADDCONST(GL_MAX_CLIP_PLANES);
1385         EXPP_ADDCONST(GL_MAX_TEXTURE_SIZE);
1386         EXPP_ADDCONST(GL_MAX_PIXEL_MAP_TABLE);
1387         EXPP_ADDCONST(GL_MAX_ATTRIB_STACK_DEPTH);
1388         EXPP_ADDCONST(GL_MAX_MODELVIEW_STACK_DEPTH);
1389         EXPP_ADDCONST(GL_MAX_NAME_STACK_DEPTH);
1390         EXPP_ADDCONST(GL_MAX_PROJECTION_STACK_DEPTH);
1391         EXPP_ADDCONST(GL_MAX_TEXTURE_STACK_DEPTH);
1392         EXPP_ADDCONST(GL_MAX_VIEWPORT_DIMS);
1393         EXPP_ADDCONST(GL_SUBPIXEL_BITS);
1394         EXPP_ADDCONST(GL_INDEX_BITS);
1395         EXPP_ADDCONST(GL_RED_BITS);
1396         EXPP_ADDCONST(GL_GREEN_BITS);
1397         EXPP_ADDCONST(GL_BLUE_BITS);
1398         EXPP_ADDCONST(GL_ALPHA_BITS);
1399         EXPP_ADDCONST(GL_DEPTH_BITS);
1400         EXPP_ADDCONST(GL_STENCIL_BITS);
1401         EXPP_ADDCONST(GL_ACCUM_RED_BITS);
1402         EXPP_ADDCONST(GL_ACCUM_GREEN_BITS);
1403         EXPP_ADDCONST(GL_ACCUM_BLUE_BITS);
1404         EXPP_ADDCONST(GL_ACCUM_ALPHA_BITS);
1405         EXPP_ADDCONST(GL_NAME_STACK_DEPTH);
1406         EXPP_ADDCONST(GL_AUTO_NORMAL);
1407         EXPP_ADDCONST(GL_MAP1_COLOR_4);
1408         EXPP_ADDCONST(GL_MAP1_INDEX);
1409         EXPP_ADDCONST(GL_MAP1_NORMAL);
1410         EXPP_ADDCONST(GL_MAP1_TEXTURE_COORD_1);
1411         EXPP_ADDCONST(GL_MAP1_TEXTURE_COORD_2);
1412         EXPP_ADDCONST(GL_MAP1_TEXTURE_COORD_3);
1413         EXPP_ADDCONST(GL_MAP1_TEXTURE_COORD_4);
1414         EXPP_ADDCONST(GL_MAP1_VERTEX_3);
1415         EXPP_ADDCONST(GL_MAP1_VERTEX_4);
1416         EXPP_ADDCONST(GL_MAP2_COLOR_4);
1417         EXPP_ADDCONST(GL_MAP2_INDEX);
1418         EXPP_ADDCONST(GL_MAP2_NORMAL);
1419         EXPP_ADDCONST(GL_MAP2_TEXTURE_COORD_1);
1420         EXPP_ADDCONST(GL_MAP2_TEXTURE_COORD_2);
1421         EXPP_ADDCONST(GL_MAP2_TEXTURE_COORD_3);
1422         EXPP_ADDCONST(GL_MAP2_TEXTURE_COORD_4);
1423         EXPP_ADDCONST(GL_MAP2_VERTEX_3);
1424         EXPP_ADDCONST(GL_MAP2_VERTEX_4);
1425         EXPP_ADDCONST(GL_MAP1_GRID_DOMAIN);
1426         EXPP_ADDCONST(GL_MAP1_GRID_SEGMENTS);
1427         EXPP_ADDCONST(GL_MAP2_GRID_DOMAIN);
1428         EXPP_ADDCONST(GL_MAP2_GRID_SEGMENTS);
1429         EXPP_ADDCONST(GL_TEXTURE_1D);
1430         EXPP_ADDCONST(GL_TEXTURE_2D);
1431
1432         EXPP_ADDCONST(GL_TEXTURE_WIDTH);
1433         EXPP_ADDCONST(GL_TEXTURE_HEIGHT);
1434         EXPP_ADDCONST(GL_TEXTURE_COMPONENTS);
1435         EXPP_ADDCONST(GL_TEXTURE_BORDER_COLOR);
1436         EXPP_ADDCONST(GL_TEXTURE_BORDER);
1437
1438         EXPP_ADDCONST(GL_DONT_CARE);
1439         EXPP_ADDCONST(GL_FASTEST);
1440         EXPP_ADDCONST(GL_NICEST);
1441
1442         EXPP_ADDCONST(GL_AMBIENT);
1443         EXPP_ADDCONST(GL_DIFFUSE);
1444         EXPP_ADDCONST(GL_SPECULAR);
1445         EXPP_ADDCONST(GL_POSITION);
1446         EXPP_ADDCONST(GL_SPOT_DIRECTION);
1447         EXPP_ADDCONST(GL_SPOT_EXPONENT);
1448         EXPP_ADDCONST(GL_SPOT_CUTOFF);
1449         EXPP_ADDCONST(GL_CONSTANT_ATTENUATION);
1450         EXPP_ADDCONST(GL_LINEAR_ATTENUATION);
1451         EXPP_ADDCONST(GL_QUADRATIC_ATTENUATION);
1452
1453         EXPP_ADDCONST(GL_COMPILE);
1454         EXPP_ADDCONST(GL_COMPILE_AND_EXECUTE);
1455
1456         EXPP_ADDCONST(GL_BYTE);
1457         EXPP_ADDCONST(GL_UNSIGNED_BYTE);
1458         EXPP_ADDCONST(GL_SHORT);
1459         EXPP_ADDCONST(GL_UNSIGNED_SHORT);
1460         EXPP_ADDCONST(GL_INT);
1461         EXPP_ADDCONST(GL_UNSIGNED_INT);
1462         EXPP_ADDCONST(GL_FLOAT);
1463         EXPP_ADDCONST(GL_DOUBLE);
1464         EXPP_ADDCONST(GL_2_BYTES);
1465         EXPP_ADDCONST(GL_3_BYTES);
1466         EXPP_ADDCONST(GL_4_BYTES);
1467
1468         EXPP_ADDCONST(GL_CLEAR);
1469         EXPP_ADDCONST(GL_AND);
1470         EXPP_ADDCONST(GL_AND_REVERSE);
1471         EXPP_ADDCONST(GL_COPY);
1472         EXPP_ADDCONST(GL_AND_INVERTED);
1473         EXPP_ADDCONST(GL_NOOP);
1474         EXPP_ADDCONST(GL_XOR);
1475         EXPP_ADDCONST(GL_OR);
1476         EXPP_ADDCONST(GL_NOR);
1477         EXPP_ADDCONST(GL_EQUIV);
1478         EXPP_ADDCONST(GL_INVERT);
1479         EXPP_ADDCONST(GL_OR_REVERSE);
1480         EXPP_ADDCONST(GL_COPY_INVERTED);
1481         EXPP_ADDCONST(GL_OR_INVERTED);
1482         EXPP_ADDCONST(GL_NAND);
1483         EXPP_ADDCONST(GL_SET);
1484
1485         EXPP_ADDCONST(GL_EMISSION);
1486         EXPP_ADDCONST(GL_SHININESS);
1487         EXPP_ADDCONST(GL_AMBIENT_AND_DIFFUSE);
1488         EXPP_ADDCONST(GL_COLOR_INDEXES);
1489
1490         EXPP_ADDCONST(GL_MODELVIEW);
1491         EXPP_ADDCONST(GL_PROJECTION);
1492         EXPP_ADDCONST(GL_TEXTURE);
1493
1494         EXPP_ADDCONST(GL_COLOR);
1495         EXPP_ADDCONST(GL_DEPTH);
1496         EXPP_ADDCONST(GL_STENCIL);
1497
1498         EXPP_ADDCONST(GL_COLOR_INDEX);
1499         EXPP_ADDCONST(GL_STENCIL_INDEX);
1500         EXPP_ADDCONST(GL_DEPTH_COMPONENT);
1501         EXPP_ADDCONST(GL_RED);
1502         EXPP_ADDCONST(GL_GREEN);
1503         EXPP_ADDCONST(GL_BLUE);
1504         EXPP_ADDCONST(GL_ALPHA);
1505         EXPP_ADDCONST(GL_RGB);
1506         EXPP_ADDCONST(GL_RGBA);
1507         EXPP_ADDCONST(GL_LUMINANCE);
1508         EXPP_ADDCONST(GL_LUMINANCE_ALPHA);
1509
1510         EXPP_ADDCONST(GL_BITMAP);
1511
1512         EXPP_ADDCONST(GL_POINT);
1513         EXPP_ADDCONST(GL_LINE);
1514         EXPP_ADDCONST(GL_FILL);
1515
1516         EXPP_ADDCONST(GL_RENDER);
1517         EXPP_ADDCONST(GL_FEEDBACK);
1518         EXPP_ADDCONST(GL_SELECT);
1519
1520         EXPP_ADDCONST(GL_FLAT);
1521         EXPP_ADDCONST(GL_SMOOTH);
1522
1523         EXPP_ADDCONST(GL_KEEP);
1524         EXPP_ADDCONST(GL_REPLACE);
1525         EXPP_ADDCONST(GL_INCR);
1526         EXPP_ADDCONST(GL_DECR);
1527
1528         EXPP_ADDCONST(GL_VENDOR);
1529         EXPP_ADDCONST(GL_RENDERER);
1530         EXPP_ADDCONST(GL_VERSION);
1531         EXPP_ADDCONST(GL_EXTENSIONS);
1532
1533         EXPP_ADDCONST(GL_S);
1534         EXPP_ADDCONST(GL_T);
1535         EXPP_ADDCONST(GL_R);
1536         EXPP_ADDCONST(GL_Q);
1537
1538         EXPP_ADDCONST(GL_MODULATE);
1539         EXPP_ADDCONST(GL_DECAL);
1540
1541         EXPP_ADDCONST(GL_TEXTURE_ENV_MODE);
1542         EXPP_ADDCONST(GL_TEXTURE_ENV_COLOR);
1543
1544         EXPP_ADDCONST(GL_TEXTURE_ENV);
1545
1546         EXPP_ADDCONST(GL_EYE_LINEAR);
1547         EXPP_ADDCONST(GL_OBJECT_LINEAR);
1548         EXPP_ADDCONST(GL_SPHERE_MAP);
1549
1550         EXPP_ADDCONST(GL_TEXTURE_GEN_MODE);
1551         EXPP_ADDCONST(GL_OBJECT_PLANE);
1552         EXPP_ADDCONST(GL_EYE_PLANE);
1553
1554         EXPP_ADDCONST(GL_NEAREST);
1555         EXPP_ADDCONST(GL_LINEAR);
1556
1557         EXPP_ADDCONST(GL_NEAREST_MIPMAP_NEAREST);
1558         EXPP_ADDCONST(GL_LINEAR_MIPMAP_NEAREST);
1559         EXPP_ADDCONST(GL_NEAREST_MIPMAP_LINEAR);
1560         EXPP_ADDCONST(GL_LINEAR_MIPMAP_LINEAR);
1561
1562         EXPP_ADDCONST(GL_TEXTURE_MAG_FILTER);
1563         EXPP_ADDCONST(GL_TEXTURE_MIN_FILTER);
1564         EXPP_ADDCONST(GL_TEXTURE_WRAP_S);
1565         EXPP_ADDCONST(GL_TEXTURE_WRAP_T);
1566
1567         EXPP_ADDCONST(GL_CLAMP);
1568         EXPP_ADDCONST(GL_REPEAT);
1569
1570         EXPP_ADDCONST(GL_CLIP_PLANE0);
1571         EXPP_ADDCONST(GL_CLIP_PLANE1);
1572         EXPP_ADDCONST(GL_CLIP_PLANE2);
1573         EXPP_ADDCONST(GL_CLIP_PLANE3);
1574         EXPP_ADDCONST(GL_CLIP_PLANE4);
1575         EXPP_ADDCONST(GL_CLIP_PLANE5);
1576
1577         EXPP_ADDCONST(GL_LIGHT0);
1578         EXPP_ADDCONST(GL_LIGHT1);
1579         EXPP_ADDCONST(GL_LIGHT2);
1580         EXPP_ADDCONST(GL_LIGHT3);
1581         EXPP_ADDCONST(GL_LIGHT4);
1582         EXPP_ADDCONST(GL_LIGHT5);
1583         EXPP_ADDCONST(GL_LIGHT6);
1584         EXPP_ADDCONST(GL_LIGHT7);
1585         
1586         EXPP_ADDCONST(GL_POLYGON_OFFSET_UNITS);
1587         EXPP_ADDCONST(GL_POLYGON_OFFSET_POINT);
1588         EXPP_ADDCONST(GL_POLYGON_OFFSET_LINE);
1589         EXPP_ADDCONST(GL_POLYGON_OFFSET_FILL);
1590         EXPP_ADDCONST(GL_POLYGON_OFFSET_FACTOR);
1591         
1592         EXPP_ADDCONST(GL_TEXTURE_PRIORITY);
1593         EXPP_ADDCONST(GL_TEXTURE_RESIDENT);
1594         EXPP_ADDCONST(GL_TEXTURE_BINDING_1D);
1595         EXPP_ADDCONST(GL_TEXTURE_BINDING_2D);
1596       
1597         return mod;
1598 }
1599