hamster 1.0.1.pre.rc3 → 2.0.0

data/spec/lib/hamster/list/partition_spec.rb

@@ -10,7 +10,7 @@ describe Hamster::List do
 
     it "calls the passed block only once for each item" do
       count = 0
-      a,b = Hamster.list(1, 2, 3).partition { |item| count += 1; item.odd? }
+      a,b = L[1, 2, 3].partition { |item| count += 1; item.odd? }
       (a.size + b.size).should be(3) # force realization of lazy lists
       count.should be(3)
     end
@@ -20,7 +20,7 @@ describe Hamster::List do
 
     it "returns a lazy list of items for which predicate is true" do
       count = 0
-      a,b = Hamster.list(1, 2, 3, 4).partition { |item| count += 1; item.odd? }
+      a,b = L[1, 2, 3, 4].partition { |item| count += 1; item.odd? }
       a.take(1).should == [1]
       count.should be(3) # would be 1 if lists were lazier
       a.take(2).should == [1, 3]
@@ -29,7 +29,7 @@ describe Hamster::List do
 
     it "returns a lazy list of items for which predicate is false" do
       count = 0
-      a,b = Hamster.list(1, 2, 3, 4).partition { |item| count += 1; item.odd? }
+      a,b = L[1, 2, 3, 4].partition { |item| count += 1; item.odd? }
       b.take(1).should == [2]
       count.should be(4) # would be 2 if lists were lazier
       b.take(2).should == [2, 4]
@@ -78,7 +78,7 @@ describe Hamster::List do
       [[4], [], [4]],
     ].each do |values, expected_matches, expected_remainder|
       context "on #{values.inspect}" do
-        let(:list) { Hamster.list(*values) }
+        let(:list) { L[*values] }
 
         context "with a block" do
           let(:result)  { list.partition(&:odd?) }
@@ -86,7 +86,7 @@ describe Hamster::List do
           let(:remainder) { result.last }
 
           it "preserves the original" do
-            list.should eql(Hamster.list(*values))
+            list.should eql(L[*values])
           end
 
           it "returns a frozen array with two items" do
@@ -96,18 +96,18 @@ describe Hamster::List do
           end
 
           it "correctly identifies the matches" do
-            matches.should eql(Hamster.list(*expected_matches))
+            matches.should eql(L[*expected_matches])
           end
 
           it "correctly identifies the remainder" do
-            remainder.should eql(Hamster.list(*expected_remainder))
+            remainder.should eql(L[*expected_remainder])
           end
         end
 
         context "without a block" do
           it "returns an Enumerator" do
             list.partition.class.should be(Enumerator)
-            list.partition.each(&:odd?).should eql([Hamster.list(*expected_matches), Hamster.list(*expected_remainder)])
+            list.partition.each(&:odd?).should eql([L[*expected_matches], L[*expected_remainder]])
           end
         end
       end

data/spec/lib/hamster/list/permutation_spec.rb

@@ -3,36 +3,36 @@ require "hamster/list"
 
 describe Hamster::List do
   describe "#permutation" do
-    let(:list) { Hamster.list(1,2,3,4,5) }
+    let(:list) { L[1,2,3,4] }
 
     context "with no block" do
       it "returns an Enumerator" do
         list.permutation.class.should be(Enumerator)
-        list.permutation.to_a.sort.should == [1,2,3,4,5].permutation.to_a.sort
+        list.permutation.to_a.sort.should == [1,2,3,4].permutation.to_a.sort
       end
     end
 
     context "with no argument" do
       it "yields all permutations of the list" do
         perms = list.permutation.to_a
-        perms.size.should be(120)
-        perms.sort.should == [1,2,3,4,5].permutation.to_a.sort
+        perms.size.should be(24)
+        perms.sort.should == [1,2,3,4].permutation.to_a.sort
         perms.each { |item| item.should be_kind_of(Hamster::List) }
       end
     end
 
     context "with a length argument" do
       it "yields all N-size permutations of the list" do
