opal 0.3.43 → 0.3.44

data/opal/opal/time.rb

@@ -3,7 +3,7 @@ short_days = %w[Sun Mon Tue Wed Thu Fri Sat]
 short_months = %w[Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec]
 long_months = %w[January Febuary March April May June July August September October November December]
 
-class Time < `Date`
+class Time
   include Comparable
 
   def self.at(seconds, frac = 0)

data/opal/rbconfig.rb

@@ -1,5 +1,19 @@
+module RbConfig
+  versions = RUBY_VERSION.split('.')
+  CONFIG = {
+    'ruby_version' => RUBY_VERSION,
+    'MAJOR'        => versions[0],
+    'MINOR'        => versions[1],
+    'TEENY'        => versions[2],
+    'RUBY'         => RUBY_ENGINE,
+    'RUBY_INSTALL_NAME' => RUBY_ENGINE,
+    'RUBY_SO_NAME'      => RUBY_ENGINE,
+    'target_os'         => 'ECMA-262',
+    'host_os'           => 'ECMA-262',
+    'PATH_SEPARATOR'    => ':'
+  }
+end
+
+# required for mspec it would appear
 RUBY_NAME = 'opal'
 RUBY_EXE = 'opal'
-
-RUBY_VERSION = '1.9.3'
-

data/opal/strscan.rb

@@ -5,7 +5,7 @@ class StringScanner
   def initialize(string)
     @string  = string
     @pos     = 0
-    @matched = ''
+    @matched = nil
     @working = string
   end
 
