2 proc main
{argc argv
} {
4 puts stderr
"syntax is: [info script] output.h"
8 set fd
[open [lindex $argv 0] w
]
10 /*OpenGL primitive typedefs*/
11 typedef unsigned int GLenum;
12 typedef unsigned char GLboolean;
13 typedef unsigned int GLbitfield;
14 typedef signed char GLbyte;
15 typedef short GLshort;
18 typedef unsigned char GLubyte;
19 typedef unsigned short GLushort;
20 typedef unsigned int GLuint;
21 typedef float GLfloat;
22 typedef float GLclampf;
23 typedef double GLdouble;
24 typedef double GLclampd;
27 typedef long GLintptr;
28 typedef long GLsizeiptr;