hamster 1.0.1.pre.rc2 → 1.0.1.pre.rc3

data/spec/lib/hamster/vector/reverse_spec.rb

@@ -0,0 +1,22 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  describe "#reverse" do
+    [
+      [[], []],
+      [[1], [1]],
+      [[1,2], [2,1]],
+      [(1..32).to_a, (1..32).to_a.reverse],
+      [(1..33).to_a, (1..33).to_a.reverse],
+      [(1..100).to_a, (1..100).to_a.reverse],
+      [(1..1024).to_a, (1..1024).to_a.reverse]
+    ].each do |initial, expected|
+      describe "on #{initial}" do
+        it "returns #{expected}" do
+          Hamster::Vector.new(initial).reverse.should eql(Hamster::Vector.new(expected))
+        end
+      end
+    end
+  end
+end

data/spec/lib/hamster/vector/rindex_spec.rb

@@ -0,0 +1,37 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  describe "#rindex" do
+    let(:vector) { Hamster.vector(1,2,3,3,2,1) }
+
+    context "when passed an object present in the vector" do
+      it "returns the last index where the object is present" do
+        vector.rindex(1).should be(5)
+        vector.rindex(2).should be(4)
+        vector.rindex(3).should be(3)
+      end
+    end
+
+    context "when passed an object not present in the vector" do
+      it "returns nil" do
+        vector.rindex(0).should be_nil
+        vector.rindex(nil).should be_nil
+        vector.rindex('string').should be_nil
+      end
+    end
+
+    context "with a block" do
+      it "returns the last index of an object which the predicate is true for" do
+        vector.rindex { |n| n > 2 }.should be(3)
+      end
+    end
+
+    context "without an argument OR block" do
+      it "returns an Enumerator" do
+        vector.rindex.class.should be(Enumerator)
+        vector.rindex.each { |n| n > 2 }.should be(3)
+      end
+    end
+  end
+end

data/spec/lib/hamster/vector/rotate_spec.rb

@@ -0,0 +1,74 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  describe "#rotate" do
+    let(:vector) { Hamster.vector(1,2,3,4,5) }
+
+    context "when passed no argument" do
+      it "returns a new vector with the first element moved to the end" do
+        vector.rotate.should eql(Hamster.vector(2,3,4,5,1))
+      end
+    end
+
+    context "with an integral argument n" do
+      it "returns a new vector with the first (n % size) elements moved to the end" do
+        vector.rotate(2).should eql(Hamster.vector(3,4,5,1,2))
+        vector.rotate(3).should eql(Hamster.vector(4,5,1,2,3))
+        vector.rotate(4).should eql(Hamster.vector(5,1,2,3,4))
+        vector.rotate(5).should eql(Hamster.vector(1,2,3,4,5))
+        vector.rotate(-1).should eql(Hamster.vector(5,1,2,3,4))
+      end
+    end
+
+    context "with a floating-point argument n" do
+      it "coerces the argument to integer using to_int" do
+        vector.rotate(2.1).should eql(Hamster.vector(3,4,5,1,2))
+      end
+    end
+
+    context "with a non-numeric argument" do
+      it "raises a TypeError" do
+        -> { vector.rotate('hello') }.should raise_error(TypeError)
+      end
+    end
+
+    context "with an argument of zero" do
+      it "returns self" do
+        vector.rotate(0).should be(vector)
+      end
+    end
+
+    context "with an argument equal to the vector's size" do
+      it "returns self" do
+        vector.rotate(5).should be(vector)
+      end
+    end
+
+    [31, 32, 33, 1000, 1023, 1024, 1025].each do |size|
+      context "on a #{size}-item vector" do
+        it "behaves like Array#rotate" do
+          array = (1..size).to_a
+          vector = V.new(array)
+          10.times do
+            offset = rand(size)
+            vector.rotate(offset).should == array.rotate(offset)
+          end
+        end
+      end
+    end
+
+    context "from a subclass" do
+      it "returns an instance of the subclass" do
+        subclass = Class.new(Hamster::Vector)
+        instance = subclass.new([1,2,3])
+        instance.rotate(2).class.should be(subclass)
+      end
+    end
+
+    it "leaves the original unmodified" do
+      vector.rotate(3)
+      vector.should eql(Hamster.vector(1,2,3,4,5))
+    end
+  end
+end

