diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t index 407266bb63..d13941eea5 100644 --- 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 $', 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;