opal-cj 0.7.0.beta1

data/spec/opal/core/language/fixtures/variables.rb

@@ -0,0 +1,58 @@
+module VariablesSpecs
+  class ParAsgn
+    attr_accessor :x
+
+    def initialize
+      @x = 0
+    end
+
+    def inc
+      @x += 1
+    end
+
+    def to_ary
+      [1,2,3,4]
+    end
+  end
+
+  class OpAsgn
+    attr_accessor :a, :b, :side_effect
+
+    def do_side_effect
+      self.side_effect = true
+      return @a
+    end
+
+    def do_more_side_effects
+      @a += 5
+      self
+    end
+
+    def do_bool_side_effects
+      @b += 1
+      self
+    end
+  end
+
+  class Hashalike
+    def [](k) k end
+    def []=(k, v) [k, v] end
+  end
+
+  def self.reverse_foo(a, b)
+    return b, a
+  end
+
+  class ArrayLike
+    def initialize(array)
+      @array = array
+    end
+
+    def to_a
+      @array
+    end
+  end
+
+  class ArraySubclass < Array
+  end
+end

data/spec/opal/core/language/fixtures/yield.rb

@@ -0,0 +1,28 @@
+module YieldSpecs
+  class Yielder
+    def z
+      yield
+    end
+
+    def ze(&block)
+      block = proc { block }
+      yield
+    end
+
+    def s(a)
+      yield(a)
+    end
+
+    def m(a, b, c)
+      yield(a, b, c)
+    end
+
+    def r(a)
+      yield(*a)
+    end
+
+    def rs(a, b, c)
+      yield(a, b, *c)
+    end
+  end
+end

data/spec/opal/core/language/predefined_spec.rb

@@ -0,0 +1,85 @@
+describe "predefined global $~" do
+  it "is set to contain the MatchData object of the last match if successful" do
+    md = /foo/.match 'foo'
+    $~.should be_kind_of(MatchData)
+    $~.object_id.should == md.object_id
+
+    /bar/ =~ 'bar'
+    $~.should be_kind_of(MatchData)
+    $~.object_id.should_not == md.object_id
+  end
+
+  it "is set to nil if the last match was unsuccessful" do
+    /foo/ =~ 'foo'
+    $~.nil?.should == false
+
+    /foo/ =~ 'bar'
+    $~.nil?.should == true
+  end
+end
+
+describe "predefined global $:" do
+  it "is initialized to an array of strings" do
+    $:.is_a?(Array).should == true
+  end
+end
+
+describe "predefined standard objects" do
+  it "includes ARGF" do
+    Object.const_defined?(:ARGF).should == true
+  end
+
+  it "includes ARGV" do
+    Object.const_defined?(:ARGV).should == true
+    ARGV.respond_to?(:[]).should == true
+  end
+
+  # already checked in spec_helper
+  #it "includes a hash-like object ENV" do
+  #  Object.const_defined?(:ENV).should == true
+  #  ENV.respond_to?(:[]).should == true
+  #end
+end
+
+describe "The predefined global constants" do
+  it "includes TRUE" do
+    Object.const_defined?(:TRUE).should == true
+    TRUE.should be_true
+  end
+
+  it "includes FALSE" do
+    Object.const_defined?(:FALSE).should == true
+    FALSE.should be_false
+  end
+
+  it "includes NIL" do
+    Object.const_defined?(:NIL).should == true
+    NIL.should be_nil
+  end
+
+  it "includes STDIN" do
+    Object.const_defined?(:STDIN).should == true
+  end
+
+  it "includes STDOUT" do
+    Object.const_defined?(:STDOUT).should == true
+  end
+
+  it "includes STDERR" do
+    Object.const_defined?(:STDERR).should == true
+  end
+
+  it "includes RUBY_VERSION" do
+    Object.const_defined?(:RUBY_VERSION).should == true
+    RUBY_VERSION.should == "2.1.1"
+  end
+
+  it "includes RUBY_RELEASE_DATE" do
+    Object.const_defined?(:RUBY_RELEASE_DATE).should == true
+  end
+
+  it "includes RUBY_PLATFORM" do
+    Object.const_defined?(:RUBY_PLATFORM).should == true
+    RUBY_PLATFORM.should == "opal"
+  end
+end

