diff options
| author | Bram Moolenaar <Bram@vim.org> | 2012-02-12 00:31:52 +0100 |
|---|---|---|
| committer | Bram Moolenaar <Bram@vim.org> | 2012-02-12 00:31:52 +0100 |
| commit | be7473442952f0d9f3a05c62780cd99ec70516d9 (patch) | |
| tree | 79c255ed7450a9abdeeedee713178e4b14992d23 | |
| parent | a61d5fbf7ac9bfa0083faa926ad4015bf7125309 (diff) | |
| download | vim-git-be7473442952f0d9f3a05c62780cd99ec70516d9.tar.gz | |
updated for version 7.3.439v7.3.439
Problem: Compiler warnings to size casts in Perl interface.
Solution: Use XS macros. (James McCoy)
| -rw-r--r-- | src/if_perl.xs | 4 | ||||
| -rw-r--r-- | src/typemap | 2 | ||||
| -rw-r--r-- | src/version.c | 2 |
3 files changed, 5 insertions, 3 deletions
diff --git a/src/if_perl.xs b/src/if_perl.xs index e1e6ada22..9b8d2c2f6 100644 --- a/src/if_perl.xs +++ b/src/if_perl.xs @@ -611,7 +611,7 @@ newWINrv(rv, ptr) if (ptr->w_perl_private == NULL) { ptr->w_perl_private = newSV(0); - sv_setiv(ptr->w_perl_private, (IV)ptr); + sv_setiv(ptr->w_perl_private, PTR2IV(ptr)); } else SvREFCNT_inc(ptr->w_perl_private); @@ -629,7 +629,7 @@ newBUFrv(rv, ptr) if (ptr->b_perl_private == NULL) { ptr->b_perl_private = newSV(0); - sv_setiv(ptr->b_perl_private, (IV)ptr); + sv_setiv(ptr->b_perl_private, PTR2IV(ptr)); } else SvREFCNT_inc(ptr->b_perl_private); diff --git a/src/typemap b/src/typemap index 40049237b..ca1600ef2 100644 --- a/src/typemap +++ b/src/typemap @@ -6,7 +6,7 @@ INPUT T_VIOBJNOMUNGE if (sv_isa($arg, \"${ntype}\")) { IV tmp = SvIV((SV*)SvRV($arg)); - $var = ($type) tmp; + $var = INT2PTR($type, tmp); if (!tmp) croak(\"$ntype no longer exists\"); } diff --git a/src/version.c b/src/version.c index bce741c09..22a799826 100644 --- a/src/version.c +++ b/src/version.c @@ -715,6 +715,8 @@ static char *(features[]) = static int included_patches[] = { /* Add new patch number below this line */ /**/ + 439, +/**/ 438, /**/ 437, |