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: 13bce05) | patch
Fix eval 'q;;'
authorFather Chrysostomos <sprout@cpan.org>
Tue, 28 Aug 2012 01:26:11 +0000 (18:26 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 28 Aug 2012 06:24:03 +0000 (23:24 -0700)
commit11076590cd9927694bccd96456ab149a3a7bb432
treeafaf06f008890dd7f8868faa949011a27377953ctree | snapshot
parent13bce0557a3f74602632c67e3449120fa3db459acommit | diff
Fix eval 'q;;'

The parser expects a semicolon at the end of every statement, so the
lexer provides one.  It was not doing so for evals ending with a
semicolon, even if that semicolon was not a statement-terminating
semicolon.
t/base/lex.t diff | blob | blame | history
toke.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.