
/*
 * *********** WARNING **************
 * This file generated by Embperl::WrapXS/2.0.0
 * Any changes made here will be lost
 * ***********************************
 * 1. /opt/perlt5.8.7/lib/site_perl/5.8.7/ExtUtils/XSBuilder/WrapXS.pm:52
 * 2. /opt/perlt5.8.7/lib/site_perl/5.8.7/ExtUtils/XSBuilder/WrapXS.pm:2068
 * 3. xsbuilder/xs_generate.pl:6
 */


#include "ep.h"

#include "epmacro.h"

#include "epdat2.h"

#include "eptypes.h"

#include "eppublic.h"

#include "EXTERN.h"

#include "perl.h"

#include "XSUB.h"

#include "ep_xs_sv_convert.h"

#include "ep_xs_typedefs.h"



void Embperl__App__Config_destroy (pTHX_ Embperl__App__Config  obj) {
            if (obj -> pSessionArgs)
                SvREFCNT_dec(obj -> pSessionArgs);
            if (obj -> pSessionClasses)
                SvREFCNT_dec(obj -> pSessionClasses);
            if (obj -> pObjectAddpathAV)
                SvREFCNT_dec(obj -> pObjectAddpathAV);
            if (obj -> pObjectReqpathAV)
                SvREFCNT_dec(obj -> pObjectReqpathAV);

};



