bin2lTUAakyKC.bin
Description:
Index: src/parser/grammar.pg
===================================================================
--- src/parser/grammar.pg (revision 24905)
+++ src/parser/grammar.pg (working copy)
@@ -111,8 +111,8 @@
token pod_comment {
^^ '=' <.unsp>?
[
- | begin <.ws> <ident> .*? \n
- '=' <.unsp>? 'end' <.ws> $<ident> \N* {*} #= block
+ | begin <.ws> [ <ident> ]? .*? \n
+ '=' <.unsp>? 'end' <.ws> [ $<ident> ]? \N* {*} #= block
| \N* {*} #= misc
]
{*}
use v6-alpha;
module Main {
say '1..1';
say "ok", " " ~ "1";
}
=begin
=head1 AUTHORS
The Pugs Team E<lt>[EMAIL PROTECTED]<gt>.
=head1 SEE ALSO
The Perl 6 homepage at L<http://dev.perl.org/perl6>.
The Pugs homepage at L<http://pugscode.org/>.
=head1 COPYRIGHT
Copyright 2007 by Flavio Soibelmann Glock and others.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
See L<http://www.perl.com/perl/misc/Artistic.html>
=end