-        perms = list.permutation(3).to_a
-        perms.size.should be(60)
-        perms.sort.should == [1,2,3,4,5].permutation(3).to_a.sort
+        perms = list.permutation(2).to_a
+        perms.size.should be(12)
+        perms.sort.should == [1,2,3,4].permutation(2).to_a.sort
         perms.each { |item| item.should be_kind_of(Hamster::List) }
       end
     end
 
     context "with a length argument greater than length of list" do
       it "yields nothing" do
-        list.permutation(6).to_a.should be_empty
+        list.permutation(5).to_a.should be_empty
       end
     end
 

data/spec/lib/hamster/list/pop_spec.rb

@@ -2,7 +2,7 @@ require "spec_helper"
 require "hamster/list"
 
 describe Hamster::List do
-  let(:list) { Hamster.list(*values) }
+  let(:list) { L[*values] }
 
   describe "#pop" do
     let(:pop) { list.pop }
@@ -11,7 +11,7 @@ describe Hamster::List do
       let(:values) { [] }
 
       it "returns an empty list" do
-        expect(pop).to eq(Hamster.list)
+        expect(pop).to eq(L.empty)
       end
     end
 
@@ -19,7 +19,7 @@ describe Hamster::List do
       let(:values) { %w[a b c] }
 
       it "removes the last item" do
-        expect(pop).to eq(Hamster.list("a", "b"))
+        expect(pop).to eq(L["a", "b"])
       end
     end
   end

data/spec/lib/hamster/list/product_spec.rb

@@ -16,7 +16,7 @@ describe Hamster::List do
     ].each do |values, expected|
       context "on #{values.inspect}" do
         it "returns #{expected.inspect}" do
-          Hamster.list(*values).product.should == expected
+          L[*values].product.should == expected
         end
       end
     end

data/spec/lib/hamster/list/reduce_spec.rb

@@ -2,7 +2,7 @@ require "spec_helper"
 require "hamster/list"
 
 describe Hamster::List do
-  [:reduce, :inject, :fold].each do |method|
+  [:reduce, :inject].each do |method|
     describe "##{method}" do
       context "on a really big list" do
         it "doesn't run out of stack" do
@@ -18,7 +18,7 @@ describe Hamster::List do
         context "on #{values.inspect}" do
           context "with an initial value of #{initial} and a block" do
             it "returns #{expected.inspect}" do
-              Hamster.list(*values).send(method, initial) { |memo, item| memo - item }.should == expected
+              L[*values].send(method, initial) { |memo, item| memo - item }.should == expected
             end
           end
         end
@@ -32,7 +32,7 @@ describe Hamster::List do
         context "on #{values.inspect}" do
           context "with no initial value and a block" do
             it "returns #{expected.inspect}" do
-              Hamster.list(*values).send(method) { |memo, item| memo - item }.should == expected
+              L[*values].send(method) { |memo, item| memo - item }.should == expected
             end
           end
         end
@@ -40,58 +40,15 @@ describe Hamster::List do
 
       context "with no block and a symbol argument" do
         it "uses the symbol as the name of a method to reduce with" do
-          Hamster.list(1, 2, 3).send(method, :+).should == 6
+          L[1, 2, 3].send(method, :+).should == 6
         end
       end
 
       context "with no block and a string argument" do
         it "uses the string as the name of a method to reduce with" do
-          Hamster.list(1, 2, 3).send(method, '+').should == 6
+          L[1, 2, 3].send(method, '+').should == 6
         end
       end
     end
   end
