uint8_t *		T_PV
uint32_t *		T_PV

GLenum			T_IV
GLsize			T_UV
GLsizei			T_IV
GLint			T_IV
GLfloat			T_NV
GLdouble		T_NV

DC::Channel		T_IVOBJ
DC::RW			T_PTROBJ
DC::MixChunk		T_PTROBJ
DC::MixMusic		T_PTROBJ
DC::Font		T_PTROBJ
DC::Layout		T_PTROBJ
DC::Map			T_PTROBJ

INPUT

T_IVOBJ
        if (sv_derived_from ($arg, \"${ntype}\"))
          $var = SvIV (SvRV ($arg));
        else
          croak (\"$var is not of type ${ntype}\")

OUTPUT

T_IVOBJ
        sv_setref_iv ($arg, \"${ntype}\", $var);