immutable-ruby 0.0.4 → 0.1.0

data/spec/lib/immutable/vector/get_spec.rb

@@ -1,74 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  [:get, :at].each do |method|
-    describe "##{method}" do
-      context "when empty" do
-        it "always returns nil" do
-          (-1..1).each do |i|
-            V.empty.send(method, i).should be_nil
-          end
-        end
-      end
-
-      context "when not empty" do
-        let(:vector) { V[*(1..1025)] }
-
-        context "with a positive index" do
-          context "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
-
-          context "outside the absolute bounds of the vector" do
-            it "returns nil" do
-              vector.send(method, vector.size).should be_nil
-            end
-          end
-        end
-
-        context "with a negative index" do
-          context "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
-
-          context "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
-
-      [1, 10, 31, 32, 33, 1024, 1025, 2000].each do |size|
-        context "on a #{size}-item vector" do
-          it "works correctly, even after various addings and removings" do
-            array = size.times.map { rand(10000) }
-            vector = V.new(array)
-            100.times do
-              if rand(2) == 0
-                value, index = rand(10000), rand(size)
-                array[index] = value
-                vector = vector.set(index, value)
-              else
-                index = rand(array.size)
-                array.delete_at(index)
-                vector = vector.delete_at(index)
-              end
-            end
-            0.upto(array.size) do |i|
-              array[i].should == vector.send(method, i)
-            end
-          end
-        end
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/group_by_spec.rb

@@ -1,57 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#group_by" do
-    context "with a block" do
-      [
-        [[], []],
-        [[1], [true => V[1]]],
-        [[1, 2, 3, 4], [true => V[1, 3], false => V[2, 4]]],
-      ].each do |values, expected|
-        context "on #{values.inspect}" do
-          let(:vector) { V[*values] }
-
-          it "returns #{expected.inspect}" do
-            vector.group_by(&:odd?).should eql(H[*expected])
-            vector.should eql(V.new(values)) # make sure it hasn't changed
-          end
-        end
-      end
-    end
-
-    context "without a block" do
-      [
-        [[], []],
-        [[1], [1 => V[1]]],
-        [[1, 2, 3, 4], [1 => V[1], 2 => V[2], 3 => V[3], 4 => V[4]]],
-      ].each do |values, expected|
-        context "on #{values.inspect}" do
-          let(:vector) { V[*values] }
-
-          it "returns #{expected.inspect}" do
-            vector.group_by.should eql(H[*expected])
-            vector.should eql(V.new(values)) # make sure it hasn't changed
-          end
-        end
-      end
-    end
-
-    context "on an empty vector" do
-      it "returns an empty hash" do
-        V.empty.group_by { |x| x }.should eql(H.empty)
-      end
-    end
-
-    it "returns a hash without default proc" do
-      V[1,2,3].group_by { |x| x }.default_proc.should be_nil
-    end
-
-    context "from a subclass" do
-      it "returns an Hash whose values are instances of the subclass" do
-        subclass = Class.new(Immutable::Vector)
-        instance = subclass.new([1, 'string', :symbol])
-        instance.group_by { |x| x.class }.values.each { |v| v.class.should be(subclass) }
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/include_spec.rb