-
-  describe "#foldr" do
-    [
-      [[], 10, 10],
-      [[1], 10, 9],
-      [[1, 2, 3], 10, 4],
-    ].each do |values, initial, expected|
-      context "on #{values.inspect}" do
-        context "with an initial value of #{initial} and a block" do
-          it "returns #{expected.inspect}" do
-            Hamster.list(*values).foldr(initial) { |memo, item| memo - item }.should == expected
-          end
-        end
-      end
-    end
-
-    [
-      [[], nil],
-      [[1], 1],
-      [[1, 2, 3], 0],
-      [[1, 2, 3, 4], -2]
-    ].each do |values, expected|
-      context "on #{values.inspect}" do
-        context "with no initial value and a block" do
-          it "returns #{expected.inspect}" do
-            Hamster.list(*values).foldr { |memo, item| memo - item }.should == expected
-          end
-        end
-      end
-    end
-
-    context "with no block and a symbol argument" do
-      it "uses the symbol as the name of a method to reduce with" do
-        Hamster.list(1, 2, 3).foldr(:+).should == 6
-      end
-    end
-
-    context "with no block and a string argument" do
-      it "uses the string as the name of a method to reduce with" do
-        Hamster.list(1, 2, 3).foldr('+').should == 6
-      end
-    end
-  end
 end

data/spec/lib/hamster/list/{remove_spec.rb → reject_spec.rb}

@@ -2,7 +2,7 @@ require "spec_helper"
 require "hamster/list"
 
 describe Hamster::List do
-  [:remove, :reject, :delete_if].each do |method|
+  [:reject, :delete_if].each do |method|
     describe "##{method}" do
       it "is lazy" do
         -> { Hamster.stream { fail }.send(method) { |item| false } }.should_not raise_error
@@ -16,11 +16,11 @@ describe Hamster::List do
         [%w[a b c], []],
       ].each do |values, expected|
         context "on #{values.inspect}" do
-          let(:list) { Hamster.list(*values) }
+          let(:list) { L[*values] }
 
           context "with a block" do
             it "returns #{expected.inspect}" do
-              list.send(method) { |item| item == item.downcase }.should eql(Hamster.list(*expected))
+              list.send(method) { |item| item == item.downcase }.should eql(L[*expected])
             end
 
             it "is lazy" do
@@ -36,7 +36,7 @@ describe Hamster::List do
           context "without a block" do
             it "returns an Enumerator" do
               list.send(method).class.should be(Enumerator)
-              list.send(method).each { |item| item == item.downcase }.should eql(Hamster.list(*expected))
+              list.send(method).each { |item| item == item.downcase }.should eql(L[*expected])
             end
           end
         end

data/spec/lib/hamster/list/reverse_spec.rb

@@ -19,15 +19,15 @@ describe Hamster::List do
       [%w[A B C], %w[C B A]],
     ].each do |values, expected|
       context "on #{values.inspect}" do
-        let(:list) { Hamster.list(*values) }
+        let(:list) { L[*values] }
 
         it "preserves the original" do
           list.reverse { |item| item.downcase }
-          list.should eql(Hamster.list(*values))
+          list.should eql(L[*values])
         end
 
         it "returns #{expected.inspect}" do
-          list.reverse { |item| item.downcase }.should == Hamster.list(*expected)
+          list.reverse { |item| item.downcase }.should == L[*expected]
         end
       end
     end

data/spec/lib/hamster/list/rotate_spec.rb

@@ -3,21 +3,21 @@ require "hamster/list"
 
 describe Hamster::List do
   describe "#rotate" do
-    let(:list) { Hamster.list(1,2,3,4,5) }
+    let(:list) { L[1,2,3,4,5] }
 
     context "when passed no argument" do
       it "returns a new list with the first element moved to the end" do
-        list.rotate.should eql(Hamster.list(2,3,4,5,1))
+        list.rotate.should eql(L[2,3,4,5,1])
       end
     end
 
     context "with an integral argument n" do
       it "returns a new list with the first (n % size) elements moved to the end" do
-        list.rotate(2).should eql(Hamster.list(3,4,5,1,2))
-        list.rotate(3).should eql(Hamster.list(4,5,1,2,3))
-        list.rotate(4).should eql(Hamster.list(5,1,2,3,4))
-        list.rotate(5).should eql(Hamster.list(1,2,3,4,5))
-        list.rotate(-1).should eql(Hamster.list(5,1,2,3,4))
+        list.rotate(2).should eql(L[3,4,5,1,2])
+        list.rotate(3).should eql(L[4,5,1,2,3])
+        list.rotate(4).should eql(L[5,1,2,3,4])
+        list.rotate(5).should eql(L[1,2,3,4,5])
+        list.rotate(-1).should eql(L[5,1,2,3,4])
       end
     end
 

