diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2002-04-26 00:41:39 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2002-04-26 00:41:39 +0000 |
| commit | 7c436af33814ce716234caa65f470fe47c2a0efa (patch) | |
| tree | e51dccce04c0b8b80a5b9b4734b273846081317e /ext/B | |
| parent | 530b72baaecf6b4faf758663fc0fded0f4426004 (diff) | |
| download | perl-7c436af33814ce716234caa65f470fe47c2a0efa.tar.gz | |
various signed/unsigned mismatch nits
p4raw-id: //depot/perl@16173
Diffstat (limited to 'ext/B')
| -rw-r--r-- | ext/B/B.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/B.xs b/ext/B/B.xs index 6392b9b2cc..111116a21b 100644 --- a/ext/B/B.xs +++ b/ext/B/B.xs @@ -668,7 +668,7 @@ OP_ppaddr(o) CODE: sv_setpvn(sv, "PL_ppaddr[OP_", 13); sv_catpv(sv, PL_op_name[o->op_type]); - for (i=13; i<SvCUR(sv); ++i) + for (i=13; (STRLEN)i < SvCUR(sv); ++i) SvPVX(sv)[i] = toUPPER(SvPVX(sv)[i]); sv_catpv(sv, "]"); ST(0) = sv; |