summaryrefslogtreecommitdiff
path: root/cop.h
diff options
context:
space:
mode:
authorArtur Bergman <sky@nanisky.com>2001-09-10 11:21:50 +0000
committerArtur Bergman <sky@nanisky.com>2001-09-10 11:21:50 +0000
commite830ead6522d515d0446426f6fbd3f73a7e49697 (patch)
tree064110a3612236f896f4e5b00efe0d3364b09303 /cop.h
parentba89bb6e6103c86c9d65d9485052b0ba8db5d064 (diff)
downloadperl-e830ead6522d515d0446426f6fbd3f73a7e49697.tar.gz
Silence another ITHREAD 64bit INT/32bit PTR warning.
p4raw-id: //depot/perl@11971
Diffstat (limited to 'cop.h')
-rw-r--r--cop.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/cop.h b/cop.h
index 1e0e5d8bd4..9f17b2c763 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) \