diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-02 04:45:37 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-02 04:45:37 +0000 |
commit | 1127039a4731c62b5ab628a952e8671c3be5e918 (patch) | |
tree | 28d0d2c4485006ea7d5fc88b7278aee69b20ed90 /op.c | |
parent | 0e4548d56d31eb2bfd3d2eda89451b006c407418 (diff) | |
download | perl-1127039a4731c62b5ab628a952e8671c3be5e918.tar.gz |
avoid useless comparison
p4raw-id: //depot/perl@5436
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -173,7 +173,7 @@ Perl_pad_allocmy(pTHX_ char *name) } } if (PL_in_my == KEY_our) { - while (off >= 0 && off <= top) { + while (off <= top) { if ((sv = svp[off]) && sv != &PL_sv_undef && ((SvFLAGS(sv) & SVpad_OUR) && GvSTASH(sv) == ourstash) |