languages/perl6 requires `=begin' to have a corrisponding ident. Remove that requirement

[p6rt]

Migrated from rt.perl.org#49886 (status was 'resolved')

Searchable as RT49886$

[p6rt]

From @avar

This allows me to run kp6 tests​:

$ ../../parrot perl6.pbc /var/src/v6/v6-KindaPerl6/t/kp6/02-str-concat.t 1..1 ok 1

[p6rt]

From @avar

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> \ .*? \n - '=' \<.unsp>? 'end' \<.ws> $\ \N* {*} #= block + | begin \<.ws> [ \ ]? .*? \n + '=' \<.unsp>? 'end' \<.ws> [ $\ ]? \N* {*} #= block   | \N* {*} #= misc   ]   {*}

[p6rt]

From @avar

use v6-alpha;

module Main {

say '1..1';

say "ok", " " ~ "1";

}

=begin

=head1 AUTHORS

The Pugs Team E\lt>perl6\-compiler@&#8203;perl\.orgE\<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

[p6rt]

From @TimToady

On Thu, Jan 17, 2008 at 12​:34​:23PM -0800, Ævar Arnfjörð Bjarmason via RT wrote​:

: 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> \ .*? \n : - '=' \<.unsp>? 'end' \<.ws> $\ \N* {*} #= block : + | begin \<.ws> [ \ ]? .*? \n : + '=' \<.unsp>? 'end' \<.ws> [ $\ ]? \N* {*} #= block : | \N* {*} #= misc : ] : {*}

That is problematic, since it allows

  =begin foo   =end

(Well, problematic unless you believe in that sort of thing...) Of course, both grammar.pg and STD.pm are just filling in for the missing S26 implementation there, so it's a stopgap in any case.

Larry

[p6rt]

The RT System itself - Status changed from 'new' to 'open'

[p6rt]

From @pmichaud

On Thu, Jan 17, 2008 at 05​:36​:43PM -0800, Larry Wall wrote​:

On Thu, Jan 17, 2008 at 12​:34​:23PM -0800, Ævar Arnfjörð Bjarmason via RT wrote​:

: 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> \ .*? \n : - '=' \<.unsp>? 'end' \<.ws> $\ \N* {*} #= block : + | begin \<.ws> [ \ ]? .*? \n : + '=' \<.unsp>? 'end' \<.ws> [ $\ ]? \N* {*} #= block : | \N* {*} #= misc : ] : {*}

That is problematic, since it allows

=begin foo
=end

(Well, problematic unless you believe in that sort of thing...) Of course, both grammar.pg and STD.pm are just filling in for the missing S26 implementation there, so it's a stopgap in any case.

Agreed. Since neither S26 nor STD.pm currently allow =begin or =end without an identifier, we won't implement it that way. (Of course, if the change is useful we could ask the perl6-language gods to allow this.)

So, I'll close this ticket for now, and when/if the spec or STD.pm changes we can do an update then.

Pm

[p6rt]

From @particle

closed for now as per pmichaud in previous comment. ~jerry

[p6rt]

@particle - Status changed from 'open' to 'resolved'

[p6rt]

From @particle

closed for now as per pmichaud in previous comment. ~jerry