A couple more trait handlers (though nothing yet answers them).

rakudo · Jul 28, 2011 · 764d2f9 · 764d2f9
1 parent 333a91f
commit 764d2f9
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/src/core/traits.pm b/src/core/traits.pm
@@ -9,9 +9,16 @@ proto trait_mod:<is>(|$) { * }
 multi trait_mod:<is>(Mu:U $child, Mu:U $parent) {
     $child.HOW.add_parent($child, $parent);
 }
+multi trait_mod:<is>(Mu:U $type, :$rw!) {
+    $type.HOW.set_rw($type);
+}
+
 multi trait_mod:<is>(Attribute:D $attr, :$rw!) {
     $attr.set_rw();
 }
+multi trait_mod:<is>(Attribute:D $attr, :$readonly!) {
+    $attr.set_readonly();
+}
 
 multi trait_mod:<is>(Routine:D $r, :$rw!) {
     $r.set_rw();