1 files changed, 1 insertions, 1 deletions
diff --git a/dump.c b/dump.c
index 2acc7e1d4d..06ce87992a 100644
--- a/dump.c
+++ b/dump.c
@@ -2109,7 +2109,7 @@ Perl_runops_debug(pTHX)
 	    if (DEBUG_t_TEST_) debop(PL_op);
 	    if (DEBUG_P_TEST_) debprof(PL_op);
 	}
-    } while ((PL_op = CALL_FPTR(PL_op->op_ppaddr)(aTHX)));
+    } while ((PL_op = PL_op->op_ppaddr(aTHX)));
     DEBUG_l(Perl_deb(aTHX_ "leaving RUNOPS level\n"));
 
     TAINT_NOT;