hamster 0.3.10 → 0.4.0

data/spec/hamster/vector/first_spec.rb

@@ -0,0 +1,35 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  [:first, :head].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], nil],
+        [["A"], "A"],
+        [["A", "B", "C"], "A"],
+      ].each do |values, expected|
+
+        describe "on #{values.inspect}" do
+
+          before do
+            @vector = Hamster.vector(*values)
+          end
+
+          it "returns #{expected.inspect}" do
+            @vector.send(method).should == expected
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/vector/get_spec.rb

@@ -0,0 +1,81 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  [:get, :[], :at].each do |method|
+
+    describe "##{method}" do
+
+      describe "when empty" do
+
+        before do
+          @vector = Hamster.vector
+        end
+
+        it "always returns nil" do
+          (-1..1).each do |i|
+            @vector.send(method, i).should be_nil
+          end
+        end
+
+      end
+
+      describe "when not empty" do
+
+        before do
+          @vector = Hamster.vector(*(1..1025))
+        end
+
+        describe "with a positive index" do
+
+          describe "within the absolute bounds of the vector" do
+
+            it "returns the value at the specified index from the head" do
+              (0..(@vector.size - 1)).each do |i|
+                @vector.send(method, i).should == i + 1
+              end
+            end
+
+          end
+
+          describe "outside the absolute bounds of the vector" do
+
+            it "returns nil" do
+              @vector.send(method, @vector.size).should be_nil
+            end
+
+          end
+
+        end
+
+        describe "with a negative index" do
+
+          describe "within the absolute bounds of the vector" do
+
+            it "returns the value at the specified index from the tail" do
+              (-@vector.size..-1).each do |i|
+                @vector.send(method, i).should == @vector.size + i + 1
+              end
+            end
+
+          end
+
+          describe "outside the absolute bounds of the vector" do
+
+            it "returns nil" do
+              @vector.send(method, -@vector.size.next).should be_nil
+            end
+
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/vector/include_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  [:include?, :member?, :contains?, :elem?].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], "A", false],
+        [[], nil, false],
+        [["A"], "A", true],
+        [["A"], "B", false],
+        [["A"], nil, false],
+        [["A", "B", nil], "A", true],
+        [["A", "B", nil], "B", true],
+        [["A", "B", nil], nil, true],
+        [["A", "B", nil], "C", false],
+        [[2], 2, true],
+        [[2], 2.0, true],
+        [[2.0], 2.0, true],
+        [[2.0], 2, true],
+      ].each do |values, item, expected|
+
+        describe "on #{values.inspect}" do
+
+          before do
+            @vector = Hamster.vector(*values)
+          end
+
+          it "returns #{expected.inspect}" do
+            @vector.send(method, item).should == expected
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/vector/inspect_spec.rb

@@ -0,0 +1,31 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  describe "#inspect" do
+
+    [
+      [[], "[]"],
+      [["A"], "[\"A\"]"],
+      [["A", "B", "C"], "[\"A\", \"B\", \"C\"]"]
+    ].each do |values, expected|
+
+      describe "on #{values.inspect}" do
+
+        before do
+          @vector = Hamster.vector(*values)
+        end
+
+        it "returns #{expected.inspect}" do
+          @vector.inspect.should == expected
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/vector/last_spec.rb

@@ -0,0 +1,32 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  describe "#last" do
+
+    [
+      [[], nil],
+      [["A"], "A"],
+      [["A", "B", "C"], "C"],
+    ].each do |values, expected|
+
+      describe "on #{values.inspect}" do
+
+        before do
+          original = Hamster.vector(*values)
+          @result = original.last
+        end
+
+        it "returns #{expected.inspect}" do
+          @result.should == expected
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/vector/reduce_spec.rb

