Permalink
Browse files

test X::Mixin::NonComposable

  • Loading branch information...
moritz committed May 27, 2012
1 parent 8dbf8cc commit 5a8433b17e9400b173b27a67770080acfe8e80b8
Showing with 5 additions and 0 deletions.
  1. +5 −0 S32-exceptions/misc.t
View
@@ -227,6 +227,11 @@ throws_like 'my Str $x := 3', X::TypeCheck::Binding, got => Int, expected => Str
throws_like 'sub f() returns Str { 5 }; f', X::TypeCheck::Return, got => Int, expected => Str;
throws_like '1.foo', X::Method::NotFound, method => 'foo', typename => 'Int';
+throws_like 'my class NC { }; NC.new does NC', X::Mixin::NonComposable,
+ :target(*.defined), :rolish(*.^name eq 'NC');
+throws_like 'my class NC { }; NC.new but NC', X::Mixin::NonComposable,
+ :target(*.defined), :rolish(*.^name eq 'NC');
+
done;

0 comments on commit 5a8433b

Please sign in to comment.