1 files changed, 1 insertions, 1 deletions
diff --git a/run.c b/run.c
index e66800195d..8c2622a277 100644
--- a/run.c
+++ b/run.c
@@ -37,7 +37,7 @@ int
 Perl_runops_standard(pTHX)
 {
     dVAR;
-    register OP *op = PL_op;
+    OP *op = PL_op;
     while ((PL_op = op = op->op_ppaddr(aTHX))) {
     }