Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
42 lines (31 sloc) 597 Bytes
TYPEMAP
const unsigned char * T_PV
Display * T_PTR
GLsizei T_INT
GLfloat T_FLOAT
GLdouble T_DOUBLE
GLclampf T_FLOAT
GLclampd T_DOUBLE
GLint T_INT
GLuint T_U_INT
GLushort T_U_SHORT
GLint T_INT
GLbyte T_INT
GLubyte T_U_INT
GLshort T_SHORT
GLboolean T_BOOL
GLenum T_INT
GLbitfield T_INT
GLcharARB T_CHAR
GLhandleARB T_U_INT
GLUnurbsObj * T_PTROBJ
GLUquadricObj * T_PTROBJ
PGLUtess * T_PTROBJ
OpenGL::Array T_PTROBJ
GLXDrawable T_PTR
INPUT
T_FASTPTROBJ
$var = INT2PTR($type,SvIV($arg));
OUTPUT
T_FASTPTROBJ
sv_setref_pv($arg, \"${ntype}\", (void*)$var);