TYPEMAP PJS_Runtime * T_PTRREF PJS_Context * T_PTRREF PJS_Script * T_PTRREF JSFunction * T_PTROBJ PJS_TrapHandler * T_PTRREF jsval jsval OUTPUT jsval { SV *orz = sv_newmortal(); /* Convert js value to perl */ JSVALToSV(PJS_GetJSContext(cx), NULL, $var, &orz); sv_setsv($arg, orz); JS_GC(PJS_GetJSContext(cx)); }