opal 0.3.18 → 0.3.19

data/test/core/enumerable/detect_spec.rb

@@ -0,0 +1,48 @@
+describe "Enumerable#detect" do
+  before :each do
+    ScratchPad.record []
+    @elements = [2, 4, 6, 8, 10]
+    @numerous = EnumerableSpecs::Numerous.new(*@elements)
+    @empty = []
+  end
+
+  it "passes each entry in enum to block while block when block is false" do
+    visited_elements = []
+    @numerous.detect do |element|
+      visited_elements << element
+      false
+    end
+    visited_elements.should == @elements
+  end
+
+  it "returns nil when the block is false and there is no ifnone proc given" do
+    @numerous.detect {|e| false}.should == nil
+  end
+
+  it "returns the first element for which the block is not false" do
+    @elements.each do |element|
+      @numerous.detect {|e| e > element -1 }.should == element
+    end
+  end
+
+  it "returns the value of the ifnone proc if the block is false" do
+    fail_proc = lambda { "cheeseburgers" }
+    @numerous.detect(fail_proc) {|e| false }.should == "cheeseburgers"
+  end
+
+  it "doesn't call the ifnone proc if an element is found" do
+    fail_proc = lambda { raise "This should't have been called" }
+    @numerous.detect(fail_proc) {|e| 2 == @elements.first }.should == 2
+  end
+
+  it "calls the ifnone proc only once when the block is false" do
+    times = 0
+    fail_proc = lambda { times += 1; raise if times > 1; "cheeseburgers" }
+    @numerous.detect(fail_proc) {|e| false }.should == "cheeseburgers"
+  end
+
+  it "calls the ifnone proc when there are no elements" do
+    fail_proc = lambda { "yay" }
+    @empty.detect(fail_proc) {|e| true}.should == "yay"
+  end
+end

data/test/core/enumerable/drop_spec.rb

@@ -0,0 +1,17 @@
+describe "Enumerable#drop" do
+  before :each do
+    @enum = EnumerableSpecs::Numerous.new(3, 2, 1, :go)
+  end
+
+  describe "passed a number n as an argument" do
+    it "returns [] for empty enumerables" do
+      EnumerableSpecs::Empty.new.drop(0).should == []
+      EnumerableSpecs::Empty.new.drop(2).should == []
+    end
+
+    it "returns [] if dropping all" do
+      @enum.drop(5).should == []
+      EnumerableSpecs::Numerous.new(3, 2, 1, :go).drop(4).should == []
+    end
+  end
+end

data/test/core/enumerable/drop_while_spec.rb

@@ -0,0 +1,24 @@
+describe "Enumerable#drop_while" do
+  before :each do
+    @enum = EnumerableSpecs::Numerous.new(3, 2, 1, :go)
+  end
+
+  it "returns an Enumerator if no block given" do
+    @enum.drop_while.should be_kind_of(Enumerator)
+  end
+
+  it "returns no/all elements for {true/false} block" do
+    @enum.drop_while {true}.should == []
+    @enum.drop_while {false}.should == @enum.to_a
+  end
+
+  it "accepts returns other than true/false" do
+    @enum.drop_while{1}.should == []
+    @enum.drop_while{nil}.should == @enum.to_a
+  end
+
+  it "passed elements to the block until the first false" do
+    a = []
+    @enum.drop_while{|obj| (a << obj).size < 3}.should == [1, :go]
+  end
+end

data/test/core/enumerable/each_with_index_spec.rb

@@ -0,0 +1,11 @@
+describe "Enumerable#each_with_index" do
+  before :each do
+    @b = EnumerableSpecs::Numerous.new(2, 5, 3, 6, 1, 4)
+  end
+
+  it "passes each element and its index to block" do
+    @a = []
+    @b.each_with_index { |o, i| @a << [o, i] }
+    @a.should == [[2, 0], [5, 1], [3, 2], [6, 3], [1, 4], [4, 5]]
+  end
+end

data/test/core/enumerable/each_with_object_spec.rb

@@ -0,0 +1,17 @@
+describe "Enumerable#each_with_object" do
+  before :each do
+    @values = [2, 5, 3, 6, 1, 4]
+    @enum = EnumerableSpecs::Numerous.new(*@values)
+    @initial = "memo"
+  end
+
+  it "passes each element and its argument to the block" do
+    acc = []
+    @enum.each_with_object(@initial) do |elem, obj|
+      obj.should equal(@initial)
+      obj = 42
+      acc << elem
+    end.should equal(@initial)
+    acc.should == @values
+  end
+end

data/test/core/enumerable/entries_spec.rb

@@ -0,0 +1,6 @@
+describe "Enumerable#entries" do
+  it "returns an array containing the elements" do
+    numerous = EnumerableSpecs::Numerous.new(1, nil, 'a', 2, false, true)
+    numerous.entries.should == [1, nil, "a", 2, false, true]
+  end
+end

data/test/core/enumerable/find_all_spec.rb

