#include "xh_config.h"
#include "xh_core.h"
void
xh_param_assign_string(xh_char_t param[], SV *value)
{
xh_char_t *str;
if ( SvOK(value) ) {
str = XH_CHAR_CAST SvPV_nolen(value);
xh_str_copy(param, str, XH_PARAM_LEN);
}
else {
*param = 0;
}
}
void
xh_param_assign_int(xh_char_t *name, xh_int_t *param, SV *value)
{
if ( !SvOK(value) )
croak("Parameter '%s' is undefined", name);
*param = SvIV(value);
}
xh_bool_t
xh_param_assign_bool(SV *value)
{
if ( SvTRUE(value) )
return TRUE;
return FALSE;
}