hamster 0.2.1 → 0.2.2

data/History.rdoc

@@ -1,3 +1,17 @@
+=== 0.2.2 / 2010-01-15
+
+* Implement List#flatten.
+
+* Implement List#each_slice (aliased as #each_chunk).
+
+* Return a tuple rather than a list for #split_at, #partition, #break, and #span.
+
+* Implement List#chunk.
+
+* Implement Set#compact.
+
+* Implement List#compact.
+
 === 0.2.1 / 2010-01-15
 
 * Fix bug: List#empty? would cause a stack overflow on very large streams.

data/lib/hamster/list.rb

@@ -1,6 +1,7 @@
 require 'forwardable'
 require 'monitor'
 
+require 'hamster/tuple'
 require 'hamster/set'
 
 module Hamster
@@ -42,17 +43,8 @@ module Hamster
 
     extend Forwardable
 
-    Undefined = Object.new
-
-    CADR = /^c([ad]+)r$/
-
-    def first
-      head
-    end
+    def_delegator :self, :head, :first
 
-    def empty?
-      false
-    end
     def_delegator :self, :empty?, :null?
 
     def size
@@ -66,6 +58,9 @@ module Hamster
     def_delegator :self, :cons, :>>
 
     def each
+      # return nil if empty?
+      # yield(head)
+      # tail.each(&block)
       return self unless block_given?
       list = self
       while !list.empty?
@@ -88,6 +83,10 @@ module Hamster
     def_delegator :self, :map, :collect
 
     def reduce(memo = Undefined, &block)
+      # return memo if empty?
+      # return memo unless block_given?
+      # return tail.reduce(head, &block) if memo.equal?(Undefined)
+      # tail.reduce(yield(memo, head), &block)
       return tail.reduce(head, &block) if memo.equal?(Undefined)
       return memo unless block_given?
       each { |item| memo = yield(memo, item)  }
@@ -176,6 +175,9 @@ module Hamster
     def_delegator :self, :include?, :elem?
 
     def any?
+      # return false if empty?
+      # return any? { |item| item } unless block_given?
+      # !! yield(head) || tail.any?(&block)
       return any? { |item| item } unless block_given?
       each { |item| return true if yield(item) }
       false
@@ -184,6 +186,9 @@ module Hamster
     def_delegator :self, :any?, :exists?
 
     def all?
+      # return true if empty?
+      # return all? { |item| item } unless block_given?
+      # !! yield(head) && tail.all?(&block)
       return all? { |item| item } unless block_given?
       each { |item| return false unless yield(item) }
       true
@@ -191,12 +196,18 @@ module Hamster
     def_delegator :self, :all?, :forall?
 
     def none?
+      # return true if empty?
+      # return none? { |item| item } unless block_given?
+      # !yield(head) && tail.none?(&block)
       return none? { |item| item } unless block_given?
       each { |item| return false if yield(item) }
       true
     end
 
     def one?(&block)
+      # return true if empty?
+      # return none? { |item| item } unless block_given?
+      # !yield(head) && tail.none?(&block)
       return one? { |item| item } unless block_given?
       list = self
       while !list.empty?
@@ -207,6 +218,10 @@ module Hamster
     end
 
     def find
+      # return nil if empty?
+      # return nil unless block_given?
+      # return head if yield(head)
+      # tail.find(&block)
       return nil unless block_given?
       each { |item| return item if yield(item) }
     end
@@ -214,7 +229,7 @@ module Hamster
 
     def partition(&block)
       return self unless block_given?
-      Stream.new { Sequence.new(filter(&block), Sequence.new(remove(&block))) }
+      Tuple.new(filter(&block), remove(&block))
     end
 
     def append(other)
@@ -271,16 +286,16 @@ module Hamster
     end
 
     def split_at(number)
-      Sequence.new(take(number), Sequence.new(drop(number)))
+      Tuple.new(take(number), drop(number))
     end
 
     def span(&block)
-      return Sequence.new(self, Sequence.new(EmptyList)) unless block_given?
-      Sequence.new(take_while(&block), Sequence.new(drop_while(&block)))
+      return Tuple.new(self, EmptyList) unless block_given?
+      Tuple.new(take_while(&block), drop_while(&block))
     end
 
     def break(&block)
