Remove exist_key and delete_key: they are not specced and not used in…

… core
rakudo · Sep 1, 2013 · 9a63ead · 9a63ead
1 parent 39024d8
commit 9a63ead
Show file tree

Hide file tree

Showing 4 changed files with 0 additions and 6 deletions.
diff --git a/src/core/Bag.pm b/src/core/Bag.pm
@@ -65,7 +65,6 @@ my class Bag is Iterable does Associative does Baggy {
     method KeyBag { KeyBag.new-from-pairs(self.hash) }
 
     method at_key($k) { +(%!elems{$k} // 0) }
-    method exists_key($k) { self.exists($k) }
 
     # Constructor
     method new(*@args --> Bag) {

diff --git a/src/core/KeyBag.pm b/src/core/KeyBag.pm
@@ -19,8 +19,6 @@ my class KeyBag does Associative does Baggy {
         Proxy.new(FETCH => { %!elems.exists($k) ?? %!elems{$k} !! 0 },
                   STORE => -> $, $value { if $value > 0 { %!elems{$k} = $value } else { %!elems.delete($k) }});
     }
-    method exists_key($k) { self.exists($k) }
-    method delete_key($k) { %!elems.delete($k) }
 
     # Constructor
     method new(*@args --> KeyBag) {

diff --git a/src/core/KeySet.pm b/src/core/KeySet.pm
@@ -14,8 +14,6 @@ my class KeySet is Iterable does Associative {
         Proxy.new(FETCH => { %!elems.exists($k) ?? True !! False },
                   STORE => -> $, $value { if $value { %!elems{$k} = True } else { %!elems.delete($k) }});
     }
-    method exists_key($k) { self.exists($k) }
-    method delete_key($k) { %!elems.delete($k) }
 
     # Constructor
     method new(*@args --> KeySet) {

diff --git a/src/core/Set.pm b/src/core/Set.pm
@@ -187,7 +187,6 @@ my class Set is Iterable does Associative {
     method KeyBag { KeyBag.new(self.keys) }
 
     method at_key($k) { ?(%!elems{$k} // False) }
-    method exists_key($k) { self.exists($k) }
 
     # Constructor
     method new(*@args --> Set) {