immutable-ruby 0.0.1 → 0.1.0

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

@@ -1,240 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  let(:vector) { V[1,2,3,4] }
-  let(:big) { V.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(V[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(V.empty)
-          vector.send(method, 0, 1).should  eql(V[1])
-          vector.send(method, 0, 2).should  eql(V[1,2])
-          vector.send(method, 0, 4).should  eql(V[1,2,3,4])
-          vector.send(method, 0, 6).should  eql(V[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(V.empty)
-          vector.send(method, 2, 1).should  eql(V[3])
-          vector.send(method, 2, 2).should  eql(V[3,4])
-          vector.send(method, 2, 4).should  eql(V[3,4])
-          vector.send(method, 2, -1).should be_nil
-          vector.send(method, 4, 0).should  eql(V.empty)
-          vector.send(method, 4, 2).should  eql(V.empty)
-          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(V[1,2,3])
-          big.send(method, 1023, 4).should eql(V[1024,1025,1026,1027])
-          big.send(method, 1024, 4).should eql(V[1025,1026,1027,1028])
-        end
-
-        it "leaves the original unchanged" do
-          vector.should eql(V[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(V.empty)
-          vector.send(method, -1, 1).should  eql(V[4])
-          vector.send(method, -1, 2).should  eql(V[4])
-          vector.send(method, -1, -1).should be_nil
-          vector.send(method, -2, 0).should  eql(V.empty)
-          vector.send(method, -2, 1).should  eql(V[3])
-          vector.send(method, -2, 2).should  eql(V[3,4])
-          vector.send(method, -2, 4).should  eql(V[3,4])
-          vector.send(method, -2, -1).should be_nil
-          vector.send(method, -4, 0).should  eql(V.empty)
-          vector.send(method, -4, 1).should  eql(V[1])
-          vector.send(method, -4, 2).should  eql(V[1,2])
-          vector.send(method, -4, 4).should  eql(V[1,2,3,4])
-          vector.send(method, -4, 6).should  eql(V[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(V[10000])
-          big.send(method, -1, 2).should eql(V[10000])
-          big.send(method, -6, 2).should eql(V[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(V[1,2,3,4])
-          vector.send(method, 0..-10).should eql(V.empty)
-          vector.send(method, 0..0).should   eql(V[1])
-          vector.send(method, 0..1).should   eql(V[1,2])
-          vector.send(method, 0..2).should   eql(V[1,2,3])
-          vector.send(method, 0..3).should   eql(V[1,2,3,4])
-          vector.send(method, 0..4).should   eql(V[1,2,3,4])
-          vector.send(method, 0..10).should  eql(V[1,2,3,4])
-          vector.send(method, 2..-10).should eql(V.empty)
-          vector.send(method, 2..0).should   eql(V.empty)
-          vector.send(method, 2..2).should   eql(V[3])
-          vector.send(method, 2..3).should   eql(V[3,4])
-          vector.send(method, 2..4).should   eql(V[3,4])
-          vector.send(method, 3..0).should   eql(V.empty)
-          vector.send(method, 3..3).should   eql(V[4])
-          vector.send(method, 3..4).should   eql(V[4])
-          vector.send(method, 4..0).should   eql(V.empty)
-          vector.send(method, 4..4).should   eql(V.empty)
-          vector.send(method, 4..5).should   eql(V.empty)
-          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(V[160,161,162,163])
-          big.send(method, 160..162).should     eql(V[161,162,163])
-          big.send(method, 161..162).should     eql(V[162,163])
-          big.send(method, 9999..10100).should  eql(V[10000])
-          big.send(method, 10000..10100).should eql(V.empty)
-          big.send(method, 10001..10100).should be_nil
-
-          vector.send(method, 0...-1).should  eql(V[1,2,3])
-          vector.send(method, 0...-10).should eql(V.empty)
-          vector.send(method, 0...0).should   eql(V.empty)
-          vector.send(method, 0...1).should   eql(V[1])
-          vector.send(method, 0...2).should   eql(V[1,2])
-          vector.send(method, 0...3).should   eql(V[1,2,3])
-          vector.send(method, 0...4).should   eql(V[1,2,3,4])
-          vector.send(method, 0...10).should  eql(V[1,2,3,4])
-          vector.send(method, 2...-10).should eql(V.empty)
-          vector.send(method, 2...0).should   eql(V.empty)
-          vector.send(method, 2...2).should   eql(V.empty)
-          vector.send(method, 2...3).should   eql(V[3])
-          vector.send(method, 2...4).should   eql(V[3,4])
-          vector.send(method, 3...0).should   eql(V.empty)
-          vector.send(method, 3...3).should   eql(V.empty)
-          vector.send(method, 3...4).should   eql(V[4])
-          vector.send(method, 4...0).should   eql(V.empty)
-          vector.send(method, 4...4).should   eql(V.empty)
-          vector.send(method, 4...5).should   eql(V.empty)
-          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(V[160,161,162])
-          big.send(method, 160...162).should     eql(V[161,162])
-          big.send(method, 161...162).should     eql(V[162])
-          big.send(method, 9999...10100).should  eql(V[10000])
-          big.send(method, 10000...10100).should eql(V.empty)
-          big.send(method, 10001...10100).should be_nil
-
-          vector.send(method, -1..-1).should  eql(V[4])
-          vector.send(method, -1...-1).should eql(V.empty)
-          vector.send(method, -1..3).should   eql(V[4])
-          vector.send(method, -1...3).should  eql(V.empty)
-          vector.send(method, -1..4).should   eql(V[4])
-          vector.send(method, -1...4).should  eql(V[4])
-          vector.send(method, -1..10).should  eql(V[4])
-          vector.send(method, -1...10).should eql(V[4])
-          vector.send(method, -1..0).should   eql(V.empty)
-          vector.send(method, -1..-4).should  eql(V.empty)
-          vector.send(method, -1...-4).should eql(V.empty)
-          vector.send(method, -1..-6).should  eql(V.empty)
-          vector.send(method, -1...-6).should eql(V.empty)
-          vector.send(method, -2..-2).should  eql(V[3])
-          vector.send(method, -2...-2).should eql(V.empty)
-          vector.send(method, -2..-1).should  eql(V[3,4])
-          vector.send(method, -2...-1).should eql(V[3])
-          vector.send(method, -2..10).should  eql(V[3,4])
-          vector.send(method, -2...10).should eql(V[3,4])
-
-          big.send(method, -1..-1).should    eql(V[10000])
-          big.send(method, -1..9999).should  eql(V[10000])
-          big.send(method, -1...9999).should eql(V.empty)
-          big.send(method, -2...9999).should eql(V[9999])
-          big.send(method, -2..-1).should    eql(V[9999,10000])
-
-          vector.send(method, -4..-4).should  eql(V[1])
-          vector.send(method, -4..-2).should  eql(V[1,2,3])
-          vector.send(method, -4...-2).should eql(V[1,2])
-          vector.send(method, -4..-1).should  eql(V[1,2,3,4])
-          vector.send(method, -4...-1).should eql(V[1,2,3])
-          vector.send(method, -4..3).should   eql(V[1,2,3,4])
-          vector.send(method, -4...3).should  eql(V[1,2,3])
-          vector.send(method, -4..4).should   eql(V[1,2,3,4])
-          vector.send(method, -4...4).should  eql(V[1,2,3,4])
-          vector.send(method, -4..0).should   eql(V[1])
-          vector.send(method, -4...0).should  eql(V.empty)
-          vector.send(method, -4..1).should   eql(V[1,2])
-          vector.send(method, -4...1).should  eql(V[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(V[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(V[2,3])
-        vector.send(method, subclass.new(-3,-1,true)).should eql(V[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(Immutable::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

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

@@ -1,56 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  [
-    [:sort, ->(left, right) { left.length <=> right.length }],
-    [:sort_by, ->(item) { item.length }],
-  ].each do |method, comparator|
-    describe "##{method}" do
-      [
-        [[], []],
-        [["A"], ["A"]],
-        [%w[Ichi Ni San], %w[Ni San Ichi]],
-      ].each do |values, expected|
-        describe "on #{values.inspect}" do
-          let(:vector) { V[*values] }
-
-          context "with a block" do
-            it "preserves the original" do
-              vector.send(method, &comparator)
-              vector.should eql(V[*values])
-            end
-
-            it "returns #{expected.inspect}" do
-              vector.send(method, &comparator).should eql(V[*expected])
-            end
-          end
-
-          context "without a block" do
-            it "preserves the original" do
-              vector.send(method)
-              vector.should eql(V[*values])
-            end
-
-            it "returns #{expected.sort.inspect}" do
-              vector.send(method).should eql(V[*expected.sort])
-            end
-          end
-        end
-      end
-
-      [10, 31, 32, 33, 1023, 1024, 1025].each do |size|
-        context "on a #{size}-item vector" do
-          it "behaves like Array#{method}" do
-            array = size.times.map { rand(10000) }
-            vector = V.new(array)
-            if method == :sort
-              vector.sort.should == array.sort
-            else
-              vector.sort_by { |x| -x }.should == array.sort_by { |x| -x }
-            end
-          end
-        end
-      end
-    end
-  end
-end

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

@@ -1,17 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#sum" do
-    [
-      [[], 0],
-      [[2], 2],
-      [[1, 3, 5, 7, 11], 27],
-    ].each do |values, expected|
-      describe "on #{values.inspect}" do
-        it "returns #{expected.inspect}" do
-          V[*values].sum.should == expected
-        end
-      end
-    end
-  end
-end

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

@@ -1,42 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#take" do
-    [
-      [[], 10, []],
-      [["A"], 10, ["A"]],
-      [%w[A B C], 0, []],
-      [%w[A B C], 2, %w[A B]],
-      [(1..32), 1, [1]],
-      [(1..33), 32, (1..32)],
-      [(1..100), 40, (1..40)]
-    ].each do |values, number, expected|
-      describe "#{number} from #{values.inspect}" do
-        let(:vector) { V[*values] }
-
-        it "preserves the original" do
-          vector.take(number)
-          vector.should eql(V[*values])
-        end
-
-        it "returns #{expected.inspect}" do
-          vector.take(number).should eql(V[*expected])
-        end
-      end
-    end
-
-    context "when number of elements specified is identical to size" do
-      let(:vector) { V[1, 2, 3, 4, 5, 6] }
-      it "returns self" do
-        vector.take(vector.size).should be(vector)
-      end
-    end
-
-    context "when number of elements specified is bigger than size" do
-      let(:vector) { V[1, 2, 3, 4, 5, 6] }
-      it "returns self" do
-        vector.take(vector.size + 1).should be(vector)
-      end
-    end
-  end
-end

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

@@ -1,34 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#take_while" do
-    [
-      [[], []],
-      [["A"], ["A"]],
-      [%w[A B C], %w[A B]]
-    ].each do |values, expected|
-      describe "on #{values.inspect}" do
-        let(:vector) { V[*values] }
-        let(:result) { vector.take_while { |item| item < "C" }}
-
-        describe "with a block" do
-          it "returns #{expected.inspect}" do
-            result.should eql(V[*expected])
-          end
-
-          it "preserves the original" do
-            result
-            vector.should eql(V[*values])
-          end
-        end
-
-        describe "without a block" do
-          it "returns an Enumerator" do
-            vector.take_while.class.should be(Enumerator)
-            vector.take_while.each { |item| item < "C" }.should eql(V[*expected])
-          end
-        end
-      end
-    end
-  end
-end

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

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

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

@@ -1,34 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  let(:vector) { V[*values] }
-
-  describe "#to_ary" do
-    let(:values) { %w[A B C D] }
-
-    it "converts using block parameters" do
-      def expectations(&block)
-        yield(vector)
-      end
-      expectations do |a, b, *c|
-        expect(a).to eq("A")
-        expect(b).to eq("B")
-        expect(c).to eq(%w[C D])
-      end
-    end
-
-    it "converts using method arguments" do
-      def expectations(a, b, *c)
-        expect(a).to eq("A")
-        expect(b).to eq("B")
-        expect(c).to eq(%w[C D])
-      end
-      expectations(*vector)
-    end
-
-    it "converts using splat" do
-      array = *vector
-      expect(array).to eq(%w[A B C D])
-    end
-  end
-end

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

@@ -1,30 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#to_list" do
-    [
-      [],
-      ["A"],
-      %w[A B C],
-    ].each do |values|
-      describe "on #{values.inspect}" do
-        let(:vector) { V.new(values) }
-        let(:list) { vector.to_list }
-
-        it "returns a list" do
-          list.is_a?(Immutable::List).should == true
-        end
-
-        describe "the returned list" do
-          it "has the correct length" do
-            list.size.should == values.size
-          end
-
-          it "contains all values" do
-            list.to_a.should == values
-          end
-        end
-      end
-    end
-  end
-end

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

@@ -1,21 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#to_set" do
-    [
-      [],
-      ["A"],
-      %w[A B C],
-      (1..10),
-      (1..32),
-      (1..33),
-      (1..1000)
-    ].each do |values|
-      describe "on #{values.inspect}" do
-        it "returns a set with the same values" do
-          V[*values].to_set.should eql(S[*values])
-        end
-      end
-    end
-  end
-end

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

@@ -1,48 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#transpose" do
-    it "takes a vector of vectors and transposes rows and columns" do
-      V[V[1, 'a'], V[2, 'b'], V[3, 'c']].transpose.should eql(V[V[1, 2, 3], V["a", "b", "c"]])
-      V[V[1, 2, 3], V["a", "b", "c"]].transpose.should eql(V[V[1, 'a'], V[2, 'b'], V[3, 'c']])
-      V[].transpose.should eql(V[])
-      V[V[]].transpose.should eql(V[])
-      V[V[], V[]].transpose.should eql(V[])
-      V[V[0]].transpose.should eql(V[V[0]])
-      V[V[0], V[1]].transpose.should eql(V[V[0, 1]])
-    end
-
-    it "raises an IndexError if the vectors are not of the same length" do
-      -> { V[V[1,2], V[:a]].transpose }.should raise_error(IndexError)
-    end
-
-    it "also works on Vectors of Arrays" do
-      V[[1,2,3], [4,5,6]].transpose.should eql(V[V[1,4], V[2,5], V[3,6]])
-    end
-
-    [10, 31, 32, 33, 1000, 1023, 1024, 1025, 2000].each do |size|
-      context "on #{size}-item vectors" do
-        it "behaves like Array#transpose" do
-          array = rand(10).times.map { size.times.map { rand(10000) }}
-          vector = V.new(array)
-          result = vector.transpose
-          # Array#== uses Object#== to compare corresponding elements,
-          #   so although Vector#== does type coercion, it does not consider
-          #   nested Arrays and corresponding nested Vectors to be equal
-          # That is why the following ".map { |a| V.new(a) }" is needed
-          result.should == array.transpose.map { |a| V.new(a) }
-          result.each { |v| v.class.should be(Immutable::Vector) }
-        end
-      end
-    end
-
-    context "on a subclass of Vector" do
-      it "returns instances of the subclass" do
-        subclass = Class.new(V)
-        instance = subclass.new([[1,2,3], [4,5,6]])
-        instance.transpose.class.should be(subclass)
-        instance.transpose.each { |v| v.class.should be(subclass) }
-      end
-    end
-  end
-end

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

@@ -1,76 +0,0 @@
-require "spec_helper"
-
-describe Immutable::Vector do
-  describe "#uniq" do
-    let(:vector) { V['a', 'b', 'a', 'a', 'c', 'b'] }
-
-    it "returns a vector with no duplicates" do
-      vector.uniq.should eql(V['a', 'b', 'c'])
-    end
-
-    it "leaves the original unmodified" do
-      vector.uniq
-      vector.should eql(V['a', 'b', 'a', 'a', 'c', 'b'])
-    end
-
-    it "uses #eql? semantics" do
-      V[1.0, 1].uniq.should eql(V[1.0, 1])
-    end
-
-    it "also uses #hash when determining which values are duplicates" do
-      x = double(1)
-      x.should_receive(:hash).at_least(1).times.and_return(1)
-      y = double(2)
-      y.should_receive(:hash).at_least(1).times.and_return(2)
-      V[x, y].uniq
-    end
-
-    it "keeps the first of each group of duplicate values" do
-      x, y, z = 'a', 'a', 'a'
-      result = V[x, y, z].uniq
-      result.size.should == 1
-      result[0].should be(x)
-    end
-
-    context "when passed a block" do
-      it "uses the return value of the block to determine which items are duplicate" do
-        v = V['a', 'A', 'B', 'b']
-        v.uniq(&:upcase).should == V['a', 'B']
-      end
-    end
-
-    context "on a vector with no duplicates" do
-      it "returns an unchanged vector" do
-        V[1, 2, 3].uniq.should eql(V[1, 2, 3])
-      end
-
-      context "if the vector has more than 32 elements and is initialized with Vector.new" do
-        # Regression test for GitHub issue #182
-        it "returns an unchanged vector" do
-          vector1,vector2 = 2.times.collect { V.new(0..36) }
-          vector1.uniq.should eql(vector2)
-        end
-      end
-    end
-
-    [10, 31, 32, 33, 1000, 1023, 1024, 1025, 2000].each do |size|
-      context "on a #{size}-item vector" do
-        it "behaves like Array#uniq" do
-          array = size.times.map { rand(size*2) }
-          vector = V.new(array)
-          result = vector.uniq
-          result.should == array.uniq
-          result.class.should be(Immutable::Vector)
-        end
-      end
-    end
-
-    context "from a subclass" do
-      it "returns an instance of the subclass" do
-        subclass = Class.new(Immutable::Vector)
-        instance = subclass.new([1,2,3])
-        instance.uniq.class.should be(subclass)
-      end
-    end
-  end
-end

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

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