summaryrefslogtreecommitdiff
path: root/src/if_perl.xs
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2013-02-06 19:58:43 +0100
committerBram Moolenaar <Bram@vim.org>2013-02-06 19:58:43 +0100
commite9d47cd08b0272ec278f03bb1be21f087ce63af6 (patch)
tree02d81fd1119715995d8e44dd3e428423ca3084a3 /src/if_perl.xs
parent07e1da6bbdf4a2a98c4645868225ffad6df5ae3b (diff)
downloadvim-git-e9d47cd08b0272ec278f03bb1be21f087ce63af6.tar.gz
updated for version 7.3.806v7.3.806
Problem: Compiler warnings in Perl code when building with Visual studio 2012. (skeept) Solution: Add type casts. (Christian Brabandt, 2013 Jan 30)
Diffstat (limited to 'src/if_perl.xs')
-rw-r--r--src/if_perl.xs20
1 files changed, 10 insertions, 10 deletions
diff --git a/src/if_perl.xs b/src/if_perl.xs
index f0baabff6..cdfac905c 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -1048,7 +1048,7 @@ Buffers(...)
{
SV *sv = ST(i);
if (SvIOK(sv))
- b = SvIV(ST(i));
+ b = (int) SvIV(ST(i));
else
{
char_u *pat;
@@ -1091,7 +1091,7 @@ Windows(...)
{
for (i = 0; i < items; i++)
{
- w = SvIV(ST(i));
+ w = (int) SvIV(ST(i));
vimwin = win_find_nr(w);
if (vimwin)
XPUSHs(newWINrv(newSV(0), vimwin));
@@ -1154,8 +1154,8 @@ Cursor(win, ...)
if (!win_valid(win))
win = curwin;
- lnum = SvIV(ST(1));
- col = SvIV(ST(2));
+ lnum = (int) SvIV(ST(1));
+ col = (int) SvIV(ST(2));
win->w_cursor.lnum = lnum;
win->w_cursor.col = col;
check_cursor(); /* put cursor on an existing line */
@@ -1216,7 +1216,7 @@ Get(vimbuf, ...)
{
for (i = 1; i < items; i++)
{
- lnum = SvIV(ST(i));
+ lnum = (long) SvIV(ST(i));
if (lnum > 0 && lnum <= vimbuf->b_ml.ml_line_count)
{
line = ml_get_buf(vimbuf, lnum, FALSE);
@@ -1239,7 +1239,7 @@ Set(vimbuf, ...)
if (items < 3)
croak("Usage: VIBUF::Set(vimbuf, lnum, @lines)");
- lnum = SvIV(ST(1));
+ lnum = (long) SvIV(ST(1));
for(i = 2; i < items; i++, lnum++)
{
line = SvPV(ST(i),PL_na);
@@ -1274,13 +1274,13 @@ Delete(vimbuf, ...)
{
if (items == 2)
{
- lnum = SvIV(ST(1));
+ lnum = (long) SvIV(ST(1));
count = 1;
}
else if (items == 3)
{
- lnum = SvIV(ST(1));
- count = 1 + SvIV(ST(2)) - lnum;
+ lnum = (long) SvIV(ST(1));
+ count = (long) 1 + SvIV(ST(2)) - lnum;
if (count == 0)
count = 1;
if (count < 0)
@@ -1331,7 +1331,7 @@ Append(vimbuf, ...)
if (items < 3)
croak("Usage: VIBUF::Append(vimbuf, lnum, @lines)");
- lnum = SvIV(ST(1));
+ lnum = (long) SvIV(ST(1));
for (i = 2; i < items; i++, lnum++)
{
line = SvPV(ST(i),PL_na);