Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
rakudo fudging
  • Loading branch information
coke committed Oct 13, 2011
1 parent f926752 commit 167c741
Showing 1 changed file with 5 additions and 1 deletion.
6 changes: 5 additions & 1 deletion S16-io/bare-say.t
Expand Up @@ -7,6 +7,7 @@ plan 10;

# L<S32::IO/IO::Writeable::Encoded/"it is a compiler error">

#?rakudo 3 todo 'nom regression'
eval_dies_ok('say', 'bare say is a compiler error');
eval_dies_ok('print', 'bare print is a compiler error');
eval_dies_ok('say()', 'say requires an argument');
Expand All @@ -30,19 +31,22 @@ is_run( 'say("")',
# RT #61494
{
eval 'say for 1';
#?rakudo todo 'nom regression'
ok $! ~~ Exception, '"say for 1" (one space) is an error';
my $errmsg = "$!";

eval 'say for 1';
#?rakudo todo 'nom regression'
ok $! ~~ Exception, '"say for 1" (two spaces) is an error';
# XXX The problem with this test is the error messages might differ
# for innocuous reasons (e.g., a line number)
#?rakudo 2 todo 'RT #61494'
is "$!", $errmsg, 'error for two spaces is the same as one space';
#?rakudo todo 'RT #61494'
ok "$!" ~~ /« say »/, 'error message is for "say"';
}

# RT #74822
#?rakudo todo 'RT #61494'
is_run( 'my %h=<a b c> Z 1,2,3; for %h { .say }',
{
status => 0,
Expand Down

0 comments on commit 167c741

Please sign in to comment.