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 /mg.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 'mg.c')
-rw-r--r-- | mg.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1102,7 +1102,7 @@ Perl_magic_setenv(pTHX_ SV *sv, MAGIC *mg) s = delimcpy(tmpbuf, tmpbuf + sizeof tmpbuf, s, strend, ':', &i); s++; - if (i >= sizeof tmpbuf /* too long -- assume the worst */ + if (i >= (I32)sizeof tmpbuf /* too long -- assume the worst */ || *tmpbuf != '/' || (PerlLIO_stat(tmpbuf, &st) == 0 && (st.st_mode & 2)) ) { MgTAINTEDDIR_on(mg); |