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/PerlIO | |
parent | 530b72baaecf6b4faf758663fc0fded0f4426004 (diff) | |
download | perl-7c436af33814ce716234caa65f470fe47c2a0efa.tar.gz |
various signed/unsigned mismatch nits
p4raw-id: //depot/perl@16173
Diffstat (limited to 'ext/PerlIO')
-rw-r--r-- | ext/PerlIO/encoding/encoding.xs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ext/PerlIO/encoding/encoding.xs b/ext/PerlIO/encoding/encoding.xs index c35e3b9837..bff16e73f6 100644 --- a/ext/PerlIO/encoding/encoding.xs +++ b/ext/PerlIO/encoding/encoding.xs @@ -317,7 +317,7 @@ PerlIOEncode_fill(pTHX_ PerlIO * f) if (SvLEN(e->dataSV) && SvPVX(e->dataSV)) { Safefree(SvPVX(e->dataSV)); } - if (use > e->base.bufsiz) { + if (use > (SSize_t)e->base.bufsiz) { if (e->flags & NEEDS_LINES) { /* Have to grow buffer */ e->base.bufsiz = use; @@ -427,7 +427,7 @@ PerlIOEncode_flush(pTHX_ PerlIO * f) PUTBACK; s = SvPV(str, len); count = PerlIO_write(PerlIONext(f),s,len); - if (count != len) { + if ((STRLEN)count != len) { code = -1; } FREETMPS; @@ -447,7 +447,7 @@ PerlIOEncode_flush(pTHX_ PerlIO * f) if (e->dataSV && SvCUR(e->dataSV)) { s = SvPV(e->dataSV, len); count = PerlIO_unread(PerlIONext(f),s,len); - if (count != len) { + if ((STRLEN)count != len) { code = -1; } } @@ -478,7 +478,7 @@ PerlIOEncode_flush(pTHX_ PerlIO * f) PUTBACK; s = SvPV(str, len); count = PerlIO_unread(PerlIONext(f),s,len); - if (count != len) { + if ((STRLEN)count != len) { code = -1; } FREETMPS; |