This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
toke.c:scan_heredoc: Use PL_tokenbuf less
authorFather Chrysostomos <sprout@cpan.org>
Tue, 21 Aug 2012 08:45:15 +0000 (01:45 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 21 Aug 2012 21:11:03 +0000 (14:11 -0700)
commit5bd13da38ce1da800b0c3011ce3201c3b88541c3
tree41c60db6c0b537c50d7fba95e5e9e3ad59f83cac
parent7cc341114c4476436b593500ef63fa0925f746ca
toke.c:scan_heredoc: Use PL_tokenbuf less

When scanning for a heredoc terminator in a string eval or quote-like
operator, the first character we are looking for is always a newline.
So instead of setting term to *PL_tokenbuf in those two code paths,
we can just hard-code '\n'.
toke.c