test parameter variant of X::Syntax::Variable::Numeric

Raku · Feb 24, 2012 · b291479 · b291479
1 parent 221ae65
commit b291479
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -103,6 +103,7 @@ throws_like 'unless 1 { } else { }', X::Syntax::UnlessElse;
 throws_like 'for my $x (1, 2, 3) { }', X::Syntax::P5;
 throws_like ':!foo(3)', X::Syntax::NegatedPair;
 throws_like 'my $0', X::Syntax::Variable::Numeric;
+throws_like 'my sub f($0) { }', X::Syntax::Variable::Numeric, what => 'parameter';
 throws_like 'my $<a>', X::Syntax::Variable::Match;
 throws_like 'my class A { my $!foo }', X::Syntax::Variable::Twigil, twigil => '!', scope => 'my';
 throws_like 'my $::("foo")', X::Syntax::Variable::IndirectDeclaration;