This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: ba90859) | patch
In S_scan_heredoc(), the explicit test for '\n' duplicates the strNE().
authorNicholas Clark <nick@ccl4.org>
Mon, 25 Mar 2013 09:53:33 +0000 (10:53 +0100)
committerNicholas Clark <nick@ccl4.org>
Mon, 25 Mar 2013 16:34:31 +0000 (17:34 +0100)
commit621baac6f8d24886a415fe9240af154fccad42c7
tree93ede38f2945a20a1742048ce91db1cf84dfe82etree | snapshot
parentba90859e610c9bec1956b5c7e11f5b4942e3a760commit | diff
In S_scan_heredoc(), the explicit test for '\n' duplicates the strNE().

PL_tokenbuf always starts with '\n', so a separate test of *s against '\n'
is duplicate work. Hence remove it, to make the code simpler and clearer.
toke.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.