summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGisle Aas <gisle@activestate.com>2006-01-04 10:25:42 +0000
committerGisle Aas <gisle@activestate.com>2006-01-04 10:25:42 +0000
commitfe8247ebb5b1d41f5123d00da404f1a03c6a9e78 (patch)
tree027b61f8291f1621fb4940dffd0df4c1dc39da86
parented3e35345042264d83e70f04a3168d38072ed0b8 (diff)
downloadperl-fe8247ebb5b1d41f5123d00da404f1a03c6a9e78.tar.gz
Silence compiler warning; ref change 26598
p4raw-id: //depot/perl@26633
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 8f8cb02cc2..54d8f6dfce 100644
--- a/op.c
+++ b/op.c
@@ -3504,7 +3504,7 @@ Perl_newSTATEOP(pTHX_ I32 flags, char *label, OP *o)
CopSTASH_set(cop, PL_curstash);
if (PERLDB_LINE && PL_curstash != PL_debstash) {
- SV * const * const svp = av_fetch(CopFILEAV(PL_curcop), (I32)CopLINE(cop), FALSE);
+ SV * const * const svp = av_fetch(CopFILEAVx(PL_curcop), (I32)CopLINE(cop), FALSE);
if (svp && *svp != &PL_sv_undef ) {
(void)SvIOK_on(*svp);
SvIV_set(*svp, PTR2IV(cop));