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(&:class).values.each { |v| v.class.should be(subclass) }
      end
    end
  end
end