opal 0.3.11 → 0.3.15

data/runtime/spec/language/variables_spec.rb

@@ -0,0 +1,28 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Basic assignment" do
+  it "allows the rhs to be assigned to the lhs" do
+    a = nil
+    a.should == nil
+  end
+
+  it "assigns nil to lhs when rhs is an empty expression" do
+    a = ()
+    a.should be_nil
+  end
+
+  it "assigns [] to lhs when rhs is an empty splat expression" do
+    a = *()
+    a.should == []
+  end
+
+  it "allows the assignment of the rhs to the lhs using the rhs splat operator" do
+    a = *nil;       a.should == []
+    a = *1;         a.should == [1]
+    a = *[];        a.should == []
+    a = *[1];       a.should == [1]
+    a = *[nil];     a.should == [nil]
+    a = *[[]];      a.should == [[]]
+    a = *[1,2];     a.should == [1,2]
+  end
+end

data/runtime/spec/language/versions/hash_1.9.rb

@@ -0,0 +1,20 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Hash literal" do
+  describe "new-style hash syntax" do
+    it "constructs a new hash with the given elements" do
+      {foo: 123}.should == {:foo => 123}
+      {rbx: :cool, specs: 'fail_sometimes'}.should == {:rbx => :cool, :specs => 'fail_sometimes'}
+    end
+
+    it "ignores a hanging comma" do
+      {foo: 123,}.should == {:foo => 123}
+      {rbx: :cool, specs: 'fail_sometimes',}.should == {:rbx => :cool, :specs => 'fail_sometimes'}
+    end
+
+    it "can mix and match syntax styles" do
+      {rbx: :cool, :specs => 'fail_sometimes'}.should == {:rbx => :cool, :specs => 'fail_sometimes'}
+      {'rbx' => :cool, specs: 'fail_sometimes'}.should == {'rbx' => :cool, :specs => 'fail_sometimes'}
+    end
+  end
+end

data/runtime/spec/language/while_spec.rb

@@ -0,0 +1,175 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "The while expression" do
+  it "runs while the expression is true" do
+    i = 0
+    while i < 3
+      i += 1
+    end
+    i.should == 3
+  end
+
+  it "optionally takes a 'do' after the expression" do
+    i = 0
+    while i < 3 do
+      i += 1
+    end
+
+    i.should == 3
+  end
+
+  it "allows body begin on the same line if do is used" do
+    i = 0
+    while i < 3 do i += 1
+    end
+
+    i.should == 3
+  end
+
+  it "executes code in containing variable scope" do
+    i = 0
+    while i != 1
+      a = 123
+      i = 1
+    end
+
+    a.should == 123
+  end
+
+  it "exectues code in containing variable scope with 'do'" do
+    i = 0
+    while i != 1 do
+      a = 123
+      i = 1
+    end
+
+    a.should == 123
+  end
+
+  it "returns nil is ended when condition became false" do
+    i = 0
+    while i < 3
+      i += 1
+    end.should == nil
+  end
+
+  it "does not evaluate the body if expression is empty" do
+    a = []
+    while ()
+      a << :body_evaluated
+    end
+    a.should == []
+  end
+
+  it "stops running body if interrupted by break" do
+    i = 0
+    while i < 10
+      i += 1
+      break if i > 5
+    end
+    i.should == 6
+  end
+
+  it "returns value passed to break if interrupted by break" do
+    while true
+      break 123
+    end.should == 123
+  end
+
+  it "returns nil if interrupted by break with no arguments" do
+    while true
+      break
+    end.should == nil
+  end
+
+  it "skips to end of body with next" do
+    a = []
+    i = 0
+    while (i+=1)<5
+      next if i==3
+      a << i
+    end
+    a.should == [1, 2, 4]
+  end
+
+  it "restarts the current iteration without reevaluating condition with redo" do
+    a = []
+    i = 0
+    j = 0
+    while (i+=1) <3
+      a << i
+      j+=1
+      redo if j<3
+    end
+    a.should == [1, 1, 1, 2]
+  end
+end
+
+describe "The while modifier" do
+  it "runs preceding statement while the condition is true" do
+    i = 0
+    i += 1 while i < 3
+    i.should == 3
+  end
+
+  it "evaluates condition before statement execution" do
+    a = []
+    i = 0
+    a << i while (i+=1) < 3
+    a.should == [1, 2]
+  end
+
+  it "does not run preceding statement if the condition is false" do
+    i = 0
+    i += 1 while false
+    i.should == 0
+  end
+
+  it "does not run preceding statement if the condition is empty" do
+    i = 0
+    i += 1 while ()
+    i.should == 0
+  end
+
+  it "returns nil if ended when condition became false" do
+    i = 0
+    (i += 1 while i<10).should == nil
+  end
+
+  it "returns value passed to break if interrupted by break" do
+    (break 123 while true).should == 123
+  end
+
+  it "returns nil if interrupted by break with no arguments" do
+    (break while true).should == nil
+  end
+end
+
+describe "The while modifier with begin .. end block" do
+  it "runs block while the expression is true" do
+    i = 0
+    begin
+      i += 1
+    end while i < 3
+
+    i.should == 3
+  end
+
+  it "stops running block if interrupted by break" do
+    i = 0
+    begin
+      i += 1
+      break if i > 5
+    end while i < 10
+
+    i.should == 6
+  end
+
+  it "returns values passed to break if interrupted by break" do
+    (begin; break 123; end while true).should == 123
+  end
+
+  it "returns nil if interrupted by break with no arguments" do
+    (begin; break; end while true).should == nil
+  end
+end

