# 
# /*
#  * *********** WARNING **************
#  * This file generated by Embperl::WrapXS/2.0.0
#  * Any changes made here will be lost
#  * ***********************************
#  * 1. /usr/share/perl5/ExtUtils/XSBuilder/WrapXS.pm:52
#  * 2. /usr/share/perl5/ExtUtils/XSBuilder/WrapXS.pm:2070
#  * 3. xsbuilder/xs_generate.pl:6
#  */
# 

CV *	T_SVPTR
Embperl::Req::Param	T_MAGICHASH_SV
Embperl::CacheItem	T_MAGICHASH_SV
Embperl::Component::Config	T_MAGICHASH_SV
unsigned long	T_UV
Embperl::Component::Output	T_MAGICHASH_SV
Embperl::Syntax	T_MAGICHASH_SV
Apache::Server	T_PTROBJ
const void *	T_PTR
Embperl::App::Config	T_MAGICHASH_SV
size_t	T_IV
Embperl::Thread	T_MAGICHASH_SV
Embperl::App	T_MAGICHASH_SV
time_t	T_NV
bool	T_IV
Embperl::Component	T_MAGICHASH_SV
Embperl::Req::Config	T_MAGICHASH_SV
clock_t *	T_IV
Embperl::Component::Param	T_MAGICHASH_SV
Apache	T_PTROBJ
void	T_VOID
Embperl::Req	T_MAGICHASH_SV
const clock_t *	T_IV
const time_t *	T_NV
tIndex	T_IV
char	T_CHAR
HV *	T_HVREF
unsigned int	T_UV
const pid_t *	T_IV
long int	T_IV
const gid_t *	T_IV
SV *	T_SVPTR
char const *	T_PV
void *	T_PTR
tNode	T_IV
char *	T_PV
time_t *	T_NV
const off_t *	T_IV
const char *	T_PV
unsigned	T_UV
I32	T_IV
pid_t	T_IV
uid_t	T_IV
unsigned char *	T_PV
const unsigned char	T_U_CHAR
gid_t	T_IV
STRLEN	T_IV
off_t	T_IV
tPhase	T_IV
const uid_t *	T_IV
const char	T_CHAR
tRepeatLevel	T_IV
unsigned char	T_U_CHAR
long	T_IV
pid_t *	T_IV
uid_t *	T_IV
AV *	T_AVREF
int	T_IV
SV	T_SV
gid_t *	T_IV
clock_t	T_IV
const unsigned char *	T_PV
off_t *	T_IV
const size_t *	T_IV
signed int	T_IV

INPUT
T_SVPTR
        $var = ($type)epxs_sv2_SVPTR($arg)

T_MAGICHASH_SV
    {
    MAGIC * mg ;
    if ((mg = mg_find (SvRV($arg), '~')))
        $var = *(($type *)(mg -> mg_ptr)) ;
    else
        croak (\"$var is not of type $type\") ;
    }


T_HVREF
        $var = epxs_sv2_HVREF($arg)

T_PVnull
        $var = ($type)epxs_sv2_PVnull($arg)

T_AVREF
        $var = epxs_sv2_AVREF($arg)


OUTPUT
T_SVPTR
        $arg = SvREFCNT_inc (epxs_SVPTR_2obj($var));

T_MAGICHASH_SV
    if ($var -> _perlsv) $arg = $var -> _perlsv ; else $arg = &sv_undef ;

T_HVREF
        $arg = SvREFCNT_inc (epxs_HVREF_2obj($var));

T_PVnull
        $arg = SvREFCNT_inc (epxs_PVnull_2obj($var));

T_AVREF
        $arg = SvREFCNT_inc (epxs_AVREF_2obj($var));