Get rid of CALL_FPTR

diff --git a/Types.xs b/Types.xs
index bb6c6a629eb071e7984acd3d860b70fb6e701cbd..b3412b55e66d8bf9f432121e169941724033a592 100644 (file)
--- a/Types.xs
+++ b/Types.xs
@@ -544,10 +544,10 @@ STATIC OP *lt_pp_padsv(pTHX) {
    LEAVE;
   }
 
-  return CALL_FPTR(oi.old_pp_padsv)(aTHX);
+  return oi.old_pp_padsv(aTHX);
  }
 
- return CALL_FPTR(PL_op->op_ppaddr)(aTHX);
+ return PL_op->op_ppaddr(aTHX);
 }
 
 /* ... Our ck_pad{any,sv} .................................................. */
@@ -564,7 +564,7 @@ STATIC OP *lt_ck_padany(pTHX_ OP *o) {
  SV *code;
  dMY_CXT;
 
- o = CALL_FPTR(lt_old_ck_padany)(aTHX_ o);
+ o = lt_old_ck_padany(aTHX_ o);
 
  stash = PL_in_my_stash;
  if (stash && (code = lt_hint())) {
@@ -643,7 +643,7 @@ STATIC OP *lt_ck_padsv(pTHX_ OP *o) {
 
  lt_map_delete(o);
 
- return CALL_FPTR(lt_old_ck_padsv)(aTHX_ o);
+ return lt_old_ck_padsv(aTHX_ o);
 }
 
 /* ... Our peephole optimizer .............................................. */