data/spec/opal/core/language/proc_spec.rb

@@ -0,0 +1,263 @@
+describe "A Proc" do
+  it "captures locals from the surrounding scope" do
+    var = 1
+    lambda { var }.call.should == 1
+  end
+
+  ruby_version_is ""..."1.9" do
+    it "overwrites a captured local when used as an argument" do
+      var = 1
+      lambda { |var| var }.call(2).should == 2
+      var.should == 2
+    end
+  end
+
+  ruby_version_is "1.9" do
+    it "does not capture a local when an argument has the same name" do
+      var = 1
+      lambda { |var| var }.call(2).should == 2
+      var.should == 1
+    end
+  end
+
+  describe "taking zero arguments" do
+    before :each do
+      @l = lambda { 1 }
+    end
+
+    it "does not raise an exception if no values are passed" do
+      @l.call.should == 1
+    end
+
+    ruby_version_is ""..."1.9" do
+      it "does not raise an exception if a value is passed" do
+        @l.call(0).should == 1
+      end
+    end
+
+    ruby_version_is "1.9" do
+      it "raises an ArgumentErro if a value is passed" do
+        lambda { @l.call(0) }.should raise_error(ArgumentError)
+      end
+    end
+  end
+
+  describe "taking || arguments" do
+    before :each do
+      @l = lambda { || 1 }
+    end
+
+    it "does not raise an exception when passed no values" do
+      @l.call.should == 1
+    end
+
+    it "raises an ArgumentError if a value is passed" do
+      lambda { @l.call(0) }.should raise_error(ArgumentError)
+    end
+  end
+
+  describe "taking |a| arguments" do
+    before :each do
+      @l = lambda { |a| a }
+    end
+
+    it "assigns the value passed to the argument" do
+      @l.call(2).should == 2
+    end
+
+    it "does not destructure a single Array value" do
+      @l.call([1, 2]).should == [1, 2]
+    end
+
+    it "does not call #to_ary to convert a single passed object to an Array" do
+      obj = mock("block yield to_ary")
+      obj.should_not_receive(:to_ary)
+
+      @l.call(obj).should equal(obj)
+    end
+
+    ruby_version_is ""..."1.9" do
+      it "assigns nil to the argument if no value is passed" do
+        @l.call.should be_nil
+      end
+
+      it "assigns all the values passed to the argument as an Array" do
+        @l.call(1, 2).should == [1, 2]
+      end
+    end
+
+    ruby_version_is "1.9" do
+      it "raises an ArgumentError if no value is passed" do
+        lambda { @l.call }.should raise_error(ArgumentError)
+      end
+    end
+  end
+
+  describe "taking |a, b| arguments" do
+    before :each do
+      @l = lambda { |a, b| [a, b] }
+    end
+
+    it "raises an ArgumentError if passed no values" do
+      lambda { @l.call }.should raise_error(ArgumentError)
+    end
+
+    it "raises an ArgumentError if passed one value" do
+      lambda { @l.call(0) }.should raise_error(ArgumentError)
+    end
+
+    it "assigns the values passed to the arguments" do
+      @l.call(1, 2).should == [1, 2]
+    end
+
+    it "does not call #to_ary to convert a single passed object to an Array" do
+      obj = mock("proc call to_ary")
+      obj.should_not_receive(:to_ary)
+
+      lambda { @l.call(obj) }.should raise_error(ArgumentError)
+    end
+  end
+
+  describe "taking |a, *b| arguments" do
+    before :each do
+      @l = lambda { |a, *b| [a, b] }
+    end
+
+    it "raises an ArgumentError if passed no values" do
+      lambda { @l.call }.should raise_error(ArgumentError)
+    end
+
+    it "does not destructure a single Array value yielded" do
+      @l.call([1, 2, 3]).should == [[1, 2, 3], []]
+    end
+
+    it "assigns all passed values after the first to the rest argument" do
+        @l.call(1, 2, 3).should == [1, [2, 3]]
+    end
+
+    it "does not call #to_ary to convert a single passed object to an Array" do
+      obj = mock("block yield to_ary")
+      obj.should_not_receive(:to_ary)
+
+      @l.call(obj).should == [obj, []]
+    end
+  end
+
+  describe "taking |*| arguments" do
+    before :each do
+      # @l = lambda { |*| 1 }
+    end
+
+    it "does not raise an exception when passed no values" do
+      @l.call.should == 1
+    end
+
+    it "does not raise an exception when passed multiple values" do
+      @l.call(2, 3, 4).should == 1
+    end
+
+    it "does not call #to_ary to convert a single passed object to an Array" do
+      obj = mock("block yield to_ary")
+      obj.should_not_receive(:to_ary)
+
+      @l.call(obj).should == 1
+    end
+  end
+
+  describe "taking |*a| arguments" do
+    before :each do
+      @l = lambda { |*a| a }
+    end
+
+    it "assigns [] to the argument when passed no values" do
+      @l.call.should == []
+    end
+
+    it "assigns the argument an Array wrapping one passed value" do
+      @l.call(1).should == [1]
+    end
+
+    it "assigns the argument an Array wrapping all values passed" do
+      @l.call(1, 2, 3).should == [1, 2, 3]
+    end
+
+    it "does not call #to_ary to convert a single passed object to an Array" do
+      obj = mock("block yield to_ary")
+      obj.should_not_receive(:to_ary)
+
+      @l.call(obj).should == [obj]
+    end
+  end
+
+  describe "taking |a, | arguments" do
+    before :each do
+      # @l = lambda { |a, | a }
+    end
+
+    it "raises an ArgumentError when passed no values" do
+      lambda { @l.call }.should raise_error(ArgumentError)
+    end
+
+    it "raises an ArgumentError when passed more than one value" do
+      lambda { @l.call(1, 2) }.should raise_error(ArgumentError)
+    end
+
+    it "assigns the argument the value passed" do
+      @l.call(1).should == 1
+    end
+
+    it "does not destructure when passed a single Array" do
+      @l.call([1,2]).should == [1, 2]
+    end
+
+    it "does not call #to_ary to convert a single passed object to an Array" do
+      obj = mock("block yield to_ary")
+      obj.should_not_receive(:to_ary)
+
+      @l.call(obj).should == obj
+    end
+  end
+
+  describe "taking |(a, b)| arguments" do
+    before :each do
+      # @l = lambda { |(a, b)| [a, b] }
+    end
+
+    it "raises an ArgumentError when passed no values" do
+      lambda { @l.call }.should raise_error(ArgumentError)
+    end
+
+    ruby_version_is ""..."1.9" do
+      it "raises an ArgumentError when passed a single Array" do
+        lambda { @l.call([1, 2]) }.should raise_error(ArgumentError)
+      end
+
+      it "raises an ArgumentError when passed a single object" do
+        obj = mock("block yield to_ary")
+        obj.should_not_receive(:to_ary)
+
+        lambda { @l.call(obj) }.should raise_error(ArgumentError)
+      end
+    end
+
+    ruby_version_is "1.9" do
+      it "destructures a single Array value yielded" do
+        @l.call([1, 2]).should == [1, 2]
+      end
+
+      it "calls #to_ary to convert a single passed object to an Array" do
+        obj = mock("block yield to_ary")
+        obj.should_receive(:to_ary).and_return([1, 2])
+
+        @l.call(obj).should == [1, 2]
+      end
+
+      it "raises an TypeError if #to_ary does not return an Array" do
+        obj = mock("block yield to_ary invalid")
+        obj.should_receive(:to_ary).and_return(1)
+
+        lambda { @l.call(obj) }.should raise_error(TypeError)
+      end
+    end
+  end
+end

data/spec/opal/core/language/regexp_spec.rb

@@ -0,0 +1,20 @@
+describe "Literal Regexps" do
+  it "yields a Regexp" do
+    /Hello/.should be_kind_of(Regexp)
+  end
+end
+
+describe "Regexps with interpolation" do
+  it "allows interpolation of strings" do
+    str = "foo|bar"
+    /#{str}/.should == /foo|bar/
+  end
+
+  it "allows interpolation to interact with other Regexp constructs" do
+    str = "foo)|(bar"
+    /(#{str})/.should == /(foo)|(bar)/
+
+    str = "a"
+    /[#{str}-z]/.should == /[a-z]/
+  end
+end