opal 0.4.3 → 0.4.4

data/spec/rubyspec/core/enumerable/count_spec.rb

@@ -1,29 +1,45 @@
 require File.expand_path('../../../spec_helper', __FILE__)
 require File.expand_path('../fixtures/classes', __FILE__)
 
-describe "Enumerable#count" do
-  before :each do
-    @elements = [1, 2, 4, 2]
-    @numerous = EnumerableSpecs::Numerous.new(*@elements)
-  end
+ruby_version_is "1.8.7" do
+  describe "Enumerable#count" do
+    before :each do
+      @elements = [1, 2, 4, 2]
+      @numerous = EnumerableSpecs::Numerous.new(*@elements)
+    end
 
-  it "returns size when no argument or a block" do
-    @numerous.count.should == 4
-  end
+    it "returns size when no argument or a block" do
+      @numerous.count.should == 4
+    end
 
-  it "counts nils if given nil as an argument" do
-    EnumerableSpecs::Numerous.new(nil, nil, nil, false).count(nil).should == 3
-  end
+    it "counts nils if given nil as an argument" do
+      EnumerableSpecs::Numerous.new(nil, nil, nil, false).count(nil).should == 3
+    end
 
-  it "accepts an argument for comparison using ==" do
-    @numerous.count(2).should == 2
-  end
+    it "accepts an argument for comparison using ==" do
+      @numerous.count(2).should == 2
+    end
 
-  it "uses a block for comparison" do
-    @numerous.count{|x| x%2==0 }.should == 3
-  end
+    it "uses a block for comparison" do
+      @numerous.count{|x| x%2==0 }.should == 3
+    end
+
+    it "ignores the block when given an argument" do
+      @numerous.count(4){|x| x%2==0 }.should == 1
+    end
+
+    ruby_version_is ""..."1.9" do
+      it "gathers whole arrays as elements when each yields multiple" do
+        multi = EnumerableSpecs::YieldsMulti.new
+        multi.count {|e| e == [1, 2]}.should == 1
+      end
+    end
 
-  it "ignores the block when given an argument" do
-    @numerous.count(4){|x| x%2==0 }.should == 1
+    ruby_version_is "1.9" do
+      it "gathers initial args as elements when each yields multiple" do
+        multi = EnumerableSpecs::YieldsMulti.new
+        multi.count {|e| e == 1 }.should == 1
+      end
+    end
   end
 end

data/spec/rubyspec/core/enumerable/find_spec.rb

@@ -48,4 +48,9 @@ describe "Enumerable#find" do
     fail_proc = lambda { "yay" }
     @empty.find(fail_proc) {|e| true}.should == "yay"
   end
+
+  it "gathers whole arrays as elements when each yields multiple" do
+    multi = EnumerableSpecs::YieldsMulti.new
+    multi.find {|e| e == [1, 2] }.should == [1, 2]
+  end
 end

data/spec/rubyspec/core/hash/each_pair_spec.rb

@@ -7,12 +7,12 @@ describe "Hash#each_pair" do
   end
 
   # FIXME: should be: h.each { |k,| ary << k }
-  it "yields the key only to a block expecting |key,|" do
-    ary = []
-    h = {"a" => 1, "b" => 2, "c" => 3}
-    h.each_pair { |k| ary << k }
-    ary.should == ["a", "b", "c"]
-  end
+  #it "yields the key only to a block expecting |key,|" do
+  #  ary = []
+  #  h = {"a" => 1, "b" => 2, "c" => 3}
+  #  h.each_pair { |k| ary << k }
+  #  ary.should == ["a", "b", "c"]
+  #end
 
   it "uses the same order as keys() and values()" do
     h = {:a => 1, :b => 2, :c => 3, :d => 5}
@@ -27,4 +27,4 @@ describe "Hash#each_pair" do
     keys.should == h.keys
     values.should == h.values
   end
-end
+end

data/spec/rubyspec/core/hash/each_spec.rb

@@ -1,4 +1,10 @@
 describe "Hash#each" do
+  it "yields a [[key, value]] Array for each pair to a block expecting |*args|" do
+    all_args = []
+    {1 => 2, 3 => 4}.each { |*args| all_args << args }
+    all_args.sort.should == [[[1, 2]], [[3, 4]]]
+  end
+
   it "yields the key and value of each pair to a block expecting |key, value|" do
     r = {}
     h = {:a => 1, :b => 2, :c => 3, :d => 5}
@@ -7,12 +13,12 @@ describe "Hash#each" do
   end
 
   # FIXME: should be: h.each { |k,| ary << k }
