This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
op.c: ck_rvconst: Remove ‘double’ gv lookup
authorFather Chrysostomos <sprout@cpan.org>
Wed, 10 Sep 2014 05:51:38 +0000 (22:51 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 10 Sep 2014 05:51:56 +0000 (22:51 -0700)
commit7f3ab81353b15bbad4d5568250fc27c9f2a3eef5
tree9c6c3838b1b379af9b72f1625b82c61a82438e2c
parent2ef30a1b4f52583fc10d66d47cb9ef507baf990c
op.c: ck_rvconst: Remove ‘double’ gv lookup

I put double in quotes because this gv lookup only happens once.

I tried commenting out the loop and leaving just the body.  All tests
passed.  Then I tried leaving the loop, but asserting that it only
iterates once.  All tests passed.

The arguments to gv_fetchsv are such that it will always add a glob
and return it, so the !gv condition always evaluates to false.  (The
glob is not added when noexpand is true, but the loop condition con-
tains !noexpand to prevent a second iteration in that case.)
op.c