diff options
author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2006-04-25 01:20:38 +0200 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-04-26 07:53:36 +0000 |
commit | bb7a0f5422600fd7de7806825a1300a577b7e61f (patch) | |
tree | 822f6cd3d63d224843f4eba60c9f90fd3190d28f /perlio.c | |
parent | fcea4b7c99fe376a2295931b658ba7f41a47470e (diff) | |
download | perl-bb7a0f5422600fd7de7806825a1300a577b7e61f.tar.gz |
Re: [PATCH] cleanup 212 warnings emitted by gcc-4.2
Message-ID: <20060424232038.7550f9b6@r2d2>
p4raw-id: //depot/perl@27962
Diffstat (limited to 'perlio.c')
-rw-r--r-- | perlio.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2104,7 +2104,7 @@ PerlIOBase_read(pTHX_ PerlIO *f, void *vbuf, Size_t count) SSize_t avail = PerlIO_get_cnt(f); SSize_t take = 0; if (avail > 0) - take = ((SSize_t)count < avail) ? count : avail; + take = ((SSize_t)count < avail) ? (SSize_t)count : avail; if (take > 0) { STDCHAR *ptr = PerlIO_get_ptr(f); Copy(ptr, buf, take, STDCHAR); |