@@ -15,9 +15,7 @@ class StringScanner
           result = regex.exec(#@working);
 
       if (result == null) {
-        #@matched = '';
-
-        return nil;
+        return this.matched = nil;
       }
       else if (typeof(result) === 'object') {
         #@pos      += result[0].length;
@@ -58,4 +56,42 @@ class StringScanner
   def eos?
     `#@working.length === 0`
   end
-end
+
+  def skip(re)
+    %x{
+      re = new RegExp('^' + re.source)
+      var result = re.exec(#@working);
+
+      if (result == null) {
+        return this.matched = nil;
+      }
+      else {
+        var match_str = result[0];
+        var match_len = match_str.length;
+        this.matched = match_str;
+        this.pos += match_len;
+        this.working = this.working.substring(match_len);
+        return match_len;
+      }
+    }
+  end
+
+  def get_byte()
+    %x{
+      var result = nil;
+      if (this.pos < this.string.length) {
+        this.pos += 1;
+        result = this.matched = this.working.substring(0, 1);
+        this.working = this.working.substring(1);
+      }
+      else {
+        this.matched = nil; 
+      }
+
+      return result;
+    }
+  end
+
+  # not exactly, but for now...
+  alias getch get_byte
+end

data/spec/opal/class/new_spec.rb

@@ -0,0 +1,27 @@
+require 'spec_helper'
+
+
+%x{
+  function JavascriptClass(a, b, c) {
+    this.bar = "foo";
+    this.args = [a, b, c];
+  }
+}
+
+describe "Class#new" do
+  before do
+    @js_class = `JavascriptClass`
+  end
+
+  it "returns a new instance of a class" do
+    Object.new.class.should == Object
+  end
+
+  it "can create new instances of native javascript classes" do
+    @js_class.new.bar.should == "foo"
+  end
+
+  it "passed in arguments to native class constructor" do
+    @js_class.new(1, 2, 3).args.should == [1, 2, 3]
+  end
+end

data/spec/opal/native_spec.rb

@@ -0,0 +1,127 @@
+require 'spec_helper'
+
+%x{
+  var obj = {
+    property: 42,
+
+    simple: function() {
+      return 'foo';
+    },
+
+    context_check: function() {
+      return this === obj;
+    },
+
+    check_args: function(a, b, c) {
+      return [a, b, c];
+    },
+
+    array: [1, 2, 3, 4],
+
+    child_object: {
+      grand_child: 100
+    }
+  };
+}
+
+NATIVE_OBJECT_SPEC = `obj`
+
+describe "Native objects" do
+  before do
+    @obj = NATIVE_OBJECT_SPEC
+  end
+
+  describe "accessing a null/undefined property" do
+    it "returns nil" do
+      @obj.doesnt_exist.should == nil
+    end
+  end
+
+  describe "with a mid ending with '='" do
+    it "sets the value on the property" do
+      @obj.set_property = 100
+      @obj.set_property.should == 100
+
+      @obj.set_property = [1, 2, 3]
+      @obj.set_property.should == [1, 2, 3]
+    end
+  end
+
+  describe "accessing a property" do
+    it "returns values from the native object" do
+      @obj.property.should == 42
+    end
+
+    it "returns an array without wrapping" do
+      @obj.array.should == [1, 2, 3, 4]
+    end
+
+  end
+
+  describe "accessing a function property" do
+    it "forwards methods to wrapped object as native function calls" do
+      @obj.simple.should == "foo"
+    end
+
+    it "calls functions with native object as context" do
+      @obj.context_check.should be_true
+    end
+
+    it "passes each argument to native function" do
+      @obj.check_args(1, 2, 3).should == [1, 2, 3]
+    end
+
+    it "tries to convert each argument with to_native if defined" do
+      obj, obj2, obj3 = Object.new, Object.new, Object.new
+      def obj.to_native; "foo"; end
+      def obj2.to_native; 42; end
+
+      @obj.check_args(obj, obj2, obj3).should == ["foo", 42, obj3]
+    end
+  end
+
+  describe "#[]" do
+    before do
+      @native = %x{
+        {
+        foo: 'FOO',
+
+        str: 'LOL',
+        num: 42,
+        on: true,
+        off: false
+        };
+      }
+    end
+
+    it "returns a value from the native object" do
+      @native['foo'].should == "FOO"
+    end
+
+    it "returns nil for a key not existing on native object" do
+      @native['bar'].should be_nil
+    end
+
+    it "returns direct values for strings, numerics and booleans" do
+      @native['str'].should == 'LOL'
+      @native['num'].should == 42
+      @native['on'].should == true
+      @native['off'].should == false
+    end
+  end
+
+  describe "==" do
+    it "returns true if the wrapped objects are `===` to each other" do
+      %x{
+        var obj1 = {}, obj2 = {};
+      }
+
+      a = `obj1`
+      b = `obj1`
+      c = `obj2`
+
+      (a == b).should be_true
+      (a == c).should be_false
+    end
+  end
+end

data/spec/ospec/runner.rb

@@ -2,8 +2,6 @@
 require 'date'
 require 'observer'
 
-ENV = {}
-
 class OSpecFilter
   def self.main
     @main ||= self.new

data/spec/parser/strscan/get_byte_spec.rb

@@ -0,0 +1,29 @@
+describe "StringScanner#get_byte" do
+  before :each do
+    @s = StringScanner.new("abc")
+  end
+
+  it "should return the next byte in string" do
+    @s.get_byte.should == "a"
+  end
+
+  it "should set matched to next byte in string" do
+    @s.matched.should be_nil
+    @s.get_byte
+    @s.matched.should == "a"
+  end
+
+  it "should advance position by 1" do
+    @s.pos.should == 0
+    @s.get_byte
+    @s.pos.should == 1
+  end
+
+  it "should return nil if beyond end of string" do
+    @s.get_byte.should == "a"
+    @s.get_byte.should == "b"
+    @s.get_byte.should == "c"
+    @s.get_byte.should be_nil
+    @s.matched.should be_nil
+  end
+end

data/spec/parser/strscan/skip_spec.rb

@@ -0,0 +1,40 @@
+describe "StringScanner#skip" do
+  before :each do
+    @s = StringScanner.new("This is a test")
+  end
+
+  it "returns the number of characters skipped when matched" do
+    @s.skip(/This/).should == 4
+  end
+
+  it "matches strictly at position" do
+    @s.skip(/This/)
+    @s.skip(/is/).should be_nil
+  end
+
+  it "returns nil when not matched" do
+    @s.skip(/foo/).should be_nil
+  end
+
+  it "advances the scan pointer when matched" do
+    @s.skip(/This/)
+    @s.pos.should == 4
+  end
+
+  it "does not advance the scan pointer when not matched" do
+    @s.skip(/foo/)
+    @s.pos.should == 0
+  end
+
+  it "captures the matched string when matched" do
+    @s.skip(/This/)
+    @s.matched.should == "This"
+  end
+
+  it "clears the matched string when not matched" do
+    @s.skip(/This/)
+    @s.matched.should == "This"
+    @s.skip(/foo/)
+    @s.matched.should be_nil
+  end
+end

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

@@ -14,7 +14,7 @@ describe "Array#each" do
     a.should == [1, 2, 3]
   end
 
-  it "yields each element to a block that takes multiple arguments" do
+  it "yields each nested element to a block that takes multiple arguments" do
     a = [[1, 2], :a, [3, 4]]
     b = []
 

data/spec/rubyspec/core/array/intersection_spec.rb

@@ -70,4 +70,9 @@ describe "Array#&" do
   it "does not call to_ary on array subclasses" do
     ([5, 6] & ArraySpecs::ToAryArray[1, 2, 5, 6]).should == [5, 6]
   end
+
+  it "should match native string and object string that are equivalent" do
+    # "value".to_sym forces creation of an Opal.String
+    (["value".to_sym] & ["value"]).should == ["value"]
+  end
 end

data/spec/rubyspec/core/array/max_spec.rb

@@ -0,0 +1,32 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Array#max" do
+  it "should return max of values in numeric array" do
+    [1, 2].max.should == 2
+  end
+
+  it "should return max of values in string array" do
+    ["1", "2"].max.should == "2"
+  end
+
+  it "should return nil if array is empty" do
+    [].max.should be_nil 
+  end
+
+  it "should raise ArgumentError if array contains a non-Comparable value" do
+    lambda { [true, false].max }.should raise_error(ArgumentError)
+  end
+
+  it "should use block when specified to compare values" do
+    [1, 2, 3].max {|candidate, current| candidate <=> current }.should == 3
+  end
+
+  it "should use break value from block when block is specified" do
+    [1, 2, 3].max {|candidate, current| break 5 }.should == 5
+  end
+
+  it "should allow block to compare non-Comparable values" do
+    [true, false].max {|candidate, current| candidate ? 1 : -1 }.should == true
+    [true, false].max {|candidate, current| candidate ? -1 : 1 }.should == false
+  end
+end

data/spec/rubyspec/core/array/min_spec.rb

@@ -0,0 +1,32 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "Array#min" do
+  it "should return min of values in numeric array" do
+    [1, 2].min.should == 1
+  end
+
+  it "should return min of values in string array" do
+    ["1", "2"].min.should == "1"
+  end
+
+  it "should return nil if array is empty" do
+    [].min.should be_nil 
+  end
+
+  it "should raise ArgumentError if array contains a non-Comparable value" do
+    lambda { [true, false].min }.should raise_error(ArgumentError)
+  end
+
+  it "should use block when specified to compare values" do
+    [1, 2, 3].min {|candidate, current| candidate <=> current }.should == 1
+  end
+
+  it "should use break value from block when block is specified" do
+    [1, 2, 3].max {|candidate, current| break -5 }.should == -5
+  end
+
+  it "should allow block to compare non-Comparable values" do
+    [true, false].min {|candidate, current| candidate ? 1 : -1 }.should == false
+    [true, false].min {|candidate, current| candidate ? -1 : 1 }.should == true
+  end
+end

data/spec/rubyspec/core/array/minus_spec.rb

@@ -13,7 +13,7 @@ describe "Array#-" do
   end
 
   ruby_bug "#", "1.8.6.277" do
-    pending "properly handles recursive arrays" do
+    it "properly handles recursive arrays" do
       empty = ArraySpecs.empty_recursive_array
       (empty - empty).should == []
 
@@ -24,14 +24,16 @@ describe "Array#-" do
     end
   end
 
-  pending "tries to convert the passed arguments to Arrays using #to_ary" do
+  it "tries to convert the passed arguments to Arrays using #to_ary" do
     obj = mock('[2,3,3,4]')
-    obj.should_receive(:to_ary).and_return([2, 3, 3, 4])
+    def obj.to_ary; [2,3,3,4] ; end
     ([1, 1, 2, 2, 3, 4] - obj).should == [1, 1]
   end
 
-  pending "raises a TypeError if the argument cannot be coerced to an Array by calling #to_ary" do
-    obj = mock('not an array')
+  it "raises a TypeError if the argument cannot be coerced to an Array by calling #to_ary" do
+    obj = 'not an array'
+    lambda { [1, 2, 3] - obj }.should raise_error(TypeError)
+    obj = mock("123")
     lambda { [1, 2, 3] - obj }.should raise_error(TypeError)
   end