HI,
    I have  a perl subroutine that is like
sub test {
    return ( 12, 34);
}

In my C++ code I'm doing this ...

routine1 () {
dSP;
ENTER;
SAVETMPS;
PUSHMARK(sp);
  XPUSHs(sv_2mortal(newSVpv(jStrChars, 0)));
PUTBACK;
n = perl_call_pv("genericInvoke", G_SCALAR);
   SPAGAIN;
  SV* sv2 = POPs;
   SV* sv1 = POPs;

}

------
When I test for sv1, it is not a scalar value??!! sv2 is just fine. 
returns the right value.

what am i missing?

thanks
Archana


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to