@@ -1,30 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  [:include?, :member?].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],
-        [["A", "B", false], false, true],
-        [[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
-          it "returns #{expected.inspect}" do
-            V[*values].send(method, item).should == expected
-          end
-        end
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/insert_spec.rb

@@ -1,68 +0,0 @@
-require "spec_helper"
-require 'pry'
-
-describe Immutable::Vector do
-  describe "#insert" do
-    let(:original) { V[1, 2, 3] }
-
-    it "can add items at the beginning of a vector" do
-      vector = original.insert(0, :a, :b)
-      vector.size.should be(5)
-      vector.at(0).should be(:a)
-      vector.at(2).should be(1)
-    end
-
-    it "can add items in the middle of a vector" do
-      vector = original.insert(1, :a, :b, :c)
-      vector.size.should be(6)
-      vector.to_a.should == [1, :a, :b, :c, 2, 3]
-    end
-
-    it "can add items at the end of a vector" do
-      vector = original.insert(3, :a, :b, :c)
-      vector.size.should be(6)
-      vector.to_a.should == [1, 2, 3, :a, :b, :c]
-    end
-
-    it "can add items past the end of a vector" do
-      vector = original.insert(6, :a, :b)
-      vector.size.should be(8)
-      vector.to_a.should == [1, 2, 3, nil, nil, nil, :a, :b]
-    end
-
-    it "accepts a negative index, which counts back from the end of the vector" do
-      vector = original.insert(-2, :a)
-      vector.size.should be(4)
-      vector.to_a.should == [1, :a, 2, 3]
-    end
-
-    it "raises IndexError if a negative index is too great" do
-      expect { original.insert(-4, :a) }.to raise_error(IndexError)
-    end
-
-    it "works when adding an item past boundary when vector trie needs to deepen" do
-      vector = original.insert(32, :a, :b)
-      vector.size.should == 34
-      vector.to_a.size.should == 34
-    end
-
-    it "works when adding to an empty Vector" do
-      V.empty.insert(0, :a).should eql(V[:a])
-    end
-
-    it "has the right size and contents after many insertions" do
-      array  = (1..4000).to_a # we use an Array as standard of correctness
-      vector = Immutable::Vector.new(array)
-      100.times do
-        items = rand(10).times.map { rand(10000) }
-        index = rand(vector.size)
-        vector = vector.insert(index, *items)
-        array.insert(index, *items)
-        vector.size.should == array.size
-        ary = vector.to_a
-        ary.size.should == vector.size
-        ary.should eql(array)
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/inspect_spec.rb

@@ -1,49 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  let(:vector) { V[*values] }
-
-  describe "#inspect" do
-    let(:inspect) { vector.inspect }
-
-    shared_examples "checking output" do
-      it "returns its contents as a programmer-readable string" do
-        expect(inspect).to eq(output)
-      end
-
-      it "returns a string which can be eval'd to get back an equivalent vector" do
-        expect(eval(inspect)).to eql(vector)
-      end
-    end
-
-    context "with an empty array" do
-      let(:output) { "Immutable::Vector[]" }
-      let(:values) { [] }
-
-      include_examples "checking output"
-    end
-
-    context "with a single item array" do
-      let(:output) { "Immutable::Vector[\"A\"]" }
-      let(:values) { %w[A] }
-
-      include_examples "checking output"
-    end
-
-    context "with a multi-item array" do
-      let(:output) { "Immutable::Vector[\"A\", \"B\"]" }
-      let(:values) { %w[A B] }
-
-      include_examples "checking output"
-    end
-
-    context "from a subclass" do
-      MyVector = Class.new(Immutable::Vector)
-      let(:vector) { MyVector.new(values) }
-      let(:output) { "MyVector[1, 2]" }
-      let(:values) { [1, 2] }
-
-      include_examples "checking output"
-    end
-  end
-end

data/spec/lib/immutable/vector/join_spec.rb

@@ -1,58 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#join" do
-    context "with a separator" do
-      [
-        [[], ""],
-        [["A"], "A"],
-        [[DeterministicHash.new("A", 1), DeterministicHash.new("B", 2), DeterministicHash.new("C", 3)], "A|B|C"]
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          let(:vector) { V[*values] }
-
-          it "preserves the original" do
-            vector.join("|")
-            vector.should eql(V[*values])
-          end
-
-          it "returns #{expected.inspect}" do
-            vector.join("|").should == expected
-          end
-        end
-      end
-    end
-
-    context "without a separator" do
-      [
-        [[], ""],
-        [["A"], "A"],
-        [[DeterministicHash.new("A", 1), DeterministicHash.new("B", 2), DeterministicHash.new("C", 3)], "ABC"]
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          let(:vector) { V[*values] }
-
-          it "preserves the original" do
-            vector.join
-            vector.should eql(V[*values])
-          end
-
-          it "returns #{expected.inspect}" do
-            vector.join.should == expected
-          end
-        end
-      end
-    end
-
-    context "without a separator (with global default separator set)" do
-      before { $, = '**' }
-      after  { $, = nil }
-
-      describe 'on ["A", "B", "C"]' do
-        it 'returns "A**B**C"' do
-          V["A", "B", "C"].join.should == "A**B**C"
-        end
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/last_spec.rb

@@ -1,45 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  let(:vector) { V[*values] }
-
-  describe "#last" do
-    let(:last) { vector.last }
-
-    shared_examples "checking values" do
-      it "returns the last item" do
-        expect(last).to eq(last_item)
-      end
-    end
-
-    context "with an empty vector" do
-      let(:last_item) { nil }
-      let(:values) { [] }
-
-      include_examples "checking values"
-    end
-
-    context "with a single item vector" do
-      let(:last_item) { "A" }
-      let(:values) { %w[A] }
-
-      include_examples "checking values"
-    end
-
-    context "with a multi-item vector" do
-      let(:last_item) { "B" }
-      let(:values) { %w[A B] }
-
-      include_examples "checking values"
-    end
-
-    [31, 32, 33, 1023, 1024, 1025].each do |size|
-      context "with a #{size}-item vector" do
-        let(:last_item) { size }
-        let(:values) { (1..size).to_a }
-
-        include_examples "checking values"
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/length_spec.rb

@@ -1,45 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  let(:vector) { V[*values] }
-
-  describe "#length" do
-    let(:length) { vector.length }
-
-    shared_examples "checking size" do
-      it "returns the values" do
-        expect(length).to eq(size)
-      end
-    end
-
-    context "with an empty vector" do
-      let(:values) { [] }
-      let(:size) { 0 }
-
-      include_examples "checking size"
-    end
-
-    context "with a single item vector" do
-      let(:values) { %w[A] }
-      let(:size) { 1 }
-
-      include_examples "checking size"
-    end
-
-    context "with a multi-item vector" do
-      let(:values) { %w[A B] }
-      let(:size) { 2 }
-
-      include_examples "checking size"
-    end
-
-    [31, 32, 33, 1023, 1024, 1025].each do |size|
-      context "with a #{size}-item vector" do
-        let(:values) { (1..size).to_a }
-        let(:size) { size }
-
-        include_examples "checking size"
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/ltlt_spec.rb

@@ -1,65 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  let(:vector) { V[*values] }
-
-  describe "#<<" do
-    let(:ltlt) { vector << added_value }
-
-    shared_examples "checking adding values" do
-      let(:added_vector) { V[*added_values] }
-
-      it "preserves the original" do
-        original = vector
-        vector << added_value
-        expect(original).to eq(vector)
-      end
-
-      it "ltlts the item to the vector" do
-        expect(ltlt).to eq(added_vector)
-      end
-    end
-
-    context "with a empty array adding a single item" do
-      let(:values) { [] }
-      let(:added_value) { "A" }
-      let(:added_values) { ["A"] }
-
-      include_examples "checking adding values"
-    end
-
-    context "with a single-item array adding a different item" do
-      let(:values) { ["A"] }
-      let(:added_value) { "B" }
-      let(:added_values) { %w[A B] }
-
-      include_examples "checking adding values"
-    end
-
-    context "with a single-item array adding a duplicate item" do
-      let(:values) { ["A"] }
-      let(:added_value) { "A" }
-      let(:added_values) { %w[A A] }
-
-      include_examples "checking adding values"
-    end
-
-    [31, 32, 33, 1023, 1024, 1025].each do |size|
-      context "with a #{size}-item vector adding a different item" do
-        let(:values) { (1..size).to_a }
-        let(:added_value) { size+1 }
-        let(:added_values) { (1..(size+1)).to_a }
-
-        include_examples "checking adding values"
-      end
-    end
-
-    context "from a subclass" do
-      it "returns an instance of the subclass" do
-        subclass = Class.new(Immutable::Vector)
-        instance = subclass[1,2,3]
-        (instance << 4).class.should be(subclass)
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/map_spec.rb

@@ -1,51 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  [:map, :collect].each do |method|
-    describe "##{method}" do
-      context "when empty" do
-        let(:vector) { V.empty }
-
-        it "returns self" do
-          vector.send(method) {}.should equal(vector)
-        end
-      end
-
-      context "when not empty" do
-        let(:vector) { V["A", "B", "C"] }
-
-        context "with a block" do
-          it "preserves the original values" do
-            vector.send(method, &:downcase)
-            vector.should eql(V["A", "B", "C"])
-          end
-
-          it "returns a new vector with the mapped values" do
-            vector.send(method, &:downcase).should eql(V["a", "b", "c"])
-          end
-        end
-
-        context "with no block" do
-          it "returns an Enumerator" do
-            vector.send(method).class.should be(Enumerator)
-            vector.send(method).each(&:downcase).should eql(V['a', 'b', 'c'])
-          end
-        end
-      end
-
-      context "from a subclass" do
-        it "returns an instance of the subclass" do
-          subclass = Class.new(Immutable::Vector)
-          instance = subclass[1,2,3]
-          instance.map { |x| x + 1 }.class.should be(subclass)
-        end
-      end
-
-      context "on a large vector" do
-        it "works" do
-          V.new(1..2000).map { |x| x * 2 }.should eql(V.new((1..2000).map { |x| x * 2}))
-        end
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/marshal_spec.rb

@@ -1,31 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#marshal_dump/#marshal_load" do
-    let(:ruby) do
-      File.join(RbConfig::CONFIG["bindir"], RbConfig::CONFIG["ruby_install_name"])
-    end
-    let(:child_cmd) do
-      %Q|#{ruby} -I lib -r immutable -e 'vector = Immutable::Vector[5, 10, 15]; $stdout.write(Marshal.dump(vector))'|
-    end
-
-    let(:reloaded_vector) do
-      IO.popen(child_cmd, "r+") do |child|
-        reloaded_vector = Marshal.load(child)
-        child.close
-        reloaded_vector
-      end
-    end
-
-    it "can survive dumping and loading into a new process" do
-      expect(reloaded_vector).to eql(V[5, 10, 15])
-    end
-
-    it "is still possible to find items by index after loading" do
-      expect(reloaded_vector[0]).to eq(5)
-      expect(reloaded_vector[1]).to eq(10)
-      expect(reloaded_vector[2]).to eq(15)
-      expect(reloaded_vector.size).to eq(3)
-    end
-  end
-end

data/spec/lib/immutable/vector/maximum_spec.rb

@@ -1,33 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#max" do
-    context "with a block" do
-      [
-        [[], nil],
-        [["A"], "A"],
-        [%w[Ichi Ni San], "Ichi"],
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          it "returns #{expected.inspect}" do
-            V[*values].max { |maximum, item| maximum.length <=> item.length }.should == expected
-          end
-        end
-      end
-    end
-
-    context "without a block" do
-      [
-        [[], nil],
-        [["A"], "A"],
-        [%w[Ichi Ni San], "San"],
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          it "returns #{expected.inspect}" do
-            V[*values].max.should == expected
-          end
-        end
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/minimum_spec.rb

@@ -1,33 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#min" do
-    context "with a block" do
-      [
-        [[], nil],
-        [["A"], "A"],
-        [%w[Ichi Ni San], "Ni"],
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          it "returns #{expected.inspect}" do
-            V[*values].min { |minimum, item| minimum.length <=> item.length }.should == expected
-          end
-        end
-      end
-    end
-
-    context "without a block" do
-      [
-        [[], nil],
-        [["A"], "A"],
-        [%w[Ichi Ni San], "Ichi"],
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          it "returns #{expected.inspect}" do
-            V[*values].min.should == expected
-          end
-        end
-      end
-    end
-  end
-end

data/spec/lib/immutable/vector/multiply_spec.rb

@@ -1,47 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#*" do
-    let(:vector) { V[1, 2, 3] }
-
-    context "with a String argument" do
-      it "acts just like #join" do
-        (vector * 'boo').should eql(vector.join('boo'))
-      end
-    end
-
-    context "with an Integer argument" do
-      it "concatenates n copies of the array" do
-        (vector * 0).should eql(V.empty)
-        (vector * 1).should eql(vector)
-        (vector * 2).should eql(V[1,2,3,1,2,3])
-        (vector * 3).should eql(V[1,2,3,1,2,3,1,2,3])
-      end
-
-      it "raises an ArgumentError if integer is negative" do
-        -> { vector * -1 }.should raise_error(ArgumentError)
-      end
-
-      it "works on large vectors" do
-        array = (1..50).to_a
-        (V.new(array) * 25).should eql(V.new(array * 25))
-      end
-    end
-
-    context "with a subclass of Vector" do
-      it "returns an instance of the subclass" do
-        subclass = Class.new(Immutable::Vector)
-        instance = subclass.new([1,2,3])
-        (instance * 10).class.should be(subclass)
-      end
-    end
-
-    it "raises a TypeError if passed nil" do
-      -> { vector * nil }.should raise_error(TypeError)
-    end
-
-    it "raises an ArgumentError if passed no arguments" do
-      -> { vector.* }.should raise_error(ArgumentError)
-    end
-  end
-end