Help for this page

Select Code to Download


  1. or download this
    TYPEMAP
    const char * T_PV
    ...
      ANY OBJECT
       $var = ($type) SvIV((SV*)SvRV($arg));
    
  2. or download this
    XS(XS_Test_TestMethod)
    {
    ...
            char*   CLASS = (char *)SvPV(ST(0),PL_na);
            pstruct *  param1;
    
  3. or download this
    XS(XS_Test_TestMethod)
    {
    ...
            char*    CLASS = (char *)SvPV_nolen(ST(0));
            pstruct *  param1 = (pstruct *) SvIV((SV*)SvRV(ST(1)));