data/spec/lib/hamster/vector/sample_spec.rb

@@ -0,0 +1,14 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  describe "#sample" do
+    let(:vector) { Hamster::Vector.new(1..10) }
+
+    it "returns a randomly chosen item" do
+      chosen = 100.times.map { vector.sample }
+      chosen.each { |item| vector.include?(item).should == true }
+      vector.each { |item| chosen.include?(item).should == true }
+    end
+  end
+end

data/spec/{hamster → lib/hamster}/vector/set_spec.rb

@@ -27,18 +27,25 @@ describe Hamster::Vector do
 
             it "replaces the value with the result of the block" do
               result = vector.set(1) { |value| "FLIBBLE" }
-              result.should == Hamster.vector("A", "FLIBBLE", "C")
+              result.should eql(Hamster.vector("A", "FLIBBLE", "C"))
             end
 
             it "supports to_proc methods" do
               result = vector.set(1, &:downcase)
-              result.should == Hamster.vector("A", "b", "C")
+              result.should eql(Hamster.vector("A", "b", "C"))
             end
           end
 
-          context "outside the absolute bounds of the vector" do
+          context "just past the end of the vector" do
+            it "passes nil to the block and adds a new value" do
+              result = vector.set(3) { |value| value.should be_nil; "D" }
+              result.should eql(Hamster.vector("A", "B", "C", "D"))
+            end
+          end
+
+          context "further outside the bounds of the vector" do
             it "raises an error" do
-              expect { vector.set(vector.size) {} }.to raise_error
+              expect { vector.set(4) {} }.to raise_error
             end
           end
         end
@@ -51,12 +58,12 @@ describe Hamster::Vector do
 
             it "replaces the value with the result of the block" do
               result = vector.set(-2) { |value| "FLIBBLE" }
-              result.should == Hamster.vector("A", "FLIBBLE", "C")
+              result.should eql(Hamster.vector("A", "FLIBBLE", "C"))
             end
 
             it "supports to_proc methods" do
               result = vector.set(-2, &:downcase)
-              result.should == Hamster.vector("A", "b", "C")
+              result.should eql(Hamster.vector("A", "b", "C"))
             end
           end
 
@@ -74,17 +81,24 @@ describe Hamster::Vector do
             let(:set) { vector.set(1, "FLIBBLE") }
 
             it "preserves the original" do
-              vector.should == Hamster.vector("A", "B", "C")
+              vector.should eql(Hamster.vector("A", "B", "C"))
             end
 
             it "sets the new value at the specified index" do
-              set.should == Hamster.vector("A", "FLIBBLE", "C")
+              set.should eql(Hamster.vector("A", "FLIBBLE", "C"))
+            end
+          end
+
+          context "just past the end of the vector" do
+            it "adds a new value" do
+              result = vector.set(3, "FLIBBLE")
+              result.should eql(Hamster.vector("A", "B", "C", "FLIBBLE"))
             end
           end
 
           context "outside the absolute bounds of the vector" do
             it "raises an error" do
-              expect { vector.set(vector.size, "FLIBBLE") }.to raise_error
+              expect { vector.set(4, "FLIBBLE") }.to raise_error
             end
           end
         end
@@ -94,11 +108,11 @@ describe Hamster::Vector do
 
           it "preserves the original" do
             set
-            vector.should == Hamster.vector("A", "B", "C")
+            vector.should eql(Hamster.vector("A", "B", "C"))
           end
 
           it "sets the new value at the specified index" do
-            set.should == Hamster.vector("A", "FLIBBLE", "C")
+            set.should eql(Hamster.vector("A", "FLIBBLE", "C"))
           end
         end
 
