SV *type_pkg;
SV *type_meth;
#endif /* !MULTIPLICITY */
- OP *(*old_pp_padsv)(pTHX);
+ OP *(*old_pp)(pTHX);
} lt_op_info;
-STATIC void lt_map_store(pTHX_ const OP *o, SV *orig_pkg, SV *type_pkg, SV *type_meth, OP *(*old_pp_padsv)(pTHX)) {
+STATIC void lt_map_store(pTHX_ const OP *o, SV *orig_pkg, SV *type_pkg, SV *type_meth, OP *(*old_pp)(pTHX)) {
#define lt_map_store(O, OP, TP, TM, PP) lt_map_store(aTHX_ (O), (OP), (TP), (TM), (PP))
lt_op_info *oi;
oi->type_meth = type_meth;
#endif /* !MULTIPLICITY */
- oi->old_pp_padsv = old_pp_padsv;
+ oi->old_pp = old_pp;
LT_UNLOCK(<_op_map_mutex);
}
FREETMPS;
LEAVE;
- return oi.old_pp_padsv(aTHX);
+ return oi.old_pp(aTHX);
}
return PL_op->op_ppaddr(aTHX);
LT_LOCK(<_op_map_mutex);
oi = ptable_fetch(lt_op_map, o);
if (oi) {
- oi->old_pp_padsv = o->op_ppaddr;
- o->op_ppaddr = lt_pp_padsv;
+ oi->old_pp = o->op_ppaddr;
+ o->op_ppaddr = lt_pp_padsv;
}
LT_UNLOCK(<_op_map_mutex);
}