-  it "yields the key only to a block expecting |key,|" do
-    ary = []
-    h = {"a" => 1, "b" => 2, "c" => 3}
-    h.each { |k| ary << k }
-    ary.should == ["a", "b", "c"]
-  end
+  #it "yields the key only to a block expecting |key,|" do
+  #  ary = []
+  #  h = {"a" => 1, "b" => 2, "c" => 3}
+  #  h.each { |k| ary << k }
+  #  ary.should == ["a", "b", "c"]
+  #end
 
   it "uses the same order as keys() and values()" do
     h = {:a => 1, :b => 2, :c => 3, :d => 5}
@@ -27,4 +33,4 @@ describe "Hash#each" do
     keys.should == h.keys
     values.should == h.values
   end
-end
+end

data/spec/rubyspec/core/module/method_defined_spec.rb

@@ -2,7 +2,7 @@ require File.expand_path('../../../spec_helper', __FILE__)
 require File.expand_path('../fixtures/classes', __FILE__)
 
 describe "Module#method_defined?" do
-  pending "returns true if a public or private method with the given name is defined in self, self's ancestors or one of self's included modules" do
+  it "returns true if a public or private method with the given name is defined in self, self's ancestors or one of self's included modules" do
     # Defined in Child
     ModuleSpecs::Child.method_defined?(:public_child).should == true
     ModuleSpecs::Child.method_defined?("private_child").should == false
@@ -24,13 +24,13 @@ describe "Module#method_defined?" do
   end
 
   # unlike alias_method, module_function, public, and friends,
-  pending "does not search Object or Kernel when called on a module" do
+  it "does not search Object or Kernel when called on a module" do
     m = Module.new
 
     m.method_defined?(:module_specs_public_method_on_kernel).should be_false
   end
 
-  pending "raises a TypeError when the given object is not a string/symbol/fixnum" do
+  it "raises a TypeError when the given object is not a string/symbol/fixnum" do
     c = Class.new
     o = mock('123')
 
@@ -40,7 +40,7 @@ describe "Module#method_defined?" do
     lambda { c.method_defined?(o) }.should raise_error(TypeError)
   end
 
-  pending "converts the given name to a string using to_str" do
+  it "converts the given name to a string using to_str" do
     c = Class.new { def test(); end }
     (o = mock('test')).should_receive(:to_str).and_return("test")
 

data/spec/rubyspec/core/module/public_method_defined_spec.rb

@@ -0,0 +1,19 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+require File.expand_path('../fixtures/classes', __FILE__)
+
+describe "Module#public_method_defined?" do
+  it "returns true if the named public method is defined by module or its ancestors" do
+    ModuleSpecs::CountsMixin.public_method_defined?("public_3").should == true
+
+    ModuleSpecs::CountsParent.public_method_defined?("public_3").should == true
+    ModuleSpecs::CountsParent.public_method_defined?("public_2").should == true
+
+    ModuleSpecs::CountsChild.public_method_defined?("public_3").should == true
+    ModuleSpecs::CountsChild.public_method_defined?("public_2").should == true
+    ModuleSpecs::CountsChild.public_method_defined?("public_1").should == true
+  end
+
+  it "returns false if the named method is not defined by the module or its ancestors" do
+    ModuleSpecs::CountsMixin.public_method_defined?(:public_10).should == false
+  end
+end

data/spec/rubyspec/core/module/remove_const_spec.rb

@@ -0,0 +1,23 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+require File.expand_path('../../../fixtures/constants', __FILE__)
+
+describe "Module#remove_const" do
+  it "removes the constant specified by a String or Symbol from the receiver's constant table" do
+    ConstantSpecs::ModuleM::CS_CONST252 = :const252
+    ConstantSpecs::ModuleM::CS_CONST252.should == :const252
+
+    ConstantSpecs::ModuleM.send :remove_const, :CS_CONST252
+    lambda { ConstantSpecs::ModuleM::CS_CONST252 }.should raise_error(NameError)
+
+    ConstantSpecs::ModuleM::CS_CONST253 = :const253
+    ConstantSpecs::ModuleM::CS_CONST253.should == :const253
+
+    ConstantSpecs::ModuleM.send :remove_const, "CS_CONST253"
+    lambda { ConstantSpecs::ModuleM::CS_CONST253 }.should raise_error(NameError)
+  end
+
+  it "returns the value of the removed constant" do
+    ConstantSpecs::ModuleM::CS_CONST254 = :const254
+    ConstantSpecs::ModuleM.send(:remove_const, :CS_CONST254).should == :const254
+  end
+end

data/spec/rubyspec/core/numeric/step_spec.rb