@@ -112,9 +126,29 @@ describe Hamster::Vector do
 
     context "from a subclass" do
       it "returns an instance of the subclass" do
-        @subclass = Class.new(Hamster::Vector)
-        @instance = @subclass[1,2,3]
-        @instance.set(1, 2.5).class.should be(@subclass)
+        subclass = Class.new(Hamster::Vector)
+        instance = subclass[1,2,3]
+        instance.set(1, 2.5).class.should be(subclass)
+      end
+    end
+
+    [10, 31, 32, 33, 1000, 1023, 1024, 1025, 2000].each do |size|
+      context "on a #{size}-item vector" do
+        it "works correctly" do
+          array = (1..size).to_a
+          vector = V.new(array)
+
+          [0, 1, 10, 31, 32, 33, 100, 500, 1000, 1023, 1024, 1025, 1998, 1999].select { |n| n < size }.each do |i|
+            value = rand(10000)
+            array[i] = value
+            vector = vector.set(i, value)
+            vector[i].should be(value)
+          end
+
+          0.upto(size-1) do |i|
+            vector.get(i).should == array[i]
+          end
+        end
       end
     end
   end

data/spec/lib/hamster/vector/shift_spec.rb

@@ -0,0 +1,28 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  describe "#shift" do
+    [
+      [[], []],
+      [["A"], []],
+      [%w[A B C], %w[B C]],
+      [1..31, 2..31],
+      [1..32, 2..32],
+      [1..33, 2..33]
+    ].each do |values, expected|
+      context "on #{values.inspect}" do
+        let(:vector) { Hamster.vector(*values) }
+
+        it "preserves the original" do
+          vector.shift
+          vector.should eql(Hamster.vector(*values))
+        end
+
+        it "returns #{expected.inspect}" do
+          vector.shift.should eql(Hamster.vector(*expected))
+        end
+      end
+    end
+  end
+end

data/spec/lib/hamster/vector/shuffle_spec.rb

@@ -0,0 +1,44 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  describe "#shuffle" do
+    let(:vector) { Hamster.vector(1,2,3,4) }
+
+    it "returns the same values, in a usually different order" do
+      different = false
+      10.times do
+        shuffled = vector.shuffle
+        shuffled.sort.should eql(vector)
+        different ||= (shuffled != vector)
+      end
+      different.should be(true)
+    end
+
+    it "leaves the original unchanged" do
+      vector.shuffle
+      vector.should eql(Hamster.vector(1,2,3,4))
+    end
+
+    context "from a subclass" do
+      it "returns an instance of the subclass" do
+        subclass = Class.new(Hamster::Vector)
+        instance = subclass.new([1,2,3])
+        instance.shuffle.class.should be(subclass)
+      end
+    end
+
+    [32, 33, 1023, 1024, 1025].each do |size|
+      context "on a #{size}-item vector" do
+        it "works correctly" do
+          vector = V.new(1..size)
+          shuffled = vector.shuffle
+          shuffled = vector.shuffle while shuffled.eql?(vector) # in case we get the same
+          vector.should eql(V.new(1..size))
+          shuffled.size.should == vector.size
+          shuffled.sort.should eql(vector)
+        end
+      end
+    end
+  end
+end

data/spec/lib/hamster/vector/slice_spec.rb

