diff options
| author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2003-06-11 00:10:47 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-11 05:30:53 +0000 |
| commit | c5661c80adf757c3cf464bf5f538fe5082b73584 (patch) | |
| tree | 754239b76e77e56432158413eb352895e036a4b1 /sv.c | |
| parent | 5a1dd2ab5c9ca51eda95e7e0025702bdfcd91d9f (diff) | |
| download | perl-c5661c80adf757c3cf464bf5f538fe5082b73584.tar.gz | |
Integrate from maint:
[ 19738]
Subject: Re: [PATCH: maint @ 19733] CL compiler warnings on MSWin32
From: "Marcus Holland-Moritz" <mhx-perl@gmx.net>
Message-ID: <011701c32f8c$62d85ee0$0c2f1fac@R2D2>
p4raw-link: @19738 on //depot/perl: 5a1dd2ab5c9ca51eda95e7e0025702bdfcd91d9fon //depot/maint-5.8/perl: c43a4d73e4c3d92928dd743544b60e43ce02ee9c
p4raw-id: //depot/perl@19739
p4raw-integrated: from //depot/maint-5.8/perl@19738 'copy in'
ext/Encode/encengine.c (@18665..) ext/List/Util/Util.xs
(@18791..) ext/Storable/Storable.xs (@19551..)
ext/POSIX/POSIX.xs (@19704..) ext/threads/threads.xs (@19722..)
'merge in' ext/Thread/Thread.xs (@18145..) pp.h (@19400..) sv.c
(@19653..) perl.c (@19704..) op.c (@19732..)
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -5918,13 +5918,13 @@ Perl_sv_pos_b2u(pTHX_ register SV* sv, I32* offsetp) mg = mg_find(sv, PERL_MAGIC_utf8); if (mg && mg->mg_ptr) { cache = (STRLEN *) mg->mg_ptr; - if (cache[1] == *offsetp) { + if (cache[1] == (STRLEN)*offsetp) { /* An exact match. */ *offsetp = cache[0]; return; } - else if (cache[1] < *offsetp) { + else if (cache[1] < (STRLEN)*offsetp) { /* We already know part of the way. */ len = cache[0]; s += cache[1]; |