@@ -0,0 +1,14 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+#require File.expand_path('../fixtures/classes', __FILE__)
+
+describe "Numeric#step" do
+  before :each do
+    ScratchPad.record []
+    @prc = lambda { |x| ScratchPad << x }
+  end
+
+  it "defaults to step = 1" do
+    1.step(5, &@prc)
+    ScratchPad.recorded.should == [1, 2, 3, 4, 5]
+  end
+end

data/spec/rubyspec/core/string/center_spec.rb

@@ -1,71 +1,49 @@
-describe "String#center" do
-
-  it "does nothing if the specified width is lower than the string's size" do
-    "abc".center(2).should == "abc"
+# -*- encoding: utf-8 -*-
+require File.expand_path('../../../spec_helper', __FILE__)
+require File.expand_path('../fixtures/classes.rb', __FILE__)
+
+describe "String#center with length, padding" do
+  it "returns a new string of specified length with self centered and padded with padstr" do
+    "one".center(9, '.').should       == "...one..."
+    "hello".center(20, '123').should  == "1231231hello12312312"
+    "middle".center(13, '-').should   == "---middle----"
+
+    "".center(1, "abcd").should == "a"
+    "".center(2, "abcd").should == "aa"
+    "".center(3, "abcd").should == "aab"
+    "".center(4, "abcd").should == "abab"
+    "".center(6, "xy").should == "xyxxyx"
+    "".center(11, "12345").should == "12345123451"
+
+    "|".center(2, "abcd").should == "|a"
+    "|".center(3, "abcd").should == "a|a"
+    "|".center(4, "abcd").should == "a|ab"
+    "|".center(5, "abcd").should == "ab|ab"
+    "|".center(6, "xy").should == "xy|xyx"
+    "|".center(7, "xy").should == "xyx|xyx"
+    "|".center(11, "12345").should == "12345|12345"
+    "|".center(12, "12345").should == "12345|123451"
+
+    "||".center(3, "abcd").should == "||a"
+    "||".center(4, "abcd").should == "a||a"
+    "||".center(5, "abcd").should == "a||ab"
+    "||".center(6, "abcd").should == "ab||ab"
+    "||".center(8, "xy").should == "xyx||xyx"
+    "||".center(12, "12345").should == "12345||12345"
+    "||".center(13, "12345").should == "12345||123451"
   end
 
-  it "center a string with a strange pattern" do
-    "ab".center(17, '12345').should == "1234512ab12345123"
+  it "pads with whitespace if no padstr is given" do
+    "two".center(5).should    == " two "
+    "hello".center(20).should == "       hello        "
   end
 
-  describe "centers an odd string with a odd number of padding strings" do
-    it "uses default padding" do
-      "abc".center(5).should == " abc "
-    end
-
-    it "uses a custum padding" do
-      "abc".center(5, '-').should == "-abc-"
-    end
-
-    it "works with bigger patterns" do
-      "abc".center(7, '~!{').should == "~!abc~!"
-    end
-
-    it "repeats the pattern if needed" do
-      "abc".center(10, '~!{').should == "~!{abc~!{~"
-    end
+  it "returns self if it's longer than or as long as the specified length" do
+    "".center(0).should == ""
+    "".center(-1).should == ""
+    "hello".center(4).should == "hello"
+    "hello".center(-1).should == "hello"
+    "this".center(3).should == "this"
+    "radiology".center(8, '-').should == "radiology"
   end
-
-  describe "centers an even string with an odd number of padding strings" do
-    it "uses default padding" do
-      "abcd".center(7).should == " abcd  "
-    end
-
-    it "works with bigger patterns" do
-      "abcd".center(7, '~!{').should == "~abcd~!"
-    end
-
-    it "repeats the pattern if needed" do
-      "abcd".center(11, '~!{').should == "~!{abcd~!{~"
-    end
-  end
-
-  describe "centers an even string with an even number of padding strings" do
-    it "uses default padding" do
-      "abcd".center(8).should == "  abcd  "
-    end
-
-    it "works with bigger patterns" do
-      "abcd".center(8, '~!{').should == "~!abcd~!"
-    end
-
-    it "repeats the pattern if needed" do
-      "abcd".center(12, '~!{').should == "~!{~abcd~!{~"
-    end
-  end
-
-  describe "center an odd string with an even number" do
-    it "uses default padding" do
-      "abc".center(4).should == "abc "
-    end
-
-    it "works with bigger patterns" do
-      "abc".center(4, '~!{').should == "abc~"
-    end
-
-    it "repeats the pattern if needed" do
-      "abc".center(12, '~!{').should == "~!{~abc~!{~!"
-    end
-  end
-
 end

data/spec/rubyspec/core/string/lines_spec.rb

@@ -1,5 +1,5 @@
 describe "String#lines" do
