Permalink
Browse files

[t/spec] remove a say() that would confuse the TAP parser when the te…

…st fails

git-svn-id: http://svn.pugscode.org/pugs@30174 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 6991d96 commit 29fe3613ee324fe6bf46bc6f6956f2c491023500 moritz committed Mar 23, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 S04-statements/for.t
@@ -478,7 +478,7 @@ eval_dies_ok('for(0..5) { }','keyword needs at least one whitespace after it');
# RT 62478
{
- eval_dies_ok 'for (my $i; $i <=3; $i++) { say $i; }', 'Unsupported use of C-style "for (;;)" loop; in Perl 6 please use "loop (;;)"';
+ eval_dies_ok 'for (my $i; $i <=3; $i++) { $i; }', 'Unsupported use of C-style "for (;;)" loop; in Perl 6 please use "loop (;;)"';
}
{
eval 'for (my $x; $x <=3; $x++) { $i; }'; diag($!);

0 comments on commit 29fe361

Please sign in to comment.