data/spec/lib/hamster/list/sample_spec.rb

@@ -3,7 +3,7 @@ require "hamster/list"
 
 describe Hamster::List do
   describe "#sample" do
-    let(:list) { Hamster.list(*(1..10)) }
+    let(:list) { (1..10).to_list }
 
     it "returns a randomly chosen item" do
       chosen = 100.times.map { list.sample }

data/spec/lib/hamster/list/select_spec.rb

@@ -2,8 +2,8 @@ require "spec_helper"
 require "hamster/list"
 
 describe Hamster::List do
-  let(:list) { Hamster.list(*values) }
-  let(:selected_list) { Hamster.list(*selected_values) }
+  let(:list) { L[*values] }
+  let(:selected_list) { L[*selected_values] }
 
   describe "#select" do
     it "is lazy" do
@@ -15,7 +15,7 @@ describe Hamster::List do
         let(:select) { list.select { |item| item == item.upcase } }
 
         it "preserves the original" do
-          expect(list).to eq(Hamster.list(*values))
+          expect(list).to eq(L[*values])
         end
 
         it "returns the selected list" do

data/spec/lib/hamster/list/size_spec.rb

@@ -17,7 +17,7 @@ describe Hamster::List do
       ].each do |values, expected|
         context "on #{values.inspect}" do
           it "returns #{expected.inspect}" do
-            Hamster.list(*values).send(method).should == expected
+            L[*values].send(method).should == expected
           end
         end
       end

data/spec/lib/hamster/list/slice_spec.rb

@@ -2,8 +2,8 @@ require "spec_helper"
 require "hamster/list"
 
 describe Hamster::List do
-  let(:list) { Hamster.list(1,2,3,4) }
-  let(:big)  { Hamster.list(*1..10000) }
+  let(:list) { L[1,2,3,4] }
+  let(:big)  { (1..10000).to_list }
 
   [:slice, :[]].each do |method|
     describe "##{method}" do
@@ -21,7 +21,7 @@ describe Hamster::List do
         end
 
         it "leaves the original unchanged" do
-          list.should eql(Hamster.list(1,2,3,4))
+          list.should eql(L[1,2,3,4])
         end
       end
 
@@ -41,21 +41,21 @@ describe Hamster::List do
 
       context "when passed a positive integral index and count" do
         it "returns 'count' elements starting from 'index'" do
-          list.send(method, 0, 0).should eql(Hamster.list)
-          list.send(method, 0, 1).should eql(Hamster.list(1))
-          list.send(method, 0, 2).should eql(Hamster.list(1,2))
-          list.send(method, 0, 4).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 0, 6).should eql(Hamster.list(1,2,3,4))
+          list.send(method, 0, 0).should eql(L.empty)
+          list.send(method, 0, 1).should eql(L[1])
+          list.send(method, 0, 2).should eql(L[1,2])
+          list.send(method, 0, 4).should eql(L[1,2,3,4])
+          list.send(method, 0, 6).should eql(L[1,2,3,4])
           list.send(method, 0, -1).should be_nil
           list.send(method, 0, -2).should be_nil
           list.send(method, 0, -4).should be_nil
-          list.send(method, 2, 0).should eql(Hamster.list)
-          list.send(method, 2, 1).should eql(Hamster.list(3))
-          list.send(method, 2, 2).should eql(Hamster.list(3,4))
-          list.send(method, 2, 4).should eql(Hamster.list(3,4))
+          list.send(method, 2, 0).should eql(L.empty)
+          list.send(method, 2, 1).should eql(L[3])
+          list.send(method, 2, 2).should eql(L[3,4])
+          list.send(method, 2, 4).should eql(L[3,4])
           list.send(method, 2, -1).should be_nil
