temporary variable not wide enough to hold all the bits in

op->op_targ

p4raw-id: //depot/perl@16180

diff --git a/op.c b/op.c
index f474031..4f84f9a 100644 (file)
--- a/op.c
+++ b/op.c
@@ -4241,7 +4241,7 @@ Perl_newFOROP(pTHX_ I32 flags,char *label,line_t forline,OP *sv,OP *expr,OP *blo
 {
     LOOP *loop;
     OP *wop;
-    int padoff = 0;
+    PADOFFSET padoff = 0;
     I32 iterflags = 0;
 
     if (sv) {