hamster 0.1.8 → 0.1.11

data/spec/hamster/hash/reduce_spec.rb

@@ -0,0 +1,58 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Hamster::Hash do
+
+  [:reduce, :inject].each do |method|
+
+    describe "##{method}" do
+
+      describe "when empty" do
+
+        before do
+          @original = Hamster.hash
+          @result = @original.send(method, "ABC") {}
+        end
+
+        it "returns the memo" do
+          @result.should == "ABC"
+        end
+
+      end
+
+      describe "when not empty" do
+
+        before do
+          @original = Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
+        end
+
+        describe "with a block" do
+
+          before do
+            @result = @original.send(method, 0) { |memo, key, value| memo + 1 }
+          end
+
+          it "returns the final memo" do
+            @result.should == 3
+          end
+
+        end
+
+        describe "with no block" do
+
+          before do
+            @result = @original.send(method,"ABC")
+          end
+
+          it "returns the memo" do
+            @result.should == "ABC"
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/hash/reject_spec.rb

@@ -0,0 +1,57 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Hamster::Hash do
+
+  describe "#reject" do
+
+    before do
+      @original = Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
+    end
+
+    describe "when nothing matches" do
+
+      before do
+        @result = @original.reject { |key, value| false }
+      end
+
+      it "returns self" do
+        @result.should equal(@original)
+      end
+
+    end
+
+    describe "when only some things match" do
+
+      describe "with a block" do
+
+        before do
+          @result = @original.reject { |key, value| key == "A" && value == "aye" }
+        end
+
+        it "preserves the original" do
+          @original.should == Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
+        end
+
+        it "returns a set with the matching values" do
+          @result.should == Hamster.hash("B" => "bee", "C" => "see")
+        end
+
+      end
+
+      describe "with no block" do
+
+        before do
+          @enumerator = @original.reject
+        end
+
+        it "returns an enumerator over the values" do
+          Hamster.hash(@enumerator.to_a).should == Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/hash/remove_spec.rb

@@ -3,111 +3,39 @@ require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 describe Hamster::Hash do
 
   describe "#remove" do
-    
-    describe "the last key" do
 
-      before do
-        @hash = Hamster::Hash.new.put("A", "aye").remove("A")
-      end
-
-      it "no longer provides access to the removed key" do
-        @hash.has_key?("A").should be_false
-      end
-      
+    before do
+      @original = Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
     end
 
     describe "with an existing key" do
 
       before do
-        @original = Hamster::Hash.new.put("A", "aye").put("B", "bee")
-        @copy = @original.remove("A")
+        @result = @original.remove("B")
       end
 
-      it "returns a modified copy" do
-        @copy.should_not equal(@original)
-      end
-
-      describe "the original" do
-
-        it "still has the original key/value pairs" do
-          @original.get("A").should == "aye"
-          @original.get("B").should == "bee"
-        end
-
-        it "still has the original size" do
-          @original.size.should == 2
-        end
-
+      it "preserves the original" do
+        @original.should == Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
       end
 
-      describe "the modified copy" do
-
-        it "has all but the removed original key/value pairs" do
-          @copy.get("B").should == "bee"
-        end
-
-        it "doesn't have the removed key" do
-          @copy.has_key?("A").should be_false
-        end
-
-        it "has a size one less than the original" do
-          @copy.size.should == 1
-        end
-
+      it "returns a copy with the remaining key/value pairs" do
+        @result.should == Hamster.hash("A" => "aye", "C" => "see")
       end
 
     end
 
-    describe "with non-existing keys" do
+    describe "with a non-existing key" do
 
       before do
-        @original = Hamster::Hash.new.put("A", "aye")
-        @copy = @original.remove("missing")
+        @result = @original.remove("D")
       end
 
-      it "returns self" do
-        @copy.should equal(@original)
+      it "preserves the original values" do
+        @original.should == Hamster.hash("A" => "aye", "B" => "bee", "C" => "see")
       end
 
-      describe "the original" do
-
-        it "still has the original key/value pairs" do
-          @original.get("A").should == "aye"
-        end
-
-        it "still has the original size" do
-          @original.size.should == 1
-        end
-
-      end
-
-    end
-
-    describe "with keys of the same hash value" do
-
-      class Key
-        def hash; 1; end
-      end
-
-      def instance_count
-        ObjectSpace.garbage_collect
-        ObjectSpace.each_object(Hamster::Trie) {}
-      end
-
-      before do
-        @a = Key.new
-        @b = Key.new
-        @original = Hamster::Hash.new.put(@a, "aye").put(@b, "bee")
-      end
-      
-      it "no longer provides access to the removed key" do
-        copy = @original.remove(@b)
-        copy.has_key?(@b).should be_false
-      end
-
-      it "provides access to the remaining keys" do
-        copy = @original.remove(@a)
-        copy.get(@b).should == "bee"
+      it "returns self" do
+        @result.should equal(@original)
       end
 
     end