@@ -0,0 +1,241 @@
+require "spec_helper"
+require "hamster/vector"
+
+describe Hamster::Vector do
+  let(:vector) { Hamster.vector(1,2,3,4) }
+  let(:big) { Hamster::Vector.new(1..10000) }
+
+  [:slice, :[]].each do |method|
+    describe "##{method}" do
+      context "when passed a positive integral index" do
+        it "returns the element at that index" do
+          vector.send(method, 0).should be(1)
+          vector.send(method, 1).should be(2)
+          vector.send(method, 2).should be(3)
+          vector.send(method, 3).should be(4)
+          vector.send(method, 4).should be(nil)
+          vector.send(method, 10).should be(nil)
+
+          big.send(method, 0).should be(1)
+          big.send(method, 9999).should be(10000)
+        end
+
+        it "leaves the original unchanged" do
+          vector.should eql(Hamster.vector(1,2,3,4))
+        end
+      end
+
+      context "when passed a negative integral index" do
+        it "returns the element which is number (index.abs) counting from the end of the vector" do
+          vector.send(method, -1).should be(4)
+          vector.send(method, -2).should be(3)
+          vector.send(method, -3).should be(2)
+          vector.send(method, -4).should be(1)
+          vector.send(method, -5).should be(nil)
+          vector.send(method, -10).should be(nil)
+
+          big.send(method, -1).should be(10000)
+          big.send(method, -10000).should be(1)
+        end
+      end
+
+      context "when passed a positive integral index and count" do
+        it "returns 'count' elements starting from 'index'" do
+          vector.send(method, 0, 0).should eql(Hamster.vector)
+          vector.send(method, 0, 1).should eql(Hamster.vector(1))
+          vector.send(method, 0, 2).should eql(Hamster.vector(1,2))
+          vector.send(method, 0, 4).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 0, 6).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 0, -1).should be_nil
+          vector.send(method, 0, -2).should be_nil
+          vector.send(method, 0, -4).should be_nil
+          vector.send(method, 2, 0).should eql(Hamster.vector)
+          vector.send(method, 2, 1).should eql(Hamster.vector(3))
+          vector.send(method, 2, 2).should eql(Hamster.vector(3,4))
+          vector.send(method, 2, 4).should eql(Hamster.vector(3,4))
+          vector.send(method, 2, -1).should be_nil
+          vector.send(method, 4, 0).should eql(Hamster.vector)
+          vector.send(method, 4, 2).should eql(Hamster.vector)
+          vector.send(method, 4, -1).should be_nil
+          vector.send(method, 5, 0).should be_nil
+          vector.send(method, 5, 2).should be_nil
+          vector.send(method, 5, -1).should be_nil
+          vector.send(method, 6, 0).should be_nil
+          vector.send(method, 6, 2).should be_nil
+          vector.send(method, 6, -1).should be_nil
+
+          big.send(method, 0, 3).should eql(Hamster.vector(1,2,3))
+          big.send(method, 1023, 4).should eql(Hamster.vector(1024,1025,1026,1027))
+          big.send(method, 1024, 4).should eql(Hamster.vector(1025,1026,1027,1028))
+        end
+
+        it "leaves the original unchanged" do
+          vector.should eql(Hamster.vector(1,2,3,4))
+        end
+      end
+
+      context "when passed a negative integral index and count" do
+        it "returns 'count' elements, starting from index which is number 'index.abs' counting from the end of the array" do
+          vector.send(method, -1, 0).should eql(Hamster.vector)
+          vector.send(method, -1, 1).should eql(Hamster.vector(4))
+          vector.send(method, -1, 2).should eql(Hamster.vector(4))
+          vector.send(method, -1, -1).should be_nil
+          vector.send(method, -2, 0).should eql(Hamster.vector)
+          vector.send(method, -2, 1).should eql(Hamster.vector(3))
+          vector.send(method, -2, 2).should eql(Hamster.vector(3,4))
+          vector.send(method, -2, 4).should eql(Hamster.vector(3,4))
+          vector.send(method, -2, -1).should be_nil
+          vector.send(method, -4, 0).should eql(Hamster.vector)
+          vector.send(method, -4, 1).should eql(Hamster.vector(1))
+          vector.send(method, -4, 2).should eql(Hamster.vector(1,2))
+          vector.send(method, -4, 4).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, -4, 6).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, -4, -1).should be_nil
+          vector.send(method, -5, 0).should be_nil
+          vector.send(method, -5, 1).should be_nil
+          vector.send(method, -5, 10).should be_nil
+          vector.send(method, -5, -1).should be_nil
+
+          big.send(method, -1, 1).should eql(Hamster.vector(10000))
+          big.send(method, -1, 2).should eql(Hamster.vector(10000))
+          big.send(method, -6, 2).should eql(Hamster.vector(9995,9996))
+        end
+      end
+
+      context "when passed a Range" do
+        it "returns the elements whose indexes are within the given Range" do
+          vector.send(method, 0..-1).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 0..-10).should eql(Hamster.vector)
+          vector.send(method, 0..0).should eql(Hamster.vector(1))
+          vector.send(method, 0..1).should eql(Hamster.vector(1,2))
+          vector.send(method, 0..2).should eql(Hamster.vector(1,2,3))
+          vector.send(method, 0..3).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 0..4).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 0..10).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 2..-10).should eql(Hamster.vector)
+          vector.send(method, 2..0).should eql(Hamster.vector)
+          vector.send(method, 2..2).should eql(Hamster.vector(3))
+          vector.send(method, 2..3).should eql(Hamster.vector(3,4))
+          vector.send(method, 2..4).should eql(Hamster.vector(3,4))
+          vector.send(method, 3..0).should eql(Hamster.vector)
+          vector.send(method, 3..3).should eql(Hamster.vector(4))
+          vector.send(method, 3..4).should eql(Hamster.vector(4))
+          vector.send(method, 4..0).should eql(Hamster.vector)
+          vector.send(method, 4..4).should eql(Hamster.vector)
+          vector.send(method, 4..5).should eql(Hamster.vector)
+          vector.send(method, 5..0).should be_nil
+          vector.send(method, 5..5).should be_nil
+          vector.send(method, 5..6).should be_nil
+
+          big.send(method, 159..162).should eql(Hamster.vector(160,161,162,163))
+          big.send(method, 160..162).should eql(Hamster.vector(161,162,163))
+          big.send(method, 161..162).should eql(Hamster.vector(162,163))
+          big.send(method, 9999..10100).should eql(Hamster.vector(10000))
+          big.send(method, 10000..10100).should eql(Hamster.vector)
+          big.send(method, 10001..10100).should be_nil
+
+          vector.send(method, 0...-1).should eql(Hamster.vector(1,2,3))
+          vector.send(method, 0...-10).should eql(Hamster.vector)
+          vector.send(method, 0...0).should eql(Hamster.vector)
+          vector.send(method, 0...1).should eql(Hamster.vector(1))
+          vector.send(method, 0...2).should eql(Hamster.vector(1,2))
+          vector.send(method, 0...3).should eql(Hamster.vector(1,2,3))
+          vector.send(method, 0...4).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 0...10).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, 2...-10).should eql(Hamster.vector)
+          vector.send(method, 2...0).should eql(Hamster.vector)
+          vector.send(method, 2...2).should eql(Hamster.vector)
+          vector.send(method, 2...3).should eql(Hamster.vector(3))
+          vector.send(method, 2...4).should eql(Hamster.vector(3,4))
+          vector.send(method, 3...0).should eql(Hamster.vector)
+          vector.send(method, 3...3).should eql(Hamster.vector)
+          vector.send(method, 3...4).should eql(Hamster.vector(4))
+          vector.send(method, 4...0).should eql(Hamster.vector)
+          vector.send(method, 4...4).should eql(Hamster.vector)
+          vector.send(method, 4...5).should eql(Hamster.vector)
+          vector.send(method, 5...0).should be_nil
+          vector.send(method, 5...5).should be_nil
+          vector.send(method, 5...6).should be_nil
+
+          big.send(method, 159...162).should eql(Hamster.vector(160,161,162))
+          big.send(method, 160...162).should eql(Hamster.vector(161,162))
+          big.send(method, 161...162).should eql(Hamster.vector(162))
+          big.send(method, 9999...10100).should eql(Hamster.vector(10000))
+          big.send(method, 10000...10100).should eql(Hamster.vector)
+          big.send(method, 10001...10100).should be_nil
+
+          vector.send(method, -1..-1).should eql(Hamster.vector(4))
+          vector.send(method, -1...-1).should eql(Hamster.vector)
+          vector.send(method, -1..3).should eql(Hamster.vector(4))
+          vector.send(method, -1...3).should eql(Hamster.vector)
+          vector.send(method, -1..4).should eql(Hamster.vector(4))
+          vector.send(method, -1...4).should eql(Hamster.vector(4))
+          vector.send(method, -1..10).should eql(Hamster.vector(4))
+          vector.send(method, -1...10).should eql(Hamster.vector(4))
+          vector.send(method, -1..0).should eql(Hamster.vector)
+          vector.send(method, -1..-4).should eql(Hamster.vector)
+          vector.send(method, -1...-4).should eql(Hamster.vector)
+          vector.send(method, -1..-6).should eql(Hamster.vector)
+          vector.send(method, -1...-6).should eql(Hamster.vector)
+          vector.send(method, -2..-2).should eql(Hamster.vector(3))
+          vector.send(method, -2...-2).should eql(Hamster.vector)
+          vector.send(method, -2..-1).should eql(Hamster.vector(3,4))
+          vector.send(method, -2...-1).should eql(Hamster.vector(3))
+          vector.send(method, -2..10).should eql(Hamster.vector(3,4))
+          vector.send(method, -2...10).should eql(Hamster.vector(3,4))
+
+          big.send(method, -1..-1).should eql(Hamster.vector(10000))
+          big.send(method, -1..9999).should eql(Hamster.vector(10000))
+          big.send(method, -1...9999).should eql(Hamster.vector)
+          big.send(method, -2...9999).should eql(Hamster.vector(9999))
+          big.send(method, -2..-1).should eql(Hamster.vector(9999,10000))
+
+          vector.send(method, -4..-4).should eql(Hamster.vector(1))
+          vector.send(method, -4..-2).should eql(Hamster.vector(1,2,3))
+          vector.send(method, -4...-2).should eql(Hamster.vector(1,2))
+          vector.send(method, -4..-1).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, -4...-1).should eql(Hamster.vector(1,2,3))
+          vector.send(method, -4..3).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, -4...3).should eql(Hamster.vector(1,2,3))
+          vector.send(method, -4..4).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, -4...4).should eql(Hamster.vector(1,2,3,4))
+          vector.send(method, -4..0).should eql(Hamster.vector(1))
+          vector.send(method, -4...0).should eql(Hamster.vector)
+          vector.send(method, -4..1).should eql(Hamster.vector(1,2))
+          vector.send(method, -4...1).should eql(Hamster.vector(1))
+
+          vector.send(method, -5..-5).should be_nil
+          vector.send(method, -5...-5).should be_nil
+          vector.send(method, -5..-4).should be_nil
+          vector.send(method, -5..-1).should be_nil
+          vector.send(method, -5..10).should be_nil
+
+          big.send(method, -10001..-1).should be_nil
+        end
+
+        it "leaves the original unchanged" do
+          vector.should eql(Hamster.vector(1,2,3,4))
+        end
+      end
+    end
+
+    context "when passed a subclass of Range" do
+      it "works the same as with a Range" do
+        subclass = Class.new(Range)
+        vector.send(method, subclass.new(1,2)).should eql(Hamster.vector(2,3))
+        vector.send(method, subclass.new(-3,-1,true)).should eql(Hamster.vector(2,3))
+      end
+    end
+
+    context "on a subclass of Vector" do
+      it "with index and count or a range, returns an instance of the subclass" do
+        subclass = Class.new(Hamster::Vector)
+        instance = subclass.new([1,2,3])
+        instance.send(method, 0, 0).class.should be(subclass)
+        instance.send(method, 0, 2).class.should be(subclass)
+        instance.send(method, 0..0).class.should be(subclass)
+        instance.send(method, 1..-1).class.should be(subclass)
+      end
+    end
+  end
+end