-      return Sequence.new(self, Sequence.new(EmptyList)) unless block_given?
+      return Tuple.new(self, EmptyList) unless block_given?
       span { |item| !yield(item) }
     end
 
@@ -393,9 +408,45 @@ module Hamster
     end
     def_delegator :self, :combinations, :combination
 
+    def compact
+      remove(&:nil?)
+    end
+
+    def chunk(number)
+      Stream.new do
+        if empty?
+          self
+        else
+          first, remainder = split_at(number)
+          Sequence.new(first, remainder.chunk(number))
+        end
+      end
+    end
+
+    def each_chunk(number, &block)
+      chunk(number).each(&block)
+    end
+    def_delegator :self, :each_chunk, :each_slice
+
+    def flatten
+      Stream.new do
+        if empty?
+          self
+        elsif head.is_a?(List)
+          head.append(tail.flatten)
+        else
+          Sequence.new(head, tail.flatten)
+        end
+      end
+    end
+
     def eql?(other)
+      # return true if other.equal?(self)
+      # return false unless other.is_a?(List)
+      # return other.empty? if empty?
+      # return empty? if other.empty?
+      # other.head.eql?(head) && other.tail.eql?(tail)
       return false unless other.is_a?(List)
-
       list = self
       while !list.empty? && !other.empty?
         return true if other.equal?(list)
@@ -404,7 +455,6 @@ module Hamster
         list = list.tail
         other = other.tail
       end
-
       other.empty? && list.empty?
     end
     def_delegator :self, :eql?, :==
@@ -417,8 +467,8 @@ module Hamster
     def to_a
       reduce([]) { |a, item| a << item }
     end
-    def_delegator :self, :to_a, :to_ary
     def_delegator :self, :to_a, :entries
+    def_delegator :self, :to_a, :to_ary
 
     def to_list
       self
@@ -434,6 +484,10 @@ module Hamster
 
     private
 
+    Undefined = Object.new
+
+    CADR = /^c([ad]+)r$/
+
     def method_missing(name, *args, &block)
       if CADR === name
         accessor($1)
@@ -447,7 +501,7 @@ module Hamster
     # identify the series of car and cdr operations that is performed by the function. The order in which the 'a's and
     # 'd's appear is the inverse of the order in which the corresponding operations are performed.
     def accessor(sequence)
