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]