@@ -0,0 +1,87 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  [:reduce, :inject, :fold, :foldr].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], 10, 10],
+        [[1], 10, 9],
+        [[1, 2, 3], 10, 4],
+      ].each do |values, initial, expected|
+
+        describe "on #{values.inspect}" do
+
+          before do
+            @vector = Hamster.vector(*values)
+          end
+
+          describe "with an initial value of #{initial}" do
+
+            describe "and a block" do
+
+              it "returns #{expected.inspect}" do
+                @vector.send(method, initial) { |memo, item| memo - item }.should == expected
+              end
+
+            end
+
+            describe "and no block" do
+
+              it "returns the memo" do
+                @vector.send(method, initial).should == initial
+              end
+
+            end
+
+          end
+
+        end
+
+      end
+
+      [
+        [[], nil],
+        [[1], 1],
+        [[1, 2, 3], -4],
+      ].each do |values, expected|
+
+        describe "on #{values.inspect}" do
+
+          before do
+            @vector = Hamster.vector(*values)
+          end
+
+          describe "with no initial value" do
+
+            describe "and a block" do
+
+              it "returns #{expected.inspect}" do
+                @vector.send(method) { |memo, item| memo - item }.should == expected
+              end
+
+            end
+
+            describe "and no block" do
+
+              it "returns nil" do
+                @vector.send(method).should be_nil
+              end
+
+            end
+
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/vector/set_spec.rb

@@ -0,0 +1,153 @@
+require 'spec_helper'
+
+require 'hamster/vector'
+
+describe Hamster::Vector do
+
+  describe "#set" do
+
+    describe "when empty" do
+
+      before do
+        @vector = Hamster.vector
+      end
+
+      it "always raises an error" do
+        (-1..1).each do |i|
+          lambda { @vector.set(i) }.should raise_error
+        end
+      end
+
+    end
+
+    describe "when not empty" do
+
+      before do
+        @original = Hamster.vector("A", "B", "C")
+      end
+
+      describe "with a block" do
+
+        describe "and a positive index" do
+
+          describe "within the absolute bounds of the vector" do
+
+            it "passes the current value to the block" do
+              @original.set(1) { |value| value.should == "B" }
+            end
+
+            it "replaces the value with the result of the block" do
+              result = @original.set(1) { |value| "FLIBBLE" }
+              result.should == Hamster.vector("A", "FLIBBLE", "C")
+            end
+
+            it "supports to_proc methods" do
+              result = @original.set(1, &:downcase)
+              result.should == Hamster.vector("A", "b", "C")
+            end
+
+          end
+
+          describe "outside the absolute bounds of the vector" do
+
+            it "raises an error" do
+              lambda { @original.set(@original.size) {} }.should raise_error
+            end
+
+          end
+
+        end
+
+        describe "and a negative index" do
+
+          describe "within the absolute bounds of the vector" do
+
+            it "passes the current value to the block" do
+              @original.set(-2) { |value| value.should == "B" }
+            end
+
+            it "replaces the value with the result of the block" do
+              result = @original.set(-2) { |value| "FLIBBLE" }
+              result.should == Hamster.vector("A", "FLIBBLE", "C")
+            end
+
+            it "supports to_proc methods" do
+              result = @original.set(-2, &:downcase)
+              result.should == Hamster.vector("A", "b", "C")
+            end
+
+          end
+
+          describe "outside the absolute bounds of the vector" do
+
+            it "raises an error" do
+              lambda { @original.set(-@original.size.next) {} }.should raise_error
+            end
+
+          end
+
+        end
+
+      end
+
+      describe "with a value" do
+
+        describe "and a positive index" do
+
+          describe "within the absolute bounds of the vector" do
+
+            before do
+              @result = @original.set(1, "FLIBBLE")
+            end
+
+            it "preserves the original" do
+              @original.should == Hamster.vector("A", "B", "C")
+            end
+
+            it "sets the new value at the specified index" do
+              @result.should == Hamster.vector("A", "FLIBBLE", "C")
+            end
+
+          end
+
+          describe "outside the absolute bounds of the vector" do
+
+            it "raises an error" do
+              lambda { @original.set(@original.size, "FLIBBLE") }.should raise_error
+            end
+
+          end
+
+        end
+
+        describe "with a negative index" do
+
+          before do
+            @result = @original.set(-2, "FLIBBLE")
+          end
+
+          it "preserves the original" do
+            @original.should == Hamster.vector("A", "B", "C")
+          end
+
+          it "sets the new value at the specified index" do
+            @result.should == Hamster.vector("A", "FLIBBLE", "C")
+          end
+
+        end
+
+        describe "outside the absolute bounds of the vector" do
+
+          it "raises an error" do
+            lambda { @original.set(-@original.size.next, "FLIBBLE") }.should raise_error
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end