summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2006-01-03 12:29:38 +0000
committerDave Mitchell <davem@fdisolutions.com>2006-01-03 12:29:38 +0000
commit36c7798d7abbe7dd4517943c1b5755ab4f2dda73 (patch)
treea878cfeb025bfa070cb318578d2b1092e723c440 /toke.c
parent2018a5c31a07546d28320839d66a2fd3f203fa85 (diff)
downloadperl-36c7798d7abbe7dd4517943c1b5755ab4f2dda73.tar.gz
silence some compiler warnings
p4raw-id: //depot/perl@26598
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c15
1 files changed, 8 insertions, 7 deletions
diff --git a/toke.c b/toke.c
index 6e22b33665..6a454ca0da 100644
--- a/toke.c
+++ b/toke.c
@@ -841,7 +841,7 @@ S_skipspace(pTHX_ register char *s)
sv_setpvn(sv,PL_bufptr,PL_bufend-PL_bufptr);
(void)SvIOK_on(sv);
SvIV_set(sv, 0);
- av_store(CopFILEAV(PL_curcop),(I32)CopLINE(PL_curcop),sv);
+ av_store(CopFILEAVx(PL_curcop),(I32)CopLINE(PL_curcop),sv);
}
}
}
@@ -2730,7 +2730,7 @@ Perl_yylex(pTHX)
sv_setsv(sv,PL_linestr);
(void)SvIOK_on(sv);
SvIV_set(sv, 0);
- av_store(CopFILEAV(PL_curcop),(I32)CopLINE(PL_curcop),sv);
+ av_store(CopFILEAVx(PL_curcop),(I32)CopLINE(PL_curcop),sv);
}
goto retry;
}
@@ -2817,7 +2817,7 @@ Perl_yylex(pTHX)
sv_setsv(sv,PL_linestr);
(void)SvIOK_on(sv);
SvIV_set(sv, 0);
- av_store(CopFILEAV(PL_curcop),(I32)CopLINE(PL_curcop),sv);
+ av_store(CopFILEAVx(PL_curcop),(I32)CopLINE(PL_curcop),sv);
}
PL_bufend = SvPVX(PL_linestr) + SvCUR(PL_linestr);
PL_last_lop = PL_last_uni = Nullch;
@@ -3805,7 +3805,7 @@ Perl_yylex(pTHX)
t++;
Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
"Multidimensional syntax %.*s not supported",
- (t - PL_bufptr) + 1, PL_bufptr);
+ (int)((t - PL_bufptr) + 1), PL_bufptr);
}
}
}
@@ -3910,7 +3910,8 @@ Perl_yylex(pTHX)
PL_bufptr = skipspace(PL_bufptr);
Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
"Scalar value %.*s better written as $%.*s",
- t-PL_bufptr, PL_bufptr, t-PL_bufptr-1, PL_bufptr+1);
+ (int)(t-PL_bufptr), PL_bufptr,
+ (int)(t-PL_bufptr-1), PL_bufptr+1);
}
}
}
@@ -9871,7 +9872,7 @@ S_scan_heredoc(pTHX_ register char *s)
sv_setsv(sv,PL_linestr);
(void)SvIOK_on(sv);
SvIV_set(sv, 0);
- av_store(CopFILEAV(PL_curcop), (I32)CopLINE(PL_curcop),sv);
+ av_store(CopFILEAVx(PL_curcop), (I32)CopLINE(PL_curcop),sv);
}
if (*s == term && memEQ(s,PL_tokenbuf,len)) {
STRLEN off = PL_bufend - 1 - SvPVX_const(PL_linestr);
@@ -10344,7 +10345,7 @@ S_scan_str(pTHX_ char *start, int keep_quoted, int keep_delims)
sv_setsv(sv,PL_linestr);
(void)SvIOK_on(sv);
SvIV_set(sv, 0);
- av_store(CopFILEAV(PL_curcop), (I32)CopLINE(PL_curcop), sv);
+ av_store(CopFILEAVx(PL_curcop), (I32)CopLINE(PL_curcop), sv);
}
/* having changed the buffer, we must update PL_bufend */