Permalink
Browse files

[t/spec] Test for RT #60966

git-svn-id: http://svn.pugscode.org/pugs@27490 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 0a8953b commit 5547d3f29ee38e772d2dc24118195f3d9a947622 kyle committed Jul 9, 2009
Showing with 10 additions and 2 deletions.
  1. +10 −2 S06-traits/misc.t
View
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 17;
+plan 20;
=begin description
@@ -89,7 +89,15 @@ lives_ok { boom(42) }, "can modify a copy";
# enough to write an actual test...
ok(eval('sub my_format (*@data is context(Item)) { }; 1'), "is context - compile check");
+# To do - check that is context actually works
+#?rakudo todo 'RT 60966'
+{
+ eval 'sub oh_noes( $gack is nonesuch ) { }';
+
+ ok $! ~~ Exception, "Can't use an unknown trait";
+ ok "$!" ~~ /trait/, 'error message mentions trait';
+ ok "$!" ~~ /nonesuch/, 'error message mentions the name of the trait';
+}
-# To do - check that is context actually works
# vim: ft=perl6

0 comments on commit 5547d3f

Please sign in to comment.