-          list.send(method, 4, 0).should eql(Hamster.list)
-          list.send(method, 4, 2).should eql(Hamster.list)
+          list.send(method, 4, 0).should eql(L.empty)
+          list.send(method, 4, 2).should eql(L.empty)
           list.send(method, 4, -1).should be_nil
           list.send(method, 5, 0).should be_nil
           list.send(method, 5, 2).should be_nil
@@ -64,145 +64,145 @@ describe Hamster::List do
           list.send(method, 6, 2).should be_nil
           list.send(method, 6, -1).should be_nil
 
-          big.send(method, 0, 3).should eql(Hamster.list(1,2,3))
-          big.send(method, 1023, 4).should eql(Hamster.list(1024,1025,1026,1027))
-          big.send(method, 1024, 4).should eql(Hamster.list(1025,1026,1027,1028))
+          big.send(method, 0, 3).should eql(L[1,2,3])
+          big.send(method, 1023, 4).should eql(L[1024,1025,1026,1027])
+          big.send(method, 1024, 4).should eql(L[1025,1026,1027,1028])
         end
 
         it "leaves the original unchanged" do
-          list.should eql(Hamster.list(1,2,3,4))
+          list.should eql(L[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
-          list.send(method, -1, 0).should eql(Hamster.list)
-          list.send(method, -1, 1).should eql(Hamster.list(4))
-          list.send(method, -1, 2).should eql(Hamster.list(4))
+          list.send(method, -1, 0).should eql(L.empty)
+          list.send(method, -1, 1).should eql(L[4])
+          list.send(method, -1, 2).should eql(L[4])
           list.send(method, -1, -1).should be_nil
-          list.send(method, -2, 0).should eql(Hamster.list)
-          list.send(method, -2, 1).should eql(Hamster.list(3))
-          list.send(method, -2, 2).should eql(Hamster.list(3,4))
-          list.send(method, -2, 4).should eql(Hamster.list(3,4))
+          list.send(method, -2, 0).should eql(L.empty)
+          list.send(method, -2, 1).should eql(L[3])
+          list.send(method, -2, 2).should eql(L[3,4])
+          list.send(method, -2, 4).should eql(L[3,4])
           list.send(method, -2, -1).should be_nil
-          list.send(method, -4, 0).should eql(Hamster.list)
-          list.send(method, -4, 1).should eql(Hamster.list(1))
-          list.send(method, -4, 2).should eql(Hamster.list(1,2))
-          list.send(method, -4, 4).should eql(Hamster.list(1,2,3,4))
-          list.send(method, -4, 6).should eql(Hamster.list(1,2,3,4))
+          list.send(method, -4, 0).should eql(L.empty)
+          list.send(method, -4, 1).should eql(L[1])
+          list.send(method, -4, 2).should eql(L[1,2])
+          list.send(method, -4, 4).should eql(L[1,2,3,4])
+          list.send(method, -4, 6).should eql(L[1,2,3,4])
           list.send(method, -4, -1).should be_nil
           list.send(method, -5, 0).should be_nil
           list.send(method, -5, 1).should be_nil
           list.send(method, -5, 10).should be_nil
           list.send(method, -5, -1).should be_nil
 
-          big.send(method, -1, 1).should eql(Hamster.list(10000))
-          big.send(method, -1, 2).should eql(Hamster.list(10000))
-          big.send(method, -6, 2).should eql(Hamster.list(9995,9996))
+          big.send(method, -1, 1).should eql(L[10000])
+          big.send(method, -1, 2).should eql(L[10000])
+          big.send(method, -6, 2).should eql(L[9995,9996])
         end
       end
 
       context "when passed a Range" do
         it "returns the elements whose indexes are within the given Range" do
-          list.send(method, 0..-1).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 0..-10).should eql(Hamster.list)
-          list.send(method, 0..0).should eql(Hamster.list(1))
-          list.send(method, 0..1).should eql(Hamster.list(1,2))
-          list.send(method, 0..2).should eql(Hamster.list(1,2,3))
-          list.send(method, 0..3).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 0..4).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 0..10).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 2..-10).should eql(Hamster.list)
-          list.send(method, 2..0).should eql(Hamster.list)
-          list.send(method, 2..2).should eql(Hamster.list(3))
-          list.send(method, 2..3).should eql(Hamster.list(3,4))
-          list.send(method, 2..4).should eql(Hamster.list(3,4))
-          list.send(method, 3..0).should eql(Hamster.list)
-          list.send(method, 3..3).should eql(Hamster.list(4))
-          list.send(method, 3..4).should eql(Hamster.list(4))
-          list.send(method, 4..0).should eql(Hamster.list)
-          list.send(method, 4..4).should eql(Hamster.list)
-          list.send(method, 4..5).should eql(Hamster.list)
+          list.send(method, 0..-1).should eql(L[1,2,3,4])
+          list.send(method, 0..-10).should eql(L.empty)
+          list.send(method, 0..0).should eql(L[1])
+          list.send(method, 0..1).should eql(L[1,2])
+          list.send(method, 0..2).should eql(L[1,2,3])
+          list.send(method, 0..3).should eql(L[1,2,3,4])
+          list.send(method, 0..4).should eql(L[1,2,3,4])
+          list.send(method, 0..10).should eql(L[1,2,3,4])
+          list.send(method, 2..-10).should eql(L.empty)
+          list.send(method, 2..0).should eql(L.empty)
+          list.send(method, 2..2).should eql(L[3])
+          list.send(method, 2..3).should eql(L[3,4])
+          list.send(method, 2..4).should eql(L[3,4])
+          list.send(method, 3..0).should eql(L.empty)
+          list.send(method, 3..3).should eql(L[4])
+          list.send(method, 3..4).should eql(L[4])
+          list.send(method, 4..0).should eql(L.empty)
+          list.send(method, 4..4).should eql(L.empty)
+          list.send(method, 4..5).should eql(L.empty)
           list.send(method, 5..0).should be_nil
           list.send(method, 5..5).should be_nil
           list.send(method, 5..6).should be_nil
 