-  pending "should split on the default record separator and return enumerator if not block is given" do
+  it "should split on the default record separator and return enumerator if not block is given" do
     "first\nsecond\nthird".lines.class.should == Enumerator
     "first\nsecond\nthird".lines.entries.class.should == Array
     "first\nsecond\nthird".lines.entries.size.should == 3

data/spec/rubyspec/core/string/ljust_spec.rb

@@ -1,17 +1,33 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../../../spec_helper', __FILE__)
+require File.expand_path('../fixtures/classes.rb', __FILE__)
+
 describe "String#ljust" do
-  it "does nothing if the specified width is lower than the string's size" do
-    "abc".ljust(2).should == "abc"
-  end
+  it "returns a new string of specified length with self left justified and padded with padstr" do
+    "hello".ljust(20, '1234').should == "hello123412341234123"
+
+    "".ljust(1, "abcd").should == "a"
+    "".ljust(2, "abcd").should == "ab"
+    "".ljust(3, "abcd").should == "abc"
+    "".ljust(4, "abcd").should == "abcd"
+    "".ljust(6, "abcd").should == "abcdab"
 
-  it "uses default padding" do
-    "abc".ljust(5).should == "  abc"
+    "OK".ljust(3, "abcd").should == "OKa"
+    "OK".ljust(4, "abcd").should == "OKab"
+    "OK".ljust(6, "abcd").should == "OKabcd"
+    "OK".ljust(8, "abcd").should == "OKabcdab"
   end
 
-  it "uses a custum padding" do
-    "abc".ljust(5, '-').should == "--abc"
+  it "pads with whitespace if no padstr is given" do
+    "hello".ljust(20).should == "hello               "
   end
 
-  it "uses wisely a bigger pattern" do
-    "abc".ljust(10, "123").should == "1231231abc"
+  it "returns self if it's longer than or as long as the specified length" do
+    "".ljust(0).should == ""
+    "".ljust(-1).should == ""
+    "hello".ljust(4).should == "hello"
+    "hello".ljust(-1).should == "hello"
+    "this".ljust(3).should == "this"
+    "radiology".ljust(8, '-').should == "radiology"
   end
 end

data/spec/rubyspec/core/string/rjust_spec.rb

@@ -1,17 +1,33 @@
-describe "String#rjust" do
-  it "does nothing if the specified width is lower than the string's size" do
-    "abc".rjust(2).should == "abc"
-  end
+# -*- encoding: utf-8 -*-
+require File.expand_path('../../../spec_helper', __FILE__)
+require File.expand_path('../fixtures/classes.rb', __FILE__)
+
+describe "String#rjust with length, padding" do
+  it "returns a new string of specified length with self right justified and padded with padstr" do
+    "hello".rjust(20, '1234').should == "123412341234123hello"
+
+    "".rjust(1, "abcd").should == "a"
+    "".rjust(2, "abcd").should == "ab"
+    "".rjust(3, "abcd").should == "abc"
+    "".rjust(4, "abcd").should == "abcd"
+    "".rjust(6, "abcd").should == "abcdab"
 
-  it "uses default padding" do
-    "abc".rjust(5).should == "abc  "
+    "OK".rjust(3, "abcd").should == "aOK"
+    "OK".rjust(4, "abcd").should == "abOK"
+    "OK".rjust(6, "abcd").should == "abcdOK"
+    "OK".rjust(8, "abcd").should == "abcdabOK"
   end
 
-  it "uses a custum padding" do
-    "abc".rjust(5, '-').should == "abc--"
+  it "pads with whitespace if no padstr is given" do
+    "hello".rjust(20).should == "               hello"
   end
 
-  it "uses wisely a bigger pattern" do
-    "abc".rjust(10, "123").should == "abc1231231"
+  it "returns self if it's longer than or as long as the specified length" do
+    "".rjust(0).should == ""
+    "".rjust(-1).should == ""
+    "hello".rjust(4).should == "hello"
+    "hello".rjust(-1).should == "hello"
+    "this".rjust(3).should == "this"
+    "radiology".rjust(8, '-').should == "radiology"
   end
 end

data/spec/rubyspec/core/struct/fixtures/classes.rb

@@ -0,0 +1,26 @@
+module StructClasses
+
+  class Apple < Struct; end
+
+  Ruby = Struct.new(:version, :platform)
+
+  Car = Struct.new(:make, :model, :year)
+
+  class Honda < Car
+    def initialize(*args)
+      self.make = "Honda"
+      super(*args)
+    end
+  end
+
+  class SubclassX < Struct
+  end
+
+  class SubclassX
+    attr_reader :key
+    def initialize(*)
+      @key = :value
+      super
+    end
+  end
+end