c->namelen = 0;
c->proto = NULL;
c->protolen = 0;
- c->check = 0;
+ c->call = 0;
c->ref = 0;
c->ud = NULL;
}
dupe->protolen = len;
- dupe->check = orig->check;
- dupe->ref = orig->ref;
- dupe->ud = orig->ud;
+ dupe->call = orig->call;
+ dupe->ref = orig->ref;
+ dupe->ud = orig->ud;
return dupe;
}
GvCV(gv) = NULL;
}
- if (c->check)
- o = CALL_FPTR(c->check)(aTHX_ o, c->ud);
+ if (c->call)
+ o = CALL_FPTR(c->call)(aTHX_ o, c->ud);
}
}
return NOT_IN_PAD;
}
-STATIC OP *sols_check(pTHX_ OP *o, void *ud_) {
+STATIC OP *sols_call(pTHX_ OP *o, void *ud_) {
OP *gvop, *last_arg, *rv2cv;
SV *cv = ud_;
GV *gv;
if (SvPOK(cb)) { /* Sub is prototyped */
c.proto = SvPV_const(cb, c.protolen);
}
- c.check = sols_check;
+ c.call = sols_call;
c.ud = SvREFCNT_inc(cb);
sub_op_register(aTHX_ &c, 0);
}