handle non-Str case of EnuMap.exists

rakudo · Aug 8, 2011 · 169baab · 169baab
1 parent 3ea71cf
commit 169baab
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/src/core/EnumMap.pm b/src/core/EnumMap.pm
@@ -17,12 +17,19 @@ my class EnumMap does Associative {
         so self.exists($topic);
     }
 
-    method exists(EnumMap:D: Str \$key) {
+    proto method exists(|$) {*}
+    multi method exists(EnumMap:D: Str:D \$key) {
         nqp::p6bool(
             pir::defined($!storage)
             && nqp::existskey($!storage, nqp::unbox_s($key))
         )
     }
+    multi method exists(EnumMap:D: \$key) {
+        nqp::p6bool(
+            pir::defined($!storage)
+            && nqp::existskey($!storage, nqp::unbox_s($key.Stringy))
+        )
+    }
 
     method iterator() { self.pairs.iterator }
     method list() { self.pairs }