hamster 0.3.10 → 0.4.0

data/spec/hamster/core_ext/io_spec.rb

@@ -6,7 +6,7 @@ describe IO do
 
   describe "#to_list" do
 
-    context "with a File" do
+    describe "with a File" do
 
       it "returns an equivalent list" do
         File.open(File.dirname(__FILE__) + "/io_spec.txt") do |io|
@@ -16,7 +16,7 @@ describe IO do
 
     end
 
-    context "with a StringIO" do
+    describe "with a StringIO" do
 
       it "returns an equivalent list" do
         StringIO.new("A\nB\nC\n").to_list.should == Hamster.list("A\n", "B\n", "C\n")

data/spec/hamster/experimental/mutable_set/add?_spec.rb

@@ -0,0 +1,47 @@
+require 'spec_helper'
+
+require 'hamster/experimental/mutable_set'
+
+describe Hamster::MutableSet do
+
+  describe "#add?" do
+
+    before do
+      @set = Hamster.mutable_set("A", "B", "C")
+    end
+
+    describe "with a unique value" do
+
+      before do
+        @result = @set.add?("D")
+      end
+
+      it "returns true" do
+        @result.should == true
+      end
+
+      it "modifies the set to include the new value" do
+        @set.should == Hamster.mutable_set("A", "B", "C", "D")
+      end
+
+    end
+
+    describe "with a duplicate value" do
+
+      before do
+        @result = @set.add?("C")
+      end
+
+      it "preserves the original values" do
+        @set.should == Hamster.mutable_set("A", "B", "C")
+      end
+
+      it "returns false" do
+        @result.should == false
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/experimental/mutable_set/add_spec.rb

@@ -0,0 +1,51 @@
+require 'spec_helper'
+
+require 'hamster/experimental/mutable_set'
+
+describe Hamster::MutableSet do
+
+  [:add, :<<].each do |method|
+
+    describe "##{method}" do
+
+      before do
+        @set = Hamster.mutable_set("A", "B", "C")
+      end
+
+      describe "with a unique value" do
+
+        before do
+          @result = @set.send(method, "D")
+        end
+
+        it "returns self" do
+          @result.should equal(@set)
+        end
+
+        it "modifies the set to include the new value" do
+          @set.should == Hamster.mutable_set("A", "B", "C", "D")
+        end
+
+      end
+
+      describe "with a duplicate value" do
+
+        before do
+          @result = @set.send(method, "C")
+        end
+
+        it "preserves the original values" do
+          @set.should == Hamster.mutable_set("A", "B", "C")
+        end
+
+        it "returns self" do
+          @result.should equal(@set)
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/experimental/mutable_set/delete?_spec.rb

@@ -0,0 +1,47 @@
+require 'spec_helper'
+
+require 'hamster/experimental/mutable_set'
+
+describe Hamster::Set do
+
+  describe "#delete?" do
+
+    before do
+      @set = Hamster.mutable_set("A", "B", "C")
+    end
+
+    describe "with an existing value" do
+
+      before do
+        @result = @set.delete?("B")
+      end
+
+      it "returns true" do
+        @result.should == true
+      end
+
+      it "modifies the set to remove the value" do
+        @set.should == Hamster.mutable_set("A", "C")
+      end
+
+    end
+
+    describe "with a non-existing value" do
+
+      before do
+        @result = @set.delete?("D")
+      end
+
+      it "preserves the original values" do
+        @set.should == Hamster.mutable_set("A", "B", "C")
+      end
+
+      it "returns false" do
+        @result.should == false
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/experimental/mutable_set/delete_spec.rb

@@ -0,0 +1,47 @@
+require 'spec_helper'
+
+require 'hamster/experimental/mutable_set'
+
+describe Hamster::Set do
+
+  describe "#delete" do
+
+    before do
+      @set = Hamster.mutable_set("A", "B", "C")
+    end
+
+    describe "with an existing value" do
+
+      before do
+        @result = @set.delete("B")
+      end
+
+      it "returns self" do
+        @result.should equal(@set)
+      end
+
+      it "modifies the set to remove the value" do
+        @set.should == Hamster.mutable_set("A", "C")
+      end
+
+    end
+
+    describe "with a non-existing value" do
+
+      before do
+        @result = @set.delete("D")
+      end
+
+      it "preserves the original values" do
+        @set.should == Hamster.mutable_set("A", "B", "C")
+      end
+
+      it "returns self" do
+        @result.should equal(@set)
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/experimental/mutable_stack/pop_spec.rb

@@ -0,0 +1,41 @@
+require 'spec_helper'
+
+require 'hamster/experimental/mutable_stack'
+
+describe Hamster::MutableStack do
+
+  [:pop, :dequeue].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], nil, []],
+        [["A"], "A", []],
+        [["A", "B"], "B", ["A"]],
+        [["A", "B", "C"], "C", ["A", "B"]],
+      ].each do |initial_state, return_value, resulting_state|
+
+        describe "on #{initial_state.inspect}" do
+
+          before do
+            @stack = Hamster.mutable_stack(*initial_state)
+            @result = @stack.send(method)
+          end
+
+          it "returns #{return_value.inspect}" do
+            @result.should == return_value
+          end
+
+          it "modifies the stack to #{resulting_state.inspect}" do
+            @stack.should == Hamster.mutable_stack(*resulting_state)
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/experimental/mutable_stack/push_spec.rb

