Skip to content
Browse files

proper error message for usage of 'do...for'

  • Loading branch information...
1 parent bf472b0 commit 41a92e808ebc8d70eda169f549f9ece869019708 @FROGGS FROGGS committed
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/Perl6/Grammar.pm
View
2 src/Perl6/Grammar.pm
@@ -837,7 +837,7 @@ grammar Perl6::Grammar is HLL::Grammar does STD {
my $sp := $<EXPR><statement_prefix>;
if $sp && $sp<sym> eq 'do' {
my $s := $<statement_mod_loop>[0]<sym>;
- $/.CURSOR.obs("do..." ~ $s, "repeat..." ~ $s);
+ $/.CURSOR.obs("do..." ~ $s, "repeat...while or repeat...until");
}
}
]?

0 comments on commit 41a92e8

Please sign in to comment.
Something went wrong with that request. Please try again.