This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
toke.c: Remove unnecessary condition
This code skips over a quoted string, handling escapes. And to han-
dle escapes it skips past the character following a backslash if that
character is itself a backslash or the quote character. Skipping past
the character after the backslash unconditionally, regardless of what
it is, has the same effect and uses less code.
This change shrunk the .o file.
Before:
-rw-r--r-- 1 sprout staff 671148 Aug 24 20:28 toke.o
After:
-rw-r--r-- 1 sprout staff 671100 Aug 24 22:37 toke.o