Update a test for current spec; doesn't actually run yet, but at leas…

…t it's not utterly wrong anymore.
Raku · May 8, 2012 · df8cc85 · df8cc85
1 parent fe93c85
commit df8cc85
Showing 1 changed file with 6 additions and 10 deletions.
diff --git a/S14-traits/package.t b/S14-traits/package.t
@@ -9,19 +9,15 @@ role description {
     has $.description is rw;
 }
 
-multi trait_mod:<is>(Class $c, description, $arg) {
-    $c does description($arg);
+multi trait_mod:<is>(Mu:U $c, description, $arg) {
+    $c.HOW does description($arg);
 }
-multi trait_mod:<is>(Class $c, description) {
-    $c does description("missing description!");
+multi trait_mod:<is>(Mu:U $c, description) {
+    $c.HOW does description("missing description!");
 }
-multi trait_mod:<is>(Class $c, $arg, :$described!) {
-    $c does description($arg);
+multi trait_mod:<is>(Mu:U $c, :$described!) {
+    $c.HOW does description($described ~~ Str ?? $described !! "missing description");
 }
-multi trait_mod:<is>(Class $c, :$described!) {
-    $c does description("missing description!");
-}
-
 
 class Monkey is description('eats bananas, awesome') { }
 class Walrus is description { }