p4raw-id: //depot/ansiperl@211
return cv;
}
-
CV *
-newXS(name, subaddr, filename)
-char *name;
-void (*subaddr) _((CV*));
-char *filename;
+newXS(char *name, void (*subaddr) (CV *), char *filename)
{
dTHR;
GV *gv = gv_fetchpv(name ? name : "__ANON__", GV_ADDMULTI, SVt_PVCV);
PP(pp_specific)
{
- #ifdef USE_THREADS
- dSP;
+ djSP;
+ #ifdef USE_THREADS
SV **svp = av_fetch(thr->magicals, op->op_targ, FALSE);
if (!svp)
croak("panic: pp_specific");