RT #69230, my $!foo

Raku · Jan 30, 2012 · 33e961e · 33e961e
1 parent 56d7207
commit 33e961e
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -101,6 +101,7 @@ 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 $<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;
 throws_like 'augment class Any { }', X::Syntax::Augment::WithoutMonkeyTyping;
 throws_like 'use MONKEY_TYPING; augment role Positional { }', X::Syntax::Augment::Role;