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