Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
skip tests for NYI'd exception type RT #125132
  • Loading branch information
FROGGS committed May 7, 2015
1 parent dcbfdc7 commit ae9c765
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions S04-statements/when.t
Expand Up @@ -2,6 +2,8 @@ use Test;

plan 24;

#?rakudo skip 'exception type X::Syntax::OutsideOfTopicalizer NYI RT #125132'
{
throws_like 'when 1 { }', X::Syntax::OutsideOfTopicalizer, keyword => 'when',
'when block in mainline complains about missing topicalizer';
throws_like 'default { }', X::Syntax::OutsideOfTopicalizer, keyword => 'default',
Expand Down Expand Up @@ -31,6 +33,7 @@ throws_like 'my class C { method foo() { when 1 { } } }', X::Syntax::OutsideOfTo
'when block in method not declaring $_ complains about missing topicalizer';
throws_like 'my class C { method foo() { default { } } }', X::Syntax::OutsideOfTopicalizer, keyword => 'default',
'default block in method not declaring $_ complains about missing topicalizer';
}

my $c = { when 1 { 'one' }; when 2 { 'two!' }; default { 'many' } };
is $c(1), 'one', 'when works in a circumfix:<{ }> (1)';
Expand Down

0 comments on commit ae9c765

Please sign in to comment.