@@ -0,0 +1,13 @@
+describe "Enumerable#find_all" do
+  before :each do
+    ScratchPad.record []
+    @elements = [1, 2, 3, 4, 5, 6, 7, 8, 9]
+    @numerous = EnumerableSpecs::Numerous.new(*@elements)
+  end
+
+  it "returns all elements for which the block is not false" do
+    @numerous.find_all {|i| i % 3 == 0 }.should == [3, 6, 9]
+    @numerous.find_all {|i| true }.should == @elements
+    @numerous.find_all {|i| false }.should == []
+  end
+end

data/test/core/enumerable/find_index_spec.rb

@@ -0,0 +1,45 @@
+describe "Enumerable#find_index" do
+  before :each do
+    @elements = [2, 4, 6, 8, 10]
+    @numerous = EnumerableSpecs::Numerous.new(*@elements)
+  end
+
+  it "passes each entry in enum to block while block when block is false" do
+    visited_elements = []
+    @numerous.find_index do |element|
+      visited_elements << element
+      false
+    end
+    visited_elements.should == @elements
+  end
+
+  it "returns nil when the block is false" do
+    @numerous.find_index {|e| false }.should == nil
+  end
+
+  it "returns the first index for which the block is not false" do
+    @elements.each_with_index do |element, index|
+      @numerous.find_index {|e| e > element - 1 }.should == index
+    end
+  end
+
+  it "returns the first found index" do
+    repeated = [10, 11, 11, 13, 11, 13, 10, 10, 13, 11]
+    numerous_repeat = EnumerableSpecs::Numerous.new(*repeated)
+    repeated.each do |element|
+      numerous_repeat.find_index(element).should == element - 10
+    end
+  end
+
+  it "returns nil when the element not found" do
+    @numerous.find_index(-1).should == nil
+  end
+
+  it "ignores the block if an argument is given" do
+    @numerous.find_index(-1) {|e| true }.should == nil
+  end
+
+  it "returns an Enumerator if no block given" do
+    @numerous.find_index.should be_kind_of(Enumerator)
+  end
+end

data/test/core/enumerable/find_spec.rb

@@ -0,0 +1,48 @@
+describe "Enumerable#find" do
+  before :each do
+    ScratchPad.record []
+    @elements = [2, 4, 6, 8, 10]
+    @numerous = EnumerableSpecs::Numerous.new(*@elements)
+    @empty = []
+  end
+
+  it "passes each entry in enum to block while block when block is false" do
+    visited_elements = []
+    @numerous.find do |element|
+      visited_elements << element
+      false
+    end
+    visited_elements.should == @elements
+  end
+
+  it "returns nil when the block is false and there is no ifnone proc given" do
+    @numerous.find {|e| false}.should == nil
+  end
+
+  it "returns the first element for which the block is not false" do
+    @elements.each do |element|
+      @numerous.find {|e| e > element -1 }.should == element
+    end
+  end
+
+  it "returns the value of the ifnone proc if the block is false" do
+    fail_proc = lambda { "cheeseburgers" }
+    @numerous.find(fail_proc) {|e| false }.should == "cheeseburgers"
+  end
+
+  it "doesn't call the ifnone proc if an element is found" do
+    fail_proc = lambda { raise "This should't have been called" }
+    @numerous.find(fail_proc) {|e| 2 == @elements.first }.should == 2
+  end
+
+  it "calls the ifnone proc only once when the block is false" do
+    times = 0
+    fail_proc = lambda { times += 1; raise if times > 1; "cheeseburgers" }
+    @numerous.find(fail_proc) {|e| false }.should == "cheeseburgers"
+  end
+
+  it "calls the ifnone proc when there are no elements" do
+    fail_proc = lambda { "yay" }
+    @empty.find(fail_proc) {|e| true}.should == "yay"
+  end
+end

data/test/core/enumerable/first_spec.rb

@@ -0,0 +1,40 @@
+describe "Enumerable#first" do
+  before :each do
+    @values = [4,3,2,1,0,-1]
+    @enum = EnumerableSpecs::Numerous.new(*@values)
+  end
+
+  it "returns the first element" do
+    EnumerableSpecs::Numerous.new.first.should == 2
+    EnumerableSpecs::Empty.new.first.should == nil
+  end
+
+  it "returns nil if self is empty" do
+    EnumerableSpecs::Empty.new.first.should == nil
+  end
+
+  it "returns the first count elements if given a count" do
+    @enum.first(2).should == [4, 3]
+    @enum.first(4).should == [4, 3, 2, 1]
+  end
+
+  it "returns an empty array when passed a count on an empty array" do
+    empty = EnumerableSpecs::Empty.new
+    empty.first(0).should == []
+    empty.first(1).should == []
+    empty.first(2).should == []
+  end
+
+  it "returns an empty array when passed count == 0" do
+    @enum.first(0).should == []
+  end
+
+  it "returns an array containing the first element when passed count == 1" do
+    @enum.first(1).should == [4]
+  end
+
+  it "returns the entire array when count > length" do
+    @enum.first(100).should == @values
+    @enum.first(8).should == @values
+  end
+end

data/{core/spec → test}/core/enumerable/fixtures/classes.rb

