diff options
| author | Daniel Dragan <bulk88@hotmail.com> | 2014-10-06 04:04:05 -0400 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2014-10-06 06:03:01 -0700 |
| commit | b304119758005f7ab21373539113204710b204cd (patch) | |
| tree | 2b387eeeb7970962e8a8e3d87e7bfc78ffac6454 /sv.c | |
| parent | 3188a8216e19cb1020af7615e3178daab8a865d6 (diff) | |
| download | perl-b304119758005f7ab21373539113204710b204cd.tar.gz | |
silence some compiler warnings on VC6
sv.c and toke.c have the following warnings on VC6 but not VC 2003
(and probably newer too), example
..\toke.c(3149) : warning C4761: integral size mismatch in argument;
conversion supplied
find_default_stash (commit 90aeefb473 )& gv_magicalize (commit 71c35c050e )
..\gv.c(1680) : warning C4028: formal parameter 6 different from declaration
..\gv.c(1783) : warning C4028: formal parameter 6 different from declaration
not all VC6 compiler warnings are fixed by this patch
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -15344,7 +15344,7 @@ S_find_uninit_var(pTHX_ const OP *const obase, const SV *const uninit_sv, if (match && subscript_type == FUV_SUBSCRIPT_WITHIN) break; - return varname(gv, hash ? '%' : '@', obase->op_targ, + return varname(gv, (char)(hash ? '%' : '@'), obase->op_targ, keysv, index, subscript_type); } @@ -15500,8 +15500,8 @@ S_find_uninit_var(pTHX_ const OP *const obase, const SV *const uninit_sv, if (match) break; return varname(gv, - (o->op_type == OP_PADAV || o->op_type == OP_RV2AV) - ? '@' : '%', + (char)((o->op_type == OP_PADAV || o->op_type == OP_RV2AV) + ? '@' : '%'), o->op_targ, NULL, 0, FUV_SUBSCRIPT_WITHIN); } NOT_REACHED; /* NOTREACHED */ |