data/spec/hamster/hash/size_spec.rb

@@ -0,0 +1,25 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Hamster::Hash do
+
+  [:size, :length].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], 0],
+        [["A" => "aye"], 1],
+        [["A" => "bee", "B" => "bee", "C" => "see"], 3],
+      ].each do |values, result|
+
+        it "returns #{result} for #{values.inspect}" do
+          Hamster.hash(*values).send(method).should == result
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/cadr_spec.rb

@@ -0,0 +1,37 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Hamster::List do
+
+  describe "#cadr" do
+
+    [
+      [[], :car, nil],
+      [["A"], :car, "A"],
+      [["A", "B", "C"], :car, "A"],
+      [["A", "B", "C"], :cadr, "B"],
+      [["A", "B", "C"], :caddr, "C"],
+      [["A", "B", "C"], :cadddr, nil],
+      [["A", "B", "C"], :caddddr, nil],
+      [[], :cdr, Hamster.list],
+      [["A"], :cdr, Hamster.list],
+      [["A", "B", "C"], :cdr, Hamster.list("B", "C")],
+      [["A", "B", "C"], :cddr, Hamster.list("C")],
+      [["A", "B", "C"], :cdddr, Hamster.list],
+      [["A", "B", "C"], :cddddr, Hamster.list],
+    ].each do |values, method, result|
+
+      describe "on #{values.inspect}" do
+
+        list = Hamster.list(*values)
+
+        it "returns #{result}" do
+          list.send(method).should == result
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/construction_spec.rb

@@ -1,15 +1,55 @@
 require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
-describe Hamster::List do
+describe Hamster do
 
-  describe ".[]" do
+  describe ".list" do
+
+    describe "with no arguments" do
+
+      before do
+        @list = Hamster.list
+      end
+
+      it "always returns the same instance" do
+        @list.should equal(Hamster.list)
+      end
+
+      it "returns an empty list" do
+        @list.should be_empty
+      end
+
+    end
+
+    describe "with a number of items" do
+
+      before do
+        @list = Hamster.list("A", "B", "C")
+      end
+
+      it "always returns a different instance" do
+        @list.should_not equal(Hamster.list("A", "B", "C"))
+      end
+
+      it "is the same as repeatedly using #cons" do
+        @list.should == Hamster.list.cons("C").cons("B").cons("A")
+      end
 
-    before do
-      @list = Hamster::List["A", "B", "C"]
     end
 
-    it "is equivalent to repeatedly using #cons" do
-      @list.should eql(Hamster::List.new.cons("C").cons("B").cons("A"))
+  end
+
+  [:interval, :range].each do |method|
+
+    describe ".#{method}" do
+
+      before do
+        @interval = Hamster.send(method, "A", "D")
+      end
+
+      it "is equivalent to a list with explicit values" do
+        @interval.should == Hamster.list("A", "B", "C", "D")
+      end
+
     end
 
   end

data/spec/hamster/list/copying_spec.rb

@@ -2,22 +2,24 @@ require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
 describe Hamster::List do
 
-  before do
-    @list = Hamster::List.new
-  end
+  [:dup, :clone].each do |method|
 
-  describe "#dup" do
+    [
+      [],
+      ["A"],
+      ["A", "B", "C"],
+    ].each do |values|
 
-    it "returns self" do
-      @list.dup.should equal(@list)
-    end
+      describe "on #{values.inspect}" do
 
-  end
+        list = Hamster.list(*values)
+
+        it "returns self" do
+          list.send(method).should equal(list)
+        end
 
-  describe "#clone" do
+      end
 
-    it "returns self" do
-      @list.clone.should equal(@list)
     end
 
   end

data/spec/hamster/list/drop_spec.rb

@@ -0,0 +1,29 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Hamster::List do
+
+  describe "#drop" do
+
+    [
+      [[], 10, []],
+      [["A"], 10, []],
+      [["A"], -1, ["A"]],
+      [["A", "B", "C"], 0, ["A", "B", "C"]],
+      [["A", "B", "C"], 2, ["C"]],
+    ].each do |values, number, result|
+
+      describe "#{number} from #{values.inspect}" do
+
+        list = Hamster.list(*values)
+
+        it "returns #{result}" do
+          list.drop(number).should == Hamster.list(*result)
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/drop_while_spec.rb

@@ -0,0 +1,39 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Hamster::List do
+
+  describe "#drop_while" do
+
+    [
+      [[], []],
+      [["A"], []],
+      [["A", "B", "C"], ["C"]],
+    ].each do |values, result|
+
+      describe "on #{values.inspect}" do
+
+        list = Hamster.list(*values)
+
+        describe "with a block" do
+
+          it "returns #{result}" do
+            list.drop_while { |item| item < "C" }.should == Hamster.list(*result)
+          end
+
+        end
+
+        describe "without a block" do
+
+          it "returns self" do
+            list.drop_while.should == list
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end