@@ -22,4 +22,23 @@ module EnumerableSpecs
       raise "from each"
     end
   end
+
+  class EachDefiner
+    include Enumerable
+
+    attr_reader :arr
+
+    def initialize(*args)
+      @arr = arr
+    end
+
+    def each
+      i = 0
+      loop do
+        break if i == @arr.size
+        yield @arr[i]
+        i += 1
+      end
+    end
+  end
 end

data/test/core/enumerable/grep_spec.rb

@@ -0,0 +1,21 @@
+class EnumerableSpecGrep
+  def ===(obj); obj == '2'; end
+end
+
+class EnumerableSpecGrep2
+  def ===(obj); /^ca/ =~ obj; end
+end
+
+describe "Enumerable#grep" do
+  before(:each) do
+    @a = EnumerableSpecs::EachDefiner.new(2, 4, 6, 8, 10)
+  end
+
+  it "grep without a block should return an array of all elements === pattern" do
+    EnumerableSpecs::Numerous.new('2', 'a', 'nil', '3', false).grep(EnumerableSpecGrep.new).should == ['2']
+  end
+
+  it "grep with a block should return an array of elements === pattern passed through block" do
+    EnumerableSpecs::Numerous.new("cat", "coat", "car", "cadr", "cost").grep(EnumerableSpecGrep2.new) { |i| i.upcase }.should == ["CAT", "CAR", "CADR"]
+  end
+end

data/test/core/enumerable/take_spec.rb

@@ -0,0 +1,40 @@
+describe "Enumerable#take" do
+  before :each do
+    @values = [4,3,2,1,0,-1]
+    @enum = EnumerableSpecs::Numerous.new(*@values)
+  end
+
+  it "returns the take element" do
+    EnumerableSpecs::Numerous.new.take.should == 2
+    EnumerableSpecs::Empty.new.take.should == nil
+  end
+
+  it "returns nil if self is empty" do
+    EnumerableSpecs::Empty.new.take.should == nil
+  end
+
+  it "returns the take count elements if given a count" do
+    @enum.take(2).should == [4, 3]
+    @enum.take(4).should == [4, 3, 2, 1]
+  end
+
+  it "returns an empty array when passed a count on an empty array" do
+    empty = EnumerableSpecs::Empty.new
+    empty.take(0).should == []
+    empty.take(1).should == []
+    empty.take(2).should == []
+  end
+
+  it "returns an empty array when passed count == 0" do
+    @enum.take(0).should == []
+  end
+
+  it "returns an array containing the take element when passed count == 1" do
+    @enum.take(1).should == [4]
+  end
+
+  it "returns the entire array when count > length" do
+    @enum.take(100).should == @values
+    @enum.take(8).should == @values
+  end
+end

data/test/core/enumerable/to_a_spec.rb

@@ -0,0 +1,6 @@
+describe "Enumerable#to_a" do
+  it "returns an array containing the elements" do
+    numerous = EnumerableSpecs::Numerous.new(1, nil, 'a', 2, false, true)
+    numerous.to_a.should == [1, nil, "a", 2, false, true]
+  end
+end

data/test/core/file/expand_path_spec.rb

@@ -0,0 +1,20 @@
+describe "File.expand_path" do
+  before :each do
+    @base = ""
+    @tmpdir = "tmp"
+    @rootdir = ""
+  end
+
+  it "converts a pathname to an absolute pathname" do
+    File.expand_path('').should == @base
+    File.expand_path('a').should == File.join(@base, "a")
+    File.expand_path('a', nil).should == File.join(@base, 'a')
+  end
+
+  it "converts a pathname to an absolute pathname, using a complete path" do
+    File.expand_path("", "#{@tmpdir}").should == "#{@tmpdir}"
+    File.expand_path("a", "#{@tmpdir}").should == "#{@tmpdir}/a"
+    File.expand_path("../a", "#{@tmpdir}/xxx").should == "#{@tmpdir}/a"
+    File.expand_path(".", "#{@rootdir}").should == "#{@rootdir}"
+  end
+end

data/test/core/hash/default_spec.rb

@@ -0,0 +1,9 @@
+describe "Hash#default" do
+  it "returns the default value" do
+    h = Hash.new 5
+    h.default.should == 5
+    h.default(4).should == 5
+    Hash.new.default.should == nil
+    Hash.new.default(4).should == nil
+  end
+end

data/test/core/hash/each_key_spec.rb

@@ -0,0 +1,15 @@
+describe "Hash#each_key" do
+  it "calls block once for each key, passing key" do
+    r = {}
+    h = {1 => -1, 2 => -2, 3 => -3, 4 => -4}
+    h.each_key { |k| r[k] = k }.should equal(h)
+    r.should == {1 => 1, 2 => 2, 3 => 3, 4 => 4}
+  end
+
+  it "processes keys in the same order as keys()" do
+    keys = []
+    h = {1 => -1, 2 => -2, 3 => -3, 4 => -4}
+    h.each_key { |k| keys << k }
+    keys.should == h.keys
+  end
+end