data/runtime/spec/library/stringscanner/scan_spec.rb

@@ -0,0 +1,36 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+#require 'strscan'
+
+describe "StringScanner#scan" do
+  before :each do
+    @s = StringScanner.new("This is a test")
+  end
+
+  it "returns the matched string" do
+    @s.scan(/\w+/).should == "This"
+    @s.scan(/.../).should == " is"
+    @s.scan(//).should == ""
+    @s.scan(/\s+/).should == " "
+  end
+
+  it "treats ^ as matching from the beginning of the current position" do
+    @s.scan(/\w+/).should == "This"
+    @s.scan(/^\d/).should be_nil
+    @s.scan(/^\s/).should == " "
+  end
+
+  it "returns nil if there's no match" do
+    @s.scan(/\d/).should == nil
+  end
+
+  it "returns nil when there is no more to scan" do
+    @s.scan(/[\w\s]+/).should == "This is a test"
+    @s.scan(/\w+/).should be_nil
+  end
+
+  it "returns an empty string when the pattern matches empty" do
+    @s.scan(/.*/).should == "This is a test"
+    @s.scan(/.*/).should == ""
+    @s.scan(/./).should be_nil
+  end
+end

data/runtime/spec/opal/forwardable/def_instance_delegator_spec.rb

@@ -0,0 +1,49 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+#require 'forwardable'
+
+#class ForwardableTest
+  #extend Forwardable
+
+  #def initialize
+    #@some_ivar = ['a', 'b', 'c']
+    #@blah = [1, 2, 3, 4, 5, 6]
+  #end
+
+  #def foo
+    #@some_ivar
+  #end
+
+  #def wizz
+    #@blah
+  #end
+
+  #def_instance_delegator :@some_ivar, :length
+  #def_instance_delegator :@blah, :length, :blah
+
+  #def_instance_delegator :foo, :reverse
+  #def_instance_delegator :wizz, :reverse, :fizz
+#end
+
+describe "Forwardable#def_instance_delegator" do
+  before do
+    @tester = ForwardableTest.new
+  end
+
+  it "should define new instance methods" do
+    @tester.respond_to?(:length).should be_true 
+    @tester.respond_to?(:blah).should be_true
+
+    @tester.respond_to?(:reverse).should be_true
+    @tester.respond_to?(:fizz).should be_true
+  end
+
+  it "should forward method calls to given ivars" do
+    @tester.length.should == 3
+    @tester.blah.should == 6
+  end
+
+  it "should forward method calls to given accessors" do
+    @tester.reverse.should == ['c', 'b', 'a']
+    @tester.fizz.should == [6, 5, 4, 3, 2, 1]
+  end
+end

data/runtime/spec/opal/opal/defined_spec.rb

@@ -0,0 +1,15 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.defined?" do
+  it "should return nil when given `undefined`" do
+    Opal.defined?(`undefined`).should be_nil
+  end
+
+  it "should return the type of object for anything else" do
+    Opal.defined?("wow").should == 'string'
+    Opal.defined?(42).should == 'number'
+    Opal.defined?(Object.new).should == 'object'
+    Opal.defined?(nil).should == 'object'
+    Opal.defined?(`null`).should == 'object'
+  end
+end

data/runtime/spec/opal/opal/function_spec.rb

@@ -0,0 +1,11 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.function?" do
+  it "returns true if the object is a function, false otherwise" do
+    Opal.function?(proc do; end).should be_true
+    Opal.function?(`function(){}`).should be_true
+    Opal.function?(nil).should be_false
+    Opal.function?(Object.new).should be_false
+    Opal.function?(Proc).should be_false
+  end
+end

data/runtime/spec/opal/opal/native_spec.rb

@@ -0,0 +1,16 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.native?" do
+  it "returns true if the object is not a ruby object, false if it is" do
+    Opal.native?(`{}`).should be_true
+    Opal.native?(`new Object()`).should be_true
+    Opal.native?(`null`).should be_true
+    Opal.native?(`undefined`).should be_true
+
+    Opal.native?(Object.new).should be_false
+    Opal.native?([1, 2, 3]).should be_false
+    Opal.native?(true).should be_false
+    Opal.native?(false).should be_false
+    Opal.native?(nil).should be_false
+  end
+end

data/runtime/spec/opal/opal/null_spec.rb

@@ -0,0 +1,10 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.null?" do
+  it "returns true if the given object is null, false otherwise" do
+    Opal.null?(`null`).should be_true
+    Opal.null?(`undefined`).should be_false
+    Opal.null?(nil).should be_false
+    Opal.null?(Object.new).should be_false
+  end
+end

data/runtime/spec/opal/opal/number_spec.rb

@@ -0,0 +1,11 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.number?" do
+  it "returns true if the object is a number" do
+    Opal.number?(42).should be_true
+    Opal.number?(Object.new).should be_false
+    Opal.number?(nil).should be_false
+    Opal.number?(`null`).should be_false
+    Opal.number?(`undefined`).should be_false
+  end
+end

data/runtime/spec/opal/opal/object_spec.rb

@@ -0,0 +1,16 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.object?" do
+  it "returns true if the object is a ruby object, false otherwise" do
+    Opal.object?(Object.new).should be_true
+    Opal.object?([1, 2, 3]).should be_true
+    Opal.object?(true).should be_true
+    Opal.object?(false).should be_true
+    Opal.object?(nil).should be_true
+
+    Opal.object?(`{}`).should be_false
+    Opal.object?(`new Object()`).should be_false
+    Opal.object?(`null`).should be_false
+    Opal.object?(`undefined`).should be_false
+  end
+end

data/runtime/spec/opal/opal/string_spec.rb

@@ -0,0 +1,11 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.string?" do
+  it "returns true if the object is a string" do
+    Opal.string?("foo").should be_true
+    Opal.string?(Object.new).should be_false
+    Opal.string?(nil).should be_false
+    Opal.string?(`null`).should be_false
+    Opal.string?(`undefined`).should be_false
+  end
+end

data/runtime/spec/opal/opal/typeof_spec.rb

@@ -0,0 +1,9 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.typeof" do
+  it "returns the javascript type of the object" do
+    Opal.typeof(`null`).should == 'object'
+    Opal.typeof(`undefined`).should == 'undefined'
+    Opal.typeof(nil).should == 'object'
+  end
+end

data/runtime/spec/opal/opal/undefined_spec.rb

@@ -0,0 +1,10 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Opal.undefined?" do
+  it "returns true if the arg is undefined, false otherwise" do
+    Opal.undefined?(`undefined`).should be_true
+    Opal.undefined?(Object.new).should be_false
+    Opal.undefined?(nil).should be_false
+    Opal.undefined?(`null`).should be_false
+  end
+end

data/runtime/spec/opal/true/case_compare_spec.rb

@@ -0,0 +1,12 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "TrueClass#===" do
+  it "returns true when the given object is the literal 'true'" do
+    (TrueClass === true).should == true
+    (TrueClass === false).should == false
+    (TrueClass === nil).should == false
+    (TrueClass === "").should == false
+    (TrueClass === 'x').should == false
+  end
+end
+