-          big.send(method, 159..162).should eql(Hamster.list(160,161,162,163))
-          big.send(method, 160..162).should eql(Hamster.list(161,162,163))
-          big.send(method, 161..162).should eql(Hamster.list(162,163))
-          big.send(method, 9999..10100).should eql(Hamster.list(10000))
-          big.send(method, 10000..10100).should eql(Hamster.list)
+          big.send(method, 159..162).should eql(L[160,161,162,163])
+          big.send(method, 160..162).should eql(L[161,162,163])
+          big.send(method, 161..162).should eql(L[162,163])
+          big.send(method, 9999..10100).should eql(L[10000])
+          big.send(method, 10000..10100).should eql(L.empty)
           big.send(method, 10001..10100).should be_nil
 
-          list.send(method, 0...-1).should eql(Hamster.list(1,2,3))
-          list.send(method, 0...-10).should eql(Hamster.list)
-          list.send(method, 0...0).should eql(Hamster.list)
-          list.send(method, 0...1).should eql(Hamster.list(1))
-          list.send(method, 0...2).should eql(Hamster.list(1,2))
-          list.send(method, 0...3).should eql(Hamster.list(1,2,3))
-          list.send(method, 0...4).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 0...10).should eql(Hamster.list(1,2,3,4))
-          list.send(method, 2...-10).should eql(Hamster.list)
-          list.send(method, 2...0).should eql(Hamster.list)
-          list.send(method, 2...2).should eql(Hamster.list)
-          list.send(method, 2...3).should eql(Hamster.list(3))
-          list.send(method, 2...4).should eql(Hamster.list(3,4))
-          list.send(method, 3...0).should eql(Hamster.list)
-          list.send(method, 3...3).should eql(Hamster.list)
-          list.send(method, 3...4).should eql(Hamster.list(4))
-          list.send(method, 4...0).should eql(Hamster.list)
-          list.send(method, 4...4).should eql(Hamster.list)
-          list.send(method, 4...5).should eql(Hamster.list)
+          list.send(method, 0...-1).should eql(L[1,2,3])
+          list.send(method, 0...-10).should eql(L.empty)
+          list.send(method, 0...0).should eql(L.empty)
+          list.send(method, 0...1).should eql(L[1])
+          list.send(method, 0...2).should eql(L[1,2])
+          list.send(method, 0...3).should eql(L[1,2,3])
+          list.send(method, 0...4).should eql(L[1,2,3,4])
+          list.send(method, 0...10).should eql(L[1,2,3,4])
+          list.send(method, 2...-10).should eql(L.empty)
+          list.send(method, 2...0).should eql(L.empty)
+          list.send(method, 2...2).should eql(L.empty)
+          list.send(method, 2...3).should eql(L[3])
+          list.send(method, 2...4).should eql(L[3,4])
+          list.send(method, 3...0).should eql(L.empty)
+          list.send(method, 3...3).should eql(L.empty)
+          list.send(method, 3...4).should eql(L[4])
+          list.send(method, 4...0).should eql(L.empty)
+          list.send(method, 4...4).should eql(L.empty)
+          list.send(method, 4...5).should eql(L.empty)
           list.send(method, 5...0).should be_nil
           list.send(method, 5...5).should be_nil
           list.send(method, 5...6).should be_nil
 
