Change 34621 by [EMAIL PROTECTED] on 2008/10/28 19:51:07
A couple of (COP*)s that can actually be (const COP *)s.
Affected files ...
... //depot/perl/cop.h#183 edit
Differences ...
==== //depot/perl/cop.h#183 (text) ====
Index: perl/cop.h
--- perl/cop.h#182~34610~ 2008-10-27 14:43:01.000000000 -0700
+++ perl/cop.h 2008-10-28 12:51:07.000000000 -0700
@@ -298,8 +298,8 @@
#define PUSHSUB_BASE(cx) \
ENTRY_PROBE(GvENAME(CvGV(cv)), \
- CopFILE((COP*)CvSTART(cv)), \
- CopLINE((COP*)CvSTART(cv))); \
+ CopFILE((const COP *)CvSTART(cv)), \
+ CopLINE((const COP *)CvSTART(cv))); \
\
cx->blk_sub.cv = cv; \
cx->blk_sub.olddepth = CvDEPTH(cv); \
End of Patch.