void Embperl__App__Config_new_init (pTHX_ Embperl__App__Config  obj, SV * item, int overwrite) {

    SV * * tmpsv ;

    if (SvTYPE(item) == SVt_PVMG) 
        memcpy (obj, (void *)SvIVX(item), sizeof (*obj)) ;
    else if (SvTYPE(item) == SVt_PVHV) {
        if ((tmpsv = hv_fetch((HV *)item, "app_name", sizeof("app_name") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sAppName = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sAppName = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "app_handler_class", sizeof("app_handler_class") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sAppHandlerClass = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sAppHandlerClass = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "session_handler_class", sizeof("session_handler_class") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sSessionHandlerClass = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sSessionHandlerClass = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "session_args", sizeof("session_args") - 1, 0)) || overwrite) {
            HV * tmpobj = ((HV *)epxs_sv2_HVREF((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> pSessionArgs = (HV *)SvREFCNT_inc(tmpobj);
            else
                obj -> pSessionArgs = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "session_classes", sizeof("session_classes") - 1, 0)) || overwrite) {
            AV * tmpobj = ((AV *)epxs_sv2_AVREF((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> pSessionClasses = (AV *)SvREFCNT_inc(tmpobj);
            else
                obj -> pSessionClasses = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "session_config", sizeof("session_config") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sSessionConfig = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sSessionConfig = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "cookie_name", sizeof("cookie_name") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sCookieName = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sCookieName = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "cookie_domain", sizeof("cookie_domain") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sCookieDomain = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sCookieDomain = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "cookie_path", sizeof("cookie_path") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sCookiePath = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sCookiePath = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "cookie_expires", sizeof("cookie_expires") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sCookieExpires = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sCookieExpires = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "cookie_secure", sizeof("cookie_secure") - 1, 0)) || overwrite) {
            obj -> bCookieSecure = (bool)epxs_sv2_IV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)) ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "log", sizeof("log") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sLog = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sLog = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "debug", sizeof("debug") - 1, 0)) || overwrite) {
            obj -> bDebug = (unsigned)epxs_sv2_UV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)) ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mailhost", sizeof("mailhost") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sMailhost = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sMailhost = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mailhelo", sizeof("mailhelo") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sMailhelo = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sMailhelo = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mailfrom", sizeof("mailfrom") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sMailfrom = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sMailfrom = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "maildebug", sizeof("maildebug") - 1, 0)) || overwrite) {
            obj -> bMaildebug = (bool)epxs_sv2_IV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)) ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mail_errors_to", sizeof("mail_errors_to") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sMailErrorsTo = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sMailErrorsTo = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mail_errors_limit", sizeof("mail_errors_limit") - 1, 0)) || overwrite) {
            obj -> nMailErrorsLimit = (int)epxs_sv2_IV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)) ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mail_errors_reset_time", sizeof("mail_errors_reset_time") - 1, 0)) || overwrite) {
            obj -> nMailErrorsResetTime = (int)epxs_sv2_IV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)) ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "mail_errors_resend_time", sizeof("mail_errors_resend_time") - 1, 0)) || overwrite) {
            obj -> nMailErrorsResendTime = (int)epxs_sv2_IV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)) ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_base", sizeof("object_base") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sObjectBase = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sObjectBase = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_app", sizeof("object_app") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sObjectApp = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sObjectApp = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_addpath", sizeof("object_addpath") - 1, 0)) || overwrite) {
            AV * tmpobj = ((AV *)epxs_sv2_AVREF((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> pObjectAddpathAV = (AV *)SvREFCNT_inc(tmpobj);
            else
                obj -> pObjectAddpathAV = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_reqpath", sizeof("object_reqpath") - 1, 0)) || overwrite) {
            AV * tmpobj = ((AV *)epxs_sv2_AVREF((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> pObjectReqpathAV = (AV *)SvREFCNT_inc(tmpobj);
            else
                obj -> pObjectReqpathAV = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_stopdir", sizeof("object_stopdir") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sObjectStopdir = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sObjectStopdir = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_fallback", sizeof("object_fallback") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sObjectFallback = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sObjectFallback = NULL ;
        }
        if ((tmpsv = hv_fetch((HV *)item, "object_handler_class", sizeof("object_handler_class") - 1, 0)) || overwrite) {
            char * tmpobj = ((char *)epxs_sv2_PV((tmpsv && *tmpsv?*tmpsv:&PL_sv_undef)));
            if (tmpobj)
                obj -> sObjectHandlerClass = (char *)ep_pstrdup(obj->pPool,tmpobj);
            else
                obj -> sObjectHandlerClass = NULL ;
        }
   ; }

    else
        croak ("initializer for Embperl::App::Config::new is not a hash or object reference") ;

} ;


MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
app_name(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sAppName;

    if (items > 1) {
        obj->sAppName = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
app_handler_class(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sAppHandlerClass;

    if (items > 1) {
        obj->sAppHandlerClass = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
session_handler_class(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sSessionHandlerClass;

    if (items > 1) {
        obj->sSessionHandlerClass = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

HV *
session_args(obj, val=NULL)
    Embperl::App::Config obj
    HV * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (HV *)  obj->pSessionArgs;

    if (items > 1) {
        obj->pSessionArgs = (HV *)SvREFCNT_inc(val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

AV *
session_classes(obj, val=NULL)
    Embperl::App::Config obj
    AV * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (AV *)  obj->pSessionClasses;

    if (items > 1) {
        obj->pSessionClasses = (AV *)SvREFCNT_inc(val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
session_config(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sSessionConfig;

    if (items > 1) {
        obj->sSessionConfig = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
cookie_name(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sCookieName;

    if (items > 1) {
        obj->sCookieName = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
cookie_domain(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sCookieDomain;

    if (items > 1) {
        obj->sCookieDomain = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
cookie_path(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sCookiePath;

    if (items > 1) {
        obj->sCookiePath = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
cookie_expires(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sCookieExpires;

    if (items > 1) {
        obj->sCookieExpires = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

bool
cookie_secure(obj, val=0)
    Embperl::App::Config obj
    bool val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (bool)  obj->bCookieSecure;

    if (items > 1) {
        obj->bCookieSecure = (bool) val;
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
log(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sLog;

    if (items > 1) {
        obj->sLog = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

unsigned
debug(obj, val=0)
    Embperl::App::Config obj
    unsigned val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (unsigned)  obj->bDebug;

    if (items > 1) {
        obj->bDebug = (unsigned) val;
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
mailhost(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sMailhost;

    if (items > 1) {
        obj->sMailhost = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
mailhelo(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sMailhelo;

    if (items > 1) {
        obj->sMailhelo = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
mailfrom(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sMailfrom;

    if (items > 1) {
        obj->sMailfrom = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

bool
maildebug(obj, val=0)
    Embperl::App::Config obj
    bool val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (bool)  obj->bMaildebug;

    if (items > 1) {
        obj->bMaildebug = (bool) val;
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
mail_errors_to(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sMailErrorsTo;

    if (items > 1) {
        obj->sMailErrorsTo = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

int
mail_errors_limit(obj, val=0)
    Embperl::App::Config obj
    int val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (int)  obj->nMailErrorsLimit;

    if (items > 1) {
        obj->nMailErrorsLimit = (int) val;
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

int
mail_errors_reset_time(obj, val=0)
    Embperl::App::Config obj
    int val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (int)  obj->nMailErrorsResetTime;

    if (items > 1) {
        obj->nMailErrorsResetTime = (int) val;
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

int
mail_errors_resend_time(obj, val=0)
    Embperl::App::Config obj
    int val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (int)  obj->nMailErrorsResendTime;

    if (items > 1) {
        obj->nMailErrorsResendTime = (int) val;
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
object_base(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sObjectBase;

    if (items > 1) {
        obj->sObjectBase = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
object_app(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sObjectApp;

    if (items > 1) {
        obj->sObjectApp = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

AV *
object_addpath(obj, val=NULL)
    Embperl::App::Config obj
    AV * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (AV *)  obj->pObjectAddpathAV;

    if (items > 1) {
        obj->pObjectAddpathAV = (AV *)SvREFCNT_inc(val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

AV *
object_reqpath(obj, val=NULL)
    Embperl::App::Config obj
    AV * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (AV *)  obj->pObjectReqpathAV;

    if (items > 1) {
        obj->pObjectReqpathAV = (AV *)SvREFCNT_inc(val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
object_stopdir(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sObjectStopdir;

    if (items > 1) {
        obj->sObjectStopdir = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
object_fallback(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sObjectFallback;

    if (items > 1) {
        obj->sObjectFallback = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 

char *
object_handler_class(obj, val=NULL)
    Embperl::App::Config obj
    char * val
  PREINIT:
    /*nada*/

  CODE:
    RETVAL = (char *)  obj->sObjectHandlerClass;

    if (items > 1) {
        obj->sObjectHandlerClass = (char *)ep_pstrdup(obj->pPool,val);
    }
  OUTPUT:
    RETVAL

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 



SV *
new (class,initializer=NULL)
    char * class
    SV * initializer 
PREINIT:
    SV * svobj ;
    Embperl__App__Config  cobj ;
    SV * tmpsv ;
CODE:
    epxs_Embperl__App__Config_create_obj(cobj,svobj,RETVAL,malloc(sizeof(*cobj))) ;

    if (initializer) {
        if (!SvROK(initializer) || !(tmpsv = SvRV(initializer))) 
            croak ("initializer for Embperl::App::Config::new is not a reference") ;

        if (SvTYPE(tmpsv) == SVt_PVHV || SvTYPE(tmpsv) == SVt_PVMG)  
            Embperl__App__Config_new_init (aTHX_ cobj, tmpsv, 0) ;
        else if (SvTYPE(tmpsv) == SVt_PVAV) {
            int i ;
            SvGROW(svobj, sizeof (*cobj) * av_len((AV *)tmpsv)) ;     
            for (i = 0; i <= av_len((AV *)tmpsv); i++) {
                SV * * itemrv = av_fetch((AV *)tmpsv, i, 0) ;
                SV * item ;
                if (!itemrv || !*itemrv || !SvROK(*itemrv) || !(item = SvRV(*itemrv))) 
                    croak ("array element of initializer for Embperl::App::Config::new is not a reference") ;
                Embperl__App__Config_new_init (aTHX_ &cobj[i], item, 1) ;
            }
        }
        else {
             croak ("initializer for Embperl::App::Config::new is not a hash/array/object reference") ;
        }
    }
OUTPUT:
    RETVAL 

MODULE = Embperl::App::Config    PACKAGE = Embperl::App::Config 



void
DESTROY (obj)
    Embperl::App::Config  obj 
CODE:
    Embperl__App__Config_destroy (aTHX_ obj) ;

PROTOTYPES: disabled

BOOT:
    items = items; /* -Wall */

