1 files changed, 1 insertions, 1 deletions

diff --git a/run.c b/run.c
index b2acf995f6..97444ec58e 100644
--- a/run.c
+++ b/run.c
@@ -17,7 +17,7 @@
  */
 
 #ifdef PERL_OBJECT
-#define CALLOP this->*op
+#define CALLOP this->*PL_op
 #else
 #define CALLOP *PL_op
 #endif