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);