This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
toke.c: move leftbracket label
authorFather Chrysostomos <sprout@cpan.org>
Mon, 6 Aug 2012 15:41:07 +0000 (08:41 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Mon, 6 Aug 2012 21:04:03 +0000 (14:04 -0700)
commiteaf6a13dc1ee199aebc2ca608507bab3b8244655
tree7af0f194deb2e3aa47605e99e0a093b4564be38f
parent583c9d5cccfe6eadf42350e2baa975576a360f02
toke.c: move leftbracket label

The only code path that goesto leftbracket was precede by s--.
The first thing leftbracket did was s++.

We can simplify the code slighty by moving the label down one
statement and not s--ing before goingto leftbracket.
toke.c