Permalink
Browse files

more typed exceptions

  • Loading branch information...
1 parent 6467df2 commit a2b6fc205c592860ab4741bc8be113fc1df8f693 @moritz moritz committed Feb 23, 2012
Showing with 4 additions and 0 deletions.
  1. +4 −0 S32-exceptions/misc.t
View
@@ -138,4 +138,8 @@ throws_like '$.a', X::Syntax::NoSelf, variable => '$.a';
throws_like 'has $.x', X::Attribute::NoPackage;
throws_like 'my module A { has $.x }', X::Attribute::Package, package-type => 'module';
+throws_like 'has sub a() { }', X::Sub::Scope, scope => 'has';
+throws_like 'multi sub () { }', X::Anon::Multi, multiness => 'multi';
+throws_like 'proto sub () { }', X::Anon::Multi, multiness => 'proto';
+
done;

0 comments on commit a2b6fc2

Please sign in to comment.