-      sequence.split(//).reverse!.reduce(self) do |memo, char|
+      sequence.reverse.each_char.reduce(self) do |memo, char|
         case char
         when "a" then memo.head
         when "d" then memo.tail
@@ -468,6 +522,10 @@ module Hamster
       @tail = tail
     end
 
+    def empty?
+      false
+    end
+
   end
 
   class Stream

data/lib/hamster/set.rb

@@ -1,5 +1,6 @@
 require 'forwardable'
 
+require 'hamster/tuple'
 require 'hamster/trie'
 require 'hamster/list'
 
@@ -124,7 +125,7 @@ module Hamster
 
     def partition(&block)
       return self unless block_given?
-      Stream.new { Sequence.new(filter(&block), Sequence.new(reject(&block))) }
+      Tuple.new(filter(&block), reject(&block))
     end
 
     def grep(pattern, &block)
@@ -160,6 +161,10 @@ module Hamster
       to_a.join(sep)
     end
 
+    def compact
+      remove(&:nil?)
+    end
+
     def eql?(other)
       other.is_a?(self.class) && @trie.eql?(other.instance_eval{@trie})
     end

data/lib/hamster/tuple.rb

@@ -0,0 +1,40 @@
+require 'forwardable'
+
+module Hamster
+
+  class Tuple
+
+    extend Forwardable
+
+    def initialize(*items)
+      @items = items.freeze
+    end
+
+    def first
+      @items.first
+    end
+
+    def last
+      @items.last
+    end
+
+    def dup
+      self
+    end
+    def_delegator :self, :dup, :clone
+
+    def to_ary
+      @items
+    end
+
+    def to_a
+      @items.dup
+    end
+
+    def inspect
+      "(#{@items.inspect[1..-2]})"
+    end
+
+  end
+
+end

data/lib/hamster/version.rb

@@ -1,5 +1,5 @@
 module Hamster
 
-  VERSION = "0.2.1".freeze
+  VERSION = "0.2.2".freeze
 
 end

data/spec/hamster/list/break_spec.rb

@@ -1,5 +1,6 @@
 require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
+require 'hamster/tuple'
 require 'hamster/list'
 
 describe Hamster::List do
@@ -31,16 +32,16 @@ describe Hamster::List do
 
           before do
             @result = @original.break { |item| item > 2 }
-            @prefix = @result.car
-            @remainder = @result.cadr
+            @prefix = @result.first
+            @remainder = @result.last
           end
 
           it "preserves the original" do
             @original.should == Hamster.list(*values)
           end
 
-          it "returns a list with two items" do
-            @result.size.should == 2
+          it "returns a tuple with two items" do
+            @result.is_a?(Hamster::Tuple).should == true
           end
 
           it "correctly identifies the prefix" do
@@ -57,12 +58,12 @@ describe Hamster::List do
 
           before do
             @result = @original.break
-            @prefix = @result.car
-            @remainder = @result.cadr
+            @prefix = @result.first
+            @remainder = @result.last
           end
 
-          it "returns a list with two items" do
-            @result.size.should == 2
+          it "returns a tuple with two items" do
+            @result.is_a?(Hamster::Tuple).should == true
           end
 
           it "returns self as the prefix" do

data/spec/hamster/list/chunk_spec.rb

@@ -7,9 +7,7 @@ describe Hamster::List do
   describe "#chunk" do
 
     it "is lazy" do
-      pending do
-        lambda { Hamster.stream { fail }.chunk(2) }.should_not raise_error
-      end
+      lambda { Hamster.stream { fail }.chunk(2) }.should_not raise_error
     end
 
     [
@@ -22,9 +20,7 @@ describe Hamster::List do
 
         before do
           @original = Hamster.list(*values)
-          pending do
-            @result = @original.chunk(2)
-          end
+          @result = @original.chunk(2)
         end
 
         it "preserves the original" do

data/spec/hamster/list/compact_spec.rb

@@ -0,0 +1,46 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/list'
+
+describe Hamster::List do
+
+  describe "#compact" do
+
+    it "is lazy" do
+      lambda { Hamster.stream { fail }.compact }.should_not raise_error
+    end
+
+    [
+      [[], []],
+      [["A"], ["A"]],
+      [["A", "B", "C"], ["A", "B", "C"]],
+      [[nil], []],
+      [[nil, "B"], ["B"]],
+      [["A", nil], ["A"]],
+      [[nil, nil], []],
+      [["A", nil, "C"], ["A", "C"]],
+      [[nil, "B", nil], ["B"]],
+    ].each do |values, expected|
+
+      describe "on #{values.inspect}" do
+
+        before do
+          @original = Hamster.list(*values)
+          @result = @original.compact
+        end
+
+        it "preserves the original" do
+          @original.should == Hamster.list(*values)
+        end
+
+        it "returns #{expected.inspect}" do
+          @result.should == Hamster.list(*expected)
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/each_slice_spec.rb

@@ -0,0 +1,80 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/list'
+
+describe Hamster::List do
+
+  [:each_chunk, :each_slice].each do |method|
+
+    describe "##{method}" do
+
+      describe "on a really big list" do
+
+        before do
+          @list = Hamster.interval(0, STACK_OVERFLOW_DEPTH)
+        end
+
+        it "doesn't run out of stack" do
+          lambda { @list.send(method, 1) { |item| } }.should_not raise_error
+        end
+
+      end
+
+      [
+        [[], []],
+        [["A"], [Hamster.list("A")]],
+        [["A", "B", "C"], [Hamster.list("A", "B"), Hamster.list("C")]],
+      ].each do |values, expected|
+
+        describe "on #{values.inspect}" do
+
+          before do
+            @original = Hamster.list(*values)
+          end
+
+          describe "with a block" do
+
+            before do
+              @items = []
+              @result = @original.send(method, 2) { |item| @items << item }
+            end
+
+            it "preserves the original" do
+              @original.should == Hamster.list(*values)
+            end
+
+            it "iterates over the items in order" do
+              @items.should == expected
+            end
+
+            it "returns nil" do
+              @result.should be_nil
+            end
+
+          end
+
+          describe "without a block" do
+
+            before do
+              @result = @original.send(method, 2)
+            end
+
+            it "preserves the original" do
+              @original.should == Hamster.list(*values)
+            end
+
+            it "returns the expected items" do
+              @result.should == Hamster.list(*expected)
+            end
+
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/each_spec.rb

@@ -36,7 +36,7 @@ describe Hamster::List do
 
             before do
               @items = []
-              @result = @original.send(method) { |value| @items << value }
+              @result = @original.send(method) { |item| @items << item }
             end
 
             it "iterates over the items in order" do

data/spec/hamster/list/flatten_spec.rb

@@ -0,0 +1,42 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/list'
+
+describe Hamster do
+
+  describe "#flatten" do
+
+    it "is lazy" do
+      lambda { Hamster.stream { fail }.flatten }.should_not raise_error
+    end
+
+    [
+      [[], []],
+      [["A"], ["A"]],
+      [["A", "B", "C"], ["A", "B", "C"]],
+      [["A", Hamster.list("B"), "C"], ["A", "B", "C"]],
+      [[Hamster.list("A"), Hamster.list("B"), Hamster.list("C")], ["A", "B", "C"]],
+    ].each do |values, expected|
+
+      describe "on #{values}" do
+
+        before do
+          @original = Hamster.list(*values)
+          @result = @original.flatten
+        end
+
+        it "preserves the original" do
+          @original.should == Hamster.list(*values)
+        end
+
+        it "returns an empty list" do
+          @result.should == Hamster.list(*expected)
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/list/partition_spec.rb

@@ -1,5 +1,6 @@
 require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
+require 'hamster/tuple'
 require 'hamster/list'
 
 describe Hamster::List do
@@ -31,16 +32,16 @@ describe Hamster::List do
 
           before do
             @result = @original.partition(&:odd?)
-            @matches = @result.car
-            @remainder = @result.cadr
+            @matches = @result.first
+            @remainder = @result.last
           end
 
           it "preserves the original" do
             @original.should == Hamster.list(*values)
           end
 
-          it "returns a list with two items" do
-            @result.size.should == 2
+          it "returns a tuple with two items" do
+            @result.is_a?(Hamster::Tuple).should == true
           end
 
           it "correctly identifies the matches" do

data/spec/hamster/list/span_spec.rb

@@ -1,5 +1,6 @@
 require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
+require 'hamster/tuple'
 require 'hamster/list'
 
 describe Hamster::List do
@@ -31,16 +32,16 @@ describe Hamster::List do
 
           before do
             @result = @original.span { |item| item <= 2 }
-            @prefix = @result.car
-            @remainder = @result.cadr
+            @prefix = @result.first
+            @remainder = @result.last
           end
 
           it "preserves the original" do
             @original.should == Hamster.list(*values)
           end
 
-          it "returns a list with two items" do
-            @result.size.should == 2
+          it "returns a tuple with two items" do
+            @result.is_a?(Hamster::Tuple).should == true
           end
 
           it "correctly identifies the prefix" do
@@ -57,12 +58,12 @@ describe Hamster::List do
 
           before do
             @result = @original.span
-            @prefix = @result.car
-            @remainder = @result.cadr
+            @prefix = @result.first
+            @remainder = @result.last
           end
 
-          it "returns a list with two items" do
-            @result.size.should == 2
+          it "returns a tuple with two items" do
+            @result.is_a?(Hamster::Tuple).should == true
           end
 
           it "returns self as the prefix" do

data/spec/hamster/list/split_at_spec.rb

@@ -1,5 +1,6 @@
 require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
+require 'hamster/tuple'
 require 'hamster/list'
 
 describe Hamster::List do
@@ -23,16 +24,16 @@ describe Hamster::List do
         before do
           @original = Hamster.list(*values)
           @result = @original.split_at(2)
-          @prefix = @result.car
-          @remainder = @result.cadr
+          @prefix = @result.first
+          @remainder = @result.last
         end
 
         it "preserves the original" do
           @original.should == Hamster.list(*values)
         end
 
-        it "returns a list with two items" do
-          @result.size.should == 2
+        it "returns a tuple with two items" do
+          @result.is_a?(Hamster::Tuple).should == true
         end
 
         it "correctly identifies the matches" do

data/spec/hamster/list/to_a_spec.rb

@@ -30,10 +30,22 @@ describe Hamster::List do
 
           before do
             @list = Hamster.list(*values)
+            @result = @list.send(method)
           end
 
           it "returns #{values.inspect}" do
-            @list.send(method).should == values
+            @result.should == values
+          end
+
+          it "works with splat" do
+            array = *@list
+            array.should == values
+          end
+
+          it "returns a mutable array" do
+            @result.last.should_not == "The End"
+            @result << "The End"
+            @result.last.should == "The End"
           end
 
         end

data/spec/hamster/set/compact_spec.rb

@@ -0,0 +1,42 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/set'
+
+describe Hamster::Set do
+
+  describe "#compact" do
+
+    [
+      [[], []],
+      [["A"], ["A"]],
+      [["A", "B", "C"], ["A", "B", "C"]],
+      [[nil], []],
+      [[nil, "B"], ["B"]],
+      [["A", nil], ["A"]],
+      [[nil, nil], []],
+      [["A", nil, "C"], ["A", "C"]],
+      [[nil, "B", nil], ["B"]],
+    ].each do |values, expected|
+
+      describe "on #{values.inspect}" do
+
+        before do
+          @original = Hamster.set(*values)
+          @result = @original.compact
+        end
+
+        it "preserves the original" do
+          @original.should == Hamster.set(*values)
+        end
+
+        it "returns #{expected.inspect}" do
+          @result.should == Hamster.set(*expected)
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/set/partition_spec.rb

@@ -1,5 +1,6 @@
 require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
+require 'hamster/tuple'
 require 'hamster/set'
 
 describe Hamster::Set do
@@ -27,16 +28,16 @@ describe Hamster::Set do
 
           before do
             @result = @original.partition(&:odd?)
-            @matches = @result.car
-            @remainder = @result.cadr
+            @matches = @result.first
+            @remainder = @result.last
           end
 
           it "preserves the original" do
             @original.should == Hamster.set(*values)
           end
 
-          it "returns a list with two items" do
-            @result.size.should == 2
+          it "returns a tuple with two items" do
+            @result.is_a?(Hamster::Tuple).should == true
           end
 
           it "correctly identifies the matches" do

data/spec/hamster/set/to_a_spec.rb

@@ -18,10 +18,17 @@ describe Hamster::Set do
 
           before do
             @set = Hamster.set(*values)
+            @result = @set.send(method)
           end
 
           it "returns #{values.inspect}" do
-            @set.send(method).sort.should == values.sort
+            @result.sort.should == values.sort
+          end
+
+          it "returns a mutable array" do
+            @result.last.should_not == "The End"
+            @result << "The End"
+            @result.last.should == "The End"
           end
 
         end

data/spec/hamster/stack/to_a_spec.rb

@@ -25,6 +25,12 @@ describe Hamster::Stack do
             @result.should == expected
           end
 
+          it "returns a mutable array" do
+            @result.last.should_not == "The End"
+            @result << "The End"
+            @result.last.should == "The End"
+          end
+
         end
 
       end

data/spec/hamster/tuple/copying_spec.rb

@@ -0,0 +1,24 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/tuple'
+
+describe Hamster::Tuple do
+
+  [:dup, :clone].each do |method|
+
+    describe "#{method}" do
+
+      before do
+        @original = Hamster::Tuple.new("A", "B")
+        @result = @original.send(method)
+      end
+
+      it "returns self" do
+        @result.should equal(@original)
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/tuple/first_spec.rb

@@ -0,0 +1,19 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/tuple'
+
+describe Hamster::Tuple do
+
+  describe "#first" do
+
+    before do
+      @tuple = Hamster::Tuple.new("A", "B")
+    end
+
+    it "returns the first value" do
+      @tuple.first.should == "A"
+    end
+
+  end
+
+end

data/spec/hamster/tuple/inspect_spec.rb

@@ -0,0 +1,19 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/tuple'
+
+describe Hamster::Tuple do
+
+  describe "#inspect" do
+
+    before do
+      @list = Hamster::Tuple.new("A", "B")
+    end
+
+    it "returns a string with the inspected values" do
+      @list.inspect.should == "(\"A\", \"B\")"
+    end
+
+  end
+
+end

data/spec/hamster/tuple/last_spec.rb

@@ -0,0 +1,19 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/tuple'
+
+describe Hamster::Tuple do
+
+  describe "#last" do
+
+    before do
+      @tuple = Hamster::Tuple.new("A", "B")
+    end
+
+    it "returns the last value" do
+      @tuple.last.should == "B"
+    end
+
+  end
+
+end

data/spec/hamster/tuple/to_a_spec.rb

@@ -0,0 +1,43 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/tuple'
+
+describe Hamster::Tuple do
+
+  describe "#to_a" do
+
+    [
+      [],
+      ["A"],
+      ["A", "B", "C"],
+    ].each do |values|
+
+      describe "on #{values.inspect}" do
+
+        before do
+          @tuple = Hamster::Tuple.new(*values)
+          @result = @tuple.to_a
+        end
+
+        it "returns #{values.inspect}" do
+          @result.should == values
+        end
+
+        it "works with splat" do
+          array = *@tuple
+          array.should == values
+        end
+
+        it "returns a mutable array" do
+          @result.last.should_not == "The End"
+          @result << "The End"
+          @result.last.should == "The End"
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/tuple/to_ary_spec.rb

@@ -0,0 +1,26 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+require 'hamster/tuple'
+
+describe Hamster::Tuple do
+
+  describe "#to_ary" do
+
+    describe "enables implicit conversion to" do
+
+      before do
+        @tuple = Hamster::Tuple.new("A", "B")
+      end
+
+      it "call parameters" do
+        [@tuple].each do |a, b|
+          a.should == "A"
+          b.should == "B"
+        end
+      end
+
+    end
+
+  end
+
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: hamster
 version: !ruby/object:Gem::Version 
-  version: 0.2.1
+  version: 0.2.2
 platform: ruby
 authors: 
 - Simon Harris
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-01-15 00:00:00 +11:00
+date: 2010-01-16 00:00:00 +11:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -41,6 +41,7 @@ files:
 - lib/hamster/set.rb
 - lib/hamster/stack.rb
 - lib/hamster/trie.rb
+- lib/hamster/tuple.rb
 - lib/hamster/version.rb
 - lib/hamster.rb
 - spec/hamster/core_ext/enumerable_spec.rb
@@ -72,6 +73,7 @@ files:
 - spec/hamster/list/chunk_spec.rb
 - spec/hamster/list/clear_spec.rb
 - spec/hamster/list/combinations_spec.rb
+- spec/hamster/list/compact_spec.rb
 - spec/hamster/list/cons_spec.rb
 - spec/hamster/list/construction_spec.rb
 - spec/hamster/list/copying_spec.rb
@@ -79,11 +81,13 @@ files:
 - spec/hamster/list/cycle_spec.rb
 - spec/hamster/list/drop_spec.rb
 - spec/hamster/list/drop_while_spec.rb
+- spec/hamster/list/each_slice_spec.rb
 - spec/hamster/list/each_spec.rb
 - spec/hamster/list/empty_spec.rb
 - spec/hamster/list/eql_spec.rb
 - spec/hamster/list/filter_spec.rb
 - spec/hamster/list/find_spec.rb
+- spec/hamster/list/flatten_spec.rb
 - spec/hamster/list/grep_spec.rb
 - spec/hamster/list/head_spec.rb
 - spec/hamster/list/include_spec.rb
@@ -121,6 +125,7 @@ files:
 - spec/hamster/set/add_spec.rb
 - spec/hamster/set/all_spec.rb
 - spec/hamster/set/any_spec.rb
+- spec/hamster/set/compact_spec.rb
 - spec/hamster/set/construction_spec.rb
 - spec/hamster/set/copying_spec.rb
 - spec/hamster/set/count_spec.rb
@@ -163,6 +168,12 @@ files:
 - spec/hamster/stack/to_list_spec.rb
 - spec/hamster/stack/top_spec.rb
 - spec/hamster/trie/remove_spec.rb
+- spec/hamster/tuple/copying_spec.rb
+- spec/hamster/tuple/first_spec.rb
+- spec/hamster/tuple/inspect_spec.rb
+- spec/hamster/tuple/last_spec.rb
+- spec/hamster/tuple/to_a_spec.rb
+- spec/hamster/tuple/to_ary_spec.rb
 - spec/spec.opts
 - spec/spec_helper.rb
 - tasks/spec.rb