From e830ead6522d515d0446426f6fbd3f73a7e49697 Mon Sep 17 00:00:00 2001 From: Artur Bergman Date: Mon, 10 Sep 2001 11:21:50 +0000 Subject: [PATCH] Silence another ITHREAD 64bit INT/32bit PTR warning. p4raw-id: //depot/perl@11971 --- cop.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cop.h b/cop.h index 1e0e5d8..9f17b2c 100644 --- a/cop.h +++ b/cop.h @@ -202,7 +202,7 @@ struct block_loop { # define CxITERVAR(c) \ ((c)->blk_loop.iterdata \ ? (CxPADLOOP(cx) \ - ? &((c)->blk_loop.oldcurpad)[(PADOFFSET)(c)->blk_loop.iterdata] \ + ? &((c)->blk_loop.oldcurpad)[INT2PTR(PADOFFSET, (c)->blk_loop.iterdata)] \ : &GvSV((GV*)(c)->blk_loop.iterdata)) \ : (SV**)NULL) # define CX_ITERDATA_SET(cx,idata) \ -- 2.7.4