-          big.send(method, 159...162).should eql(Hamster.list(160,161,162))
-          big.send(method, 160...162).should eql(Hamster.list(161,162))
-          big.send(method, 161...162).should eql(Hamster.list(162))
-          big.send(method, 9999...10100).should eql(Hamster.list(10000))
-          big.send(method, 10000...10100).should eql(Hamster.list)
+          big.send(method, 159...162).should eql(L[160,161,162])
+          big.send(method, 160...162).should eql(L[161,162])
+          big.send(method, 161...162).should eql(L[162])
+          big.send(method, 9999...10100).should eql(L[10000])
+          big.send(method, 10000...10100).should eql(L.empty)
           big.send(method, 10001...10100).should be_nil
 
-          list.send(method, -1..-1).should eql(Hamster.list(4))
-          list.send(method, -1...-1).should eql(Hamster.list)
-          list.send(method, -1..3).should eql(Hamster.list(4))
-          list.send(method, -1...3).should eql(Hamster.list)
-          list.send(method, -1..4).should eql(Hamster.list(4))
-          list.send(method, -1...4).should eql(Hamster.list(4))
-          list.send(method, -1..10).should eql(Hamster.list(4))
-          list.send(method, -1...10).should eql(Hamster.list(4))
-          list.send(method, -1..0).should eql(Hamster.list)
-          list.send(method, -1..-4).should eql(Hamster.list)
-          list.send(method, -1...-4).should eql(Hamster.list)
-          list.send(method, -1..-6).should eql(Hamster.list)
-          list.send(method, -1...-6).should eql(Hamster.list)
-          list.send(method, -2..-2).should eql(Hamster.list(3))
-          list.send(method, -2...-2).should eql(Hamster.list)
-          list.send(method, -2..-1).should eql(Hamster.list(3,4))
-          list.send(method, -2...-1).should eql(Hamster.list(3))
-          list.send(method, -2..10).should eql(Hamster.list(3,4))
-          list.send(method, -2...10).should eql(Hamster.list(3,4))
-
-          big.send(method, -1..-1).should eql(Hamster.list(10000))
-          big.send(method, -1..9999).should eql(Hamster.list(10000))
-          big.send(method, -1...9999).should eql(Hamster.list)
-          big.send(method, -2...9999).should eql(Hamster.list(9999))
-          big.send(method, -2..-1).should eql(Hamster.list(9999,10000))
-
-          list.send(method, -4..-4).should eql(Hamster.list(1))
-          list.send(method, -4..-2).should eql(Hamster.list(1,2,3))
-          list.send(method, -4...-2).should eql(Hamster.list(1,2))
-          list.send(method, -4..-1).should eql(Hamster.list(1,2,3,4))
-          list.send(method, -4...-1).should eql(Hamster.list(1,2,3))
-          list.send(method, -4..3).should eql(Hamster.list(1,2,3,4))
-          list.send(method, -4...3).should eql(Hamster.list(1,2,3))
-          list.send(method, -4..4).should eql(Hamster.list(1,2,3,4))
-          list.send(method, -4...4).should eql(Hamster.list(1,2,3,4))
-          list.send(method, -4..0).should eql(Hamster.list(1))
-          list.send(method, -4...0).should eql(Hamster.list)
-          list.send(method, -4..1).should eql(Hamster.list(1,2))
-          list.send(method, -4...1).should eql(Hamster.list(1))
+          list.send(method, -1..-1).should eql(L[4])
+          list.send(method, -1...-1).should eql(L.empty)
+          list.send(method, -1..3).should eql(L[4])
+          list.send(method, -1...3).should eql(L.empty)
+          list.send(method, -1..4).should eql(L[4])
+          list.send(method, -1...4).should eql(L[4])
+          list.send(method, -1..10).should eql(L[4])
+          list.send(method, -1...10).should eql(L[4])
+          list.send(method, -1..0).should eql(L.empty)
+          list.send(method, -1..-4).should eql(L.empty)
+          list.send(method, -1...-4).should eql(L.empty)
+          list.send(method, -1..-6).should eql(L.empty)
+          list.send(method, -1...-6).should eql(L.empty)
+          list.send(method, -2..-2).should eql(L[3])
+          list.send(method, -2...-2).should eql(L.empty)
+          list.send(method, -2..-1).should eql(L[3,4])
+          list.send(method, -2...-1).should eql(L[3])
+          list.send(method, -2..10).should eql(L[3,4])
+          list.send(method, -2...10).should eql(L[3,4])
+
+          big.send(method, -1..-1).should eql(L[10000])
+          big.send(method, -1..9999).should eql(L[10000])
+          big.send(method, -1...9999).should eql(L.empty)
+          big.send(method, -2...9999).should eql(L[9999])
+          big.send(method, -2..-1).should eql(L[9999,10000])
+
+          list.send(method, -4..-4).should eql(L[1])
+          list.send(method, -4..-2).should eql(L[1,2,3])
+          list.send(method, -4...-2).should eql(L[1,2])
+          list.send(method, -4..-1).should eql(L[1,2,3,4])
+          list.send(method, -4...-1).should eql(L[1,2,3])
+          list.send(method, -4..3).should eql(L[1,2,3,4])
+          list.send(method, -4...3).should eql(L[1,2,3])
+          list.send(method, -4..4).should eql(L[1,2,3,4])
+          list.send(method, -4...4).should eql(L[1,2,3,4])
+          list.send(method, -4..0).should eql(L[1])
+          list.send(method, -4...0).should eql(L.empty)
+          list.send(method, -4..1).should eql(L[1,2])
+          list.send(method, -4...1).should eql(L[1])
 
           list.send(method, -5..-5).should be_nil
           list.send(method, -5...-5).should be_nil
@@ -214,7 +214,7 @@ describe Hamster::List do
         end
 
         it "leaves the original unchanged" do
-          list.should eql(Hamster.list(1,2,3,4))
+          list.should eql(L[1,2,3,4])
         end
       end
     end
@@ -222,8 +222,8 @@ describe Hamster::List do
     context "when passed a subclass of Range" do
       it "works the same as with a Range" do
         subclass = Class.new(Range)
-        list.send(method, subclass.new(1,2)).should eql(Hamster.list(2,3))
-        list.send(method, subclass.new(-3,-1,true)).should eql(Hamster.list(2,3))
+        list.send(method, subclass.new(1,2)).should eql(L[2,3])
+        list.send(method, subclass.new(-3,-1,true)).should eql(L[2,3])
       end
     end
   end