hamster 0.2.5 → 0.2.6

data/lib/hamster/sorter.rb

@@ -0,0 +1,19 @@
+require 'forwardable'
+
+module Hamster
+
+  class Sorter
+
+    extend Forwardable
+
+    include Enumerable
+
+    def initialize(collection)
+      @collection = collection
+    end
+
+    def_delegator :@collection, :each
+
+  end
+
+end

data/lib/hamster/tuple.rb

@@ -18,6 +18,13 @@ module Hamster
       @items.last
     end
 
+    def eql?(other)
+      return true if other.equal?(self)
+      return false unless other.class.equal?(self.class)
+      @items.eql?(other.instance_eval{@items})
+    end
+    def_delegator :self, :eql?, :==
+
     def dup
       self
     end

data/lib/hamster/version.rb

@@ -1,5 +1,5 @@
 module Hamster
 
-  VERSION = "0.2.5".freeze
+  VERSION = "0.2.6".freeze
 
 end

data/spec/hamster/core_ext/array_spec.rb

@@ -0,0 +1,20 @@
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
+
+require 'hamster/core_ext/enumerable'
+
+describe Array do
+
+  describe "#to_list" do
+
+    before do
+      array = ["A", "B", "C"]
+      @list = array.to_list
+    end
+
+    it "returns an equivalent list" do
+      @list.should == Hamster.list("A", "B", "C")
+    end
+
+  end
+
+end

data/spec/hamster/core_ext/enumerable_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/core_ext/enumerable'
 

data/spec/hamster/core_ext/io_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/core_ext/io'
 

data/spec/hamster/hash/all_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/any_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/construction_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/copying_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/delete_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/each_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/empty_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/eql_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/filter_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/find_spec.rb

@@ -0,0 +1,58 @@
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
+
+require 'hamster/tuple'
+require 'hamster/hash'
+
+describe Hamster::Hash do
+
+  [:find, :detect].each do |method|
+
+    describe "##{method}" do
+
+      [
+        [[], "A", nil],
+        [[], nil, nil],
+        [["A" => "aye"], "A", Hamster::Tuple.new("A", "aye")],
+        [["A" => "aye"], "B", nil],
+        [["A" => "aye"], nil, nil],
+        [["A" => "aye", "B" => "bee", nil => "NIL"], "A", Hamster::Tuple.new("A", "aye")],
+        [["A" => "aye", "B" => "bee", nil => "NIL"], "B", Hamster::Tuple.new("B", "bee")],
+        [["A" => "aye", "B" => "bee", nil => "NIL"], nil, Hamster::Tuple.new(nil, "NIL")],
+        [["A" => "aye", "B" => "bee", nil => "NIL"], "C", nil],
+      ].each do |values, key, expected|
+
+        describe "on #{values.inspect}" do
+
+          before do
+            @hash = Hamster.hash(*values)
+          end
+
+          describe "with a block" do
+
+            before do
+              @result = @hash.send(method) { |x| x == key }
+            end
+
+            it "returns #{expected.inspect}" do
+              @result.should == expected
+            end
+
+          end
+
+          describe "without a block" do
+
+            it "returns nil" do
+              @hash.send(method).should be_nil
+            end
+
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/spec/hamster/hash/get_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/has_key_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 
@@ -9,10 +9,10 @@ describe Hamster::Hash do
     describe "#has_key?" do
 
       before do
-        @hash = Hamster.hash("A" => "aye", "B" => "bee", "C" => "see", nil => "NIL")
+        @hash = Hamster.hash("A" => "aye", "B" => "bee", "C" => "see", nil => "NIL", 2.0 => "two")
       end
 
-      ["A", "B", "C", nil].each do |key|
+      ["A", "B", "C", nil, 2.0].each do |key|
 
         it "returns true for an existing key (#{key.inspect})" do
           @hash.send(method, key).should == true
@@ -24,6 +24,10 @@ describe Hamster::Hash do
         @hash.send(method, "D").should == false
       end
 
+      it "uses #eql? for equality" do
+        @hash.send(method, 2).should == false
+      end
+
     end
 
   end

data/spec/hamster/hash/inspect_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/map_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/none_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/put_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/reduce_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/remove_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/size_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/hash/uniq_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/hash'
 

data/spec/hamster/list/all_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/any_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/append_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/at_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/break_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/tuple'
 require 'hamster/list'

data/spec/hamster/list/cadr_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/chunk_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/clear_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/combinations_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/compact_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/cons_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/construction_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/copying_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/count_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/cycle_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/drop_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/drop_while_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/each_slice_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/each_spec.rb

@@ -1,4 +1,4 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
 
 require 'hamster/list'
 

data/spec/hamster/list/elem_index_spec.rb

@@ -0,0 +1,58 @@
+require File.expand_path('../../spec_helper', File.dirname(__FILE__))
+
+require 'hamster/list'
+
+describe Hamster::List do
+
+  [:elem_index, :index].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, nil) }.should_not raise_error
+        end
+
+      end
+
+      [
+        [[], "A", nil],
+        [[], nil, nil],
+        [["A"], "A", 0],
+        [["A"], "B", nil],
+        [["A"], nil, nil],
+        [["A", "B", nil], "A", 0],
+        [["A", "B", nil], "B", 1],
+        [["A", "B", nil], nil, 2],
+        [["A", "B", nil], "C", nil],
+        [[2], 2, 0],
+        [[2], 2.0, 0],
+        [[2.0], 2.0, 0],
+        [[2.0], 2, 0],
+      ].each do |values, item, expected|
+
+        describe "looking for #{item.inspect} in #{values.inspect}" do
+
+          before do
+            list = Hamster.list(*values)
+            @result = list.send(method, item)
+          end
+
+          it "returns #{expected.inspect}" do
+            @result.should == expected
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end