summaryrefslogtreecommitdiff
path: root/ext/PerlIO/encoding
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2002-04-21 22:32:29 +0000
committerGurusamy Sarathy <gsar@cpan.org>2002-04-21 22:32:29 +0000
commiteee4a17bb1327e9965d1aeff114c5965364f9830 (patch)
tree07c31a8443cfe72d822b821516a5f4ef90099af5 /ext/PerlIO/encoding
parente4297a9803068e475e62a242773388815305cfa4 (diff)
downloadperl-eee4a17bb1327e9965d1aeff114c5965364f9830.tar.gz
squelch some more type mismatch warnings
SvREFCNT_dec(x ? y : z) did not typecast the right thing due to missing parens in macro definition p4raw-id: //depot/perl@16055
Diffstat (limited to 'ext/PerlIO/encoding')
-rw-r--r--ext/PerlIO/encoding/encoding.xs2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/PerlIO/encoding/encoding.xs b/ext/PerlIO/encoding/encoding.xs
index ea15e56877..23de989514 100644
--- a/ext/PerlIO/encoding/encoding.xs
+++ b/ext/PerlIO/encoding/encoding.xs
@@ -237,7 +237,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) {
use = e->base.bufsiz;
}
SvPVX(e->dataSV) = (char *) ptr;