@@ -0,0 +1,41 @@
+require 'spec_helper'
+
+require 'hamster/experimental/mutable_stack'
+
+describe Hamster::MutableStack do
+
+  [:push, :<<, :enqueue].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], "A", ["A"]],
+        [["A"], "B", ["A", "B"]],
+        [["A"], "A", ["A", "A"]],
+        [["A", "B", "C"], "D", ["A", "B", "C", "D"]],
+      ].each do |initial_state, new_value, resulting_state|
+
+        describe "on #{initial_state.inspect} with #{new_value.inspect}" do
+
+          before do
+            @stack = Hamster.mutable_stack(*initial_state)
+            @result = @stack.send(method, new_value)
+          end
+
+          it "returns self" do
+            @result.should equal(@stack)
+          end
+
+          it "modifies the stack to #{resulting_state.inspect}" do
+            @stack.should == Hamster.mutable_stack(*resulting_state)
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/hash/put_spec.rb

@@ -22,8 +22,8 @@ describe Hamster::Hash do
       end
 
       it "supports to_proc methods" do
-        result = @original.put("A", &:next)
-        result.get("A").should == "ayf"
+        result = @original.put("A", &:upcase)
+        result.get("A").should == "AYE"
       end
 
     end

data/spec/hamster/list/each_with_index_spec.rb

@@ -0,0 +1,42 @@
+require 'spec_helper'
+
+require 'hamster/list'
+
+describe Hamster::List do
+
+  describe "#each_with_index" do
+
+    describe "with no block" do
+
+      before do
+        @list = Hamster.list("A", "B", "C")
+        @result = @list.each_with_index
+      end
+
+      it "returns self" do
+        @result.should equal(@list)
+      end
+
+    end
+
+    describe "with a block" do
+
+      before do
+        @list = Hamster.interval(1, 1025)
+        @pairs = []
+        @result = @list.each_with_index { |item, index| @pairs << [item, index] }
+      end
+
+      it "returns nil" do
+        @result.should be_nil
+      end
+
+      it "iterates over the items in order" do
+        @pairs.should == (1..@list.size).zip(0..@list.size.pred)
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/head_spec.rb

@@ -6,18 +6,6 @@ describe Hamster::List do
 
   [:head, :first].each do |method|
 
-    describe "on a really big list" do
-
-      before do
-        @list = Hamster.interval(0, STACK_OVERFLOW_DEPTH)
-      end
-
-      it "doesn't run out of stack" do
-        lambda { @list.filter(&:nil?).head }.should_not raise_error
-      end
-
-    end
-
     describe "##{method}" do
 
       [

data/spec/hamster/set/construction_spec.rb

@@ -6,12 +6,24 @@ describe Hamster::Set do
 
   describe ".set" do
 
-    before do
-      @set = Hamster.set("A", "B", "C")
+    describe "with no values" do
+
+      it "returns the empty set" do
+        Hamster.set.should equal(Hamster::EmptySet)
+      end
+
     end
 
-    it "is equivalent to repeatedly using #add" do
-      @set.should == Hamster.set.add("A").add("B").add("C")
+    describe "with a list of values" do
+
+      before do
+        @set = Hamster.set("A", "B", "C")
+      end
+
+      it "is equivalent to repeatedly using #add" do
+        @set.should == Hamster.set.add("A").add("B").add("C")
+      end
+
     end
 
   end

data/spec/hamster/set/filter_spec.rb

@@ -56,6 +56,22 @@ describe Hamster::Set do
 
       end
 
+      describe "when nothing matches" do
+
+        before do
+          @result = @original.send(method) { |item| false }
+        end
+
+        it "preserves the original" do
+          @original.should == Hamster.set("A", "B", "C")
+        end
+
+        it "returns an empty set" do
+          @result.should equal(Hamster.set)
+        end
+
+      end
+
     end
 
   end

data/spec/hamster/set/flatten_spec.rb

@@ -7,7 +7,6 @@ describe Hamster do
   describe "#flatten" do
 
     [
-      [[], []],
       [["A"], ["A"]],
       [["A", "B", "C"], ["A", "B", "C"]],
       [["A", Hamster.set("B"), "C"], ["A", "B", "C"]],
@@ -25,7 +24,7 @@ describe Hamster do
           @original.should == Hamster.set(*values)
         end
 
-        it "returns an empty set" do
+        it "returns the inlined values" do
           @result.should == Hamster.set(*expected)
         end
 
@@ -33,6 +32,18 @@ describe Hamster do
 
     end
 
+    describe "on an empty set" do
+
+      before do
+        @result = Hamster.set.flatten
+      end
+
+      it "returns an empty set" do
+        @result.should equal(Hamster.set)
+      end
+
+    end
+
   end
 
 end