Remove type constraints that either don't make sense or aren't checke…

…d anyway
rakudo · Mar 8, 2009 · 0f1c600 · 0f1c600
1 parent 167e251
commit 0f1c600
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/src/setting/Any-list.pm b/src/setting/Any-list.pm
@@ -20,7 +20,7 @@ class Any is also {
     }
 
      # RT #63700 - parse failed on &infix:<cmp>
-    our Array multi method min( $values: Code $by = sub { $^a cmp $^b } ) {
+    multi method min( $values: Code $by = sub { $^a cmp $^b } ) {
          my @list = $values.list;
          return +Inf unless @list.elems;
          my $res = @list.shift;
@@ -33,7 +33,7 @@ class Any is also {
      };
 
 
-    our List multi method pairs(@values: *@indices) {
+    multi method pairs(@values: *@indices) {
         gather {
             for (@values.keys Z @values) -> $key, $val is rw {
                 take ($key => $val)
@@ -47,15 +47,15 @@ our List multi grep(Code $test, *@values) {
     @values.grep($test)
 }
 
-our List of Capture multi map(Code $expr, *@values) {
+our List multi map(Code $expr, *@values) {
     @values.map($expr)
 }
 
 our List multi pairs(@values, *@indices) {
     @values.pairs(@indices)
 }
 
-our List multi min($by, *@values) {
+multi min(Code $by, *@values) {
     @values.min($by);
 }