tenderlove-rkelly 0.0.0.20080909095845

data/test/global_object/test_15_1_1_2.rb

@@ -0,0 +1,17 @@
+require File.dirname(__FILE__) + "/../helper"
+
+# ECMA-262
+# Section 15.1.1.2
+class GlobalObject_15_1_1_2_Test < ECMAScriptTestCase
+  def test_global_nan
+    js_assert_equal('Number.POSITIVE_INFINITY', 'Infinity')
+  end
+
+  def test_this_nan
+    js_assert_equal('Number.POSITIVE_INFINITY', 'this.Infinity')
+  end
+
+  def test_typeof_nan
+    js_assert_equal("'number'", 'typeof Infinity')
+  end
+end

data/test/global_object/test_15_1_1_3.rb

@@ -0,0 +1,9 @@
+require File.dirname(__FILE__) + "/../helper"
+
+# ECMA-262
+# Section 15.1.1.3
+class GlobalObject_15_1_1_3_Test < ECMAScriptTestCase
+  def test_undefined
+    js_assert_equal('void 0', 'undefined')
+  end
+end

data/test/helper.rb

@@ -0,0 +1,5 @@
+require 'test/unit'
+require 'rkelly'
+require 'test/node_test_case'
+require 'test/execute_test_case'
+require 'test/ecma_script_test_case'

data/test/node_test_case.rb

@@ -0,0 +1,11 @@
+require File.dirname(__FILE__) + "/helper"
+
+class NodeTestCase < Test::Unit::TestCase
+  include RKelly::Nodes
+
+  undef :default_test
+
+  def assert_sexp(expected, actual)
+    assert_equal(expected, actual.to_sexp)
+  end
+end

data/test/object/test_15_2_1_1.rb

@@ -0,0 +1,257 @@
+require File.dirname(__FILE__) + "/../helper"
+
+class Object_15_2_1_1_Test < ECMAScriptTestCase
+  def test_null_value_of
+    @runtime.execute("
+                     var NULL_OBJECT = Object(null);
+                     assert_equal(NULL_OBJECT, (NULL_OBJECT).valueOf());
+                     ")
+  end
+
+  def test_null_type_of
+    js_assert_equal("'object'", 'typeof (Object(null))')
+  end
+
+  def test_undefined_value_of
+    @runtime.execute("
+                     var UNDEF_OBJECT = Object(void 0);
+                     assert_equal(UNDEF_OBJECT, (UNDEF_OBJECT).valueOf());
+                     ")
+  end
+
+  def test_undefined_type_of
+    js_assert_equal("'object'", 'typeof (Object(void 0))')
+  end
+
+  def test_true_type_of
+    js_assert_equal("'object'", 'typeof (Object(true))')
+  end
+
+  def test_true_value_of
+    js_assert_equal("true", 'Object(true).valueOf()')
+  end
+
+  def test_true_to_string
+    @runtime.execute("
+                     var MYOB = Object(true);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Boolean]', MYOB.toString());
+                     ")
+  end
+
+  def test_false_value_of
+    js_assert_equal("false", 'Object(false).valueOf()')
+  end
+
+  def test_false_type_of
+    js_assert_equal("'object'", 'typeof (Object(false))')
+  end
+
+  def test_false_to_string
+    @runtime.execute("
+                     var MYOB = Object(false);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Boolean]', MYOB.toString());
+                     ")
+  end
+
+  def test_0_value_of
+    js_assert_equal("0", 'Object(0).valueOf()')
+  end
+
+  def test_0_type_of
+    js_assert_equal("'object'", 'typeof Object(0)')
+  end
+
+  def test_0_to_string
+    @runtime.execute("
+                     var MYOB = Object(0);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  # Diverts from the ECMA.  In ECMA, -0 is -0, not 0
+  def test_minus_0_value_of
+    js_assert_equal("0", 'Object(-0).valueOf()')
+  end
+
+  def test_minus_0_type_of
+    js_assert_equal("'object'", 'typeof Object(-0)')
+  end
+
+  def test_minus_0_to_string
+    @runtime.execute("
+                     var MYOB = Object(-0);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+  ## END Diversion. ;-)
+
+  def test_1_value_of
+    js_assert_equal("1", 'Object(1).valueOf()')
+  end
+
+  def test_1_type_of
+    js_assert_equal("'object'", 'typeof Object(1)')
+  end
+
+  def test_1_to_string
+    @runtime.execute("
+                     var MYOB = Object(1);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_minus_1_value_of
+    js_assert_equal("-1", 'Object(-1).valueOf()')
+  end
+
+  def test_minus_1_type_of
+    js_assert_equal("'object'", 'typeof Object(-1)')
+  end
+
+  def test_minus_1_to_string
+    @runtime.execute("
+                     var MYOB = Object(-1);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_number_max_value_of
+    js_assert_equal("1.797693134862315e308", 'Object(Number.MAX_VALUE).valueOf()')
+  end
+
+  def test_number_max_type_of
+    js_assert_equal("'object'", 'typeof Object(Number.MAX_VALUE)')
+  end
+
+  def test_number_max_to_string
+    @runtime.execute("
+                     var MYOB = Object(Number.MAX_VALUE);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_number_min_value_of
+    js_assert_equal("1.0e-306", 'Object(Number.MIN_VALUE).valueOf()')
+  end
+
+  def test_number_min_type_of
+    js_assert_equal("'object'", 'typeof Object(Number.MIN_VALUE)')
+  end
+
+  def test_number_min_to_string
+    @runtime.execute("
+                     var MYOB = Object(Number.MIN_VALUE);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_number_positive_infinity_value
+    js_assert_equal(
+      "Number.POSITIVE_INFINITY",
+      'Object(Number.POSITIVE_INFINITY).valueOf()'
+    )
+  end
+
+  def test_number_positive_infinity_type
+    js_assert_equal("'object'", 'typeof Object(Number.POSITIVE_INFINITY)')
+  end
+
+  def test_number_positive_infinity_string
+    @runtime.execute("
+                     var MYOB = Object(Number.POSITIVE_INFINITY);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_number_negative_infinity_value
+    js_assert_equal(
+      "Number.NEGATIVE_INFINITY",
+      'Object(Number.NEGATIVE_INFINITY).valueOf()'
+    )
+  end
+
+  def test_number_negative_infinity_type
+    js_assert_equal("'object'", 'typeof Object(Number.NEGATIVE_INFINITY)')
+  end
+
+  def test_number_negative_infinity_string
+    @runtime.execute("
+                     var MYOB = Object(Number.NEGATIVE_INFINITY);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_nan_value
+    js_assert_equal("Number.NaN", 'Object(Number.NaN).valueOf()')
+  end
+
+  def test_number_nan_type
+    js_assert_equal("'object'", 'typeof Object(Number.NaN)')
+  end
+
+  def test_number_nan_string
+    @runtime.execute("
+                     var MYOB = Object(Number.NaN);
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object Number]', MYOB.toString());
+                     ")
+  end
+
+  def test_empty_string_value
+    js_assert_equal("''", 'Object("").valueOf()')
+  end
+
+  def test_empty_string_type
+    js_assert_equal("'object'", 'typeof Object("")')
+  end
+
+  def test_empty_string_to_string
+    @runtime.execute("
+                     var MYOB = Object('');
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object String]', MYOB.toString());
+                     ")
+  end
+
+  def test_string_value
+    js_assert_equal("'a string'", 'Object("a string").valueOf()')
+  end
+
+  def test_string_type
+    js_assert_equal("'object'", 'typeof Object("a string")')
+  end
+
+  def test_string_to_string
+    @runtime.execute("
+                     var MYOB = Object('a string');
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object String]', MYOB.toString());
+                     ")
+  end
+
+  def test_escape_string_value
+    js_assert_equal("'\r\t\b\n\v\f'", "Object('\r\t\b\n\v\f').valueOf()")
+  end
+
+  def test_escape_string_type
+    js_assert_equal("'object'", "typeof Object('\r\t\b\n\v\f')")
+  end
+
+  def test_escape_string_to_string
+    @runtime.execute("
+                     var MYOB = Object('\r\t\b\n\v\f');
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object String]', MYOB.toString());
+                     ")
+  end
+end

data/test/object/test_15_2_1_2.rb

@@ -0,0 +1,21 @@
+require File.dirname(__FILE__) + "/../helper"
+
+class Object_15_2_1_2_Test < ECMAScriptTestCase
+  def test_object_value_of
+    @runtime.execute("
+                     var MYOB = Object();
+                     assert_equal(MYOB, MYOB.valueOf());
+                     ")
+  end
+
+  def test_object_type_of
+    js_assert_equal("'object'", 'typeof Object()')
+  end
+
+  def test_object_to_string
+    @runtime.execute("
+                     var MYOB = Object();
+                     assert_equal('[object Object]', MYOB.toString());
+                     ")
+  end
+end

data/test/object/test_15_2_2_1.rb

@@ -0,0 +1,52 @@
+require File.dirname(__FILE__) + "/../helper"
+
+class Object_15_2_2_1_Test < ECMAScriptTestCase
+  def test_null_typeof
+    js_assert_equal("'object'", "typeof new Object(null)")
+  end
+
+  def test_null_to_string
+    js_assert_to_string('Object', 'null')
+  end
+
+  def test_void_0_typeof
+    js_assert_equal("'object'", "typeof new Object(void 0)")
+  end
+
+  def test_void_0_to_string
+    js_assert_to_string('Object', 'void 0')
+  end
+
+  @@tests = {
+    'minus_1'       => ['-1', 'Number'],
+    '1'             => ['1', 'Number'],
+    'minus_0'       => ['-0', 'Number'],
+    '0'             => ['0', 'Number'],
+    'nan'           => ['Number.NaN', 'Number'],
+    'empty_string'  => ['""', 'String'],
+    'string'        => ['"string"', 'String'],
+    'true'          => ['true', 'Boolean'],
+    'false'         => ['false', 'Boolean'],
+    'boolean'       => ['Boolean()', 'Boolean'],
+  }
+
+  @@tests.each do |name, info|
+    define_method(:"test_#{name}_typeof") do
+      js_assert_equal("'object'", "typeof new Object(#{info[0]})")
+    end
+    define_method(:"test_#{name}_valueof") do
+      js_assert_equal(info[0], "(new Object(#{info[0]})).valueOf()")
+    end
+    define_method(:"test_#{name}_tostring") do
+      js_assert_to_string(info[1], info[0])
+    end
+  end
+
+  def js_assert_to_string(expected_type, js_obj)
+    @runtime.execute("
+                     MYOB = new Object(#{js_obj});
+                     MYOB.toString = Object.prototype.toString;
+                     assert_equal('[object #{expected_type}]', MYOB.toString());
+                     ")
+  end
+end

data/test/statements/test_12_5-1.rb

@@ -0,0 +1,27 @@
+require File.dirname(__FILE__) + "/../helper"
+
+class Statement_12_5_1_Test < ExecuteTestCase
+  def setup
+    @runtime = RKelly::Runtime.new
+  end
+
+  def test_if_true
+    assert_execute({ 'x' => 'pass' },
+      "var x; if(true) x = 'pass'; else x = 'fail';")
+  end
+
+  def test_if_false
+    assert_execute({ 'x' => 'pass' },
+      "var x; if(false) x = 'fail'; else x = 'pass';")
+  end
+
+  def test_if_zero
+    assert_execute({ 'x' => 'pass' },
+      "var x; if(0) x = 'fail'; else x = 'pass';")
+  end
+
+  def test_if_one
+    assert_execute({ 'x' => 'pass' },
+      "var x; if(1) x = 'pass'; else x = 'fail';")
+  end
+end

data/test/test_add_node.rb

@@ -0,0 +1,8 @@
+require File.dirname(__FILE__) + "/helper"
+
+class AddNodeTest < NodeTestCase
+  def test_to_sexp
+    node = AddNode.new(NumberNode.new(5), NumberNode.new(10))
+    assert_sexp([:add, [:lit, 5], [:lit, 10]], node)
+  end
+end

data/test/test_arguments_node.rb

@@ -0,0 +1,8 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ArgumentsNodeTest < NodeTestCase
+  def test_to_sexp
+    node = ArgumentsNode.new([])
+    assert_sexp([:args, []], node)
+  end
+end

data/test/test_array_node.rb

@@ -0,0 +1,9 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ArrayNodeTest < NodeTestCase
+  def test_to_sexp
+    element = ElementNode.new(NumberNode.new(10))
+    node = ArrayNode.new([element])
+    assert_sexp([:array, [[:element, [:lit, 10]]]], node)
+  end
+end

data/test/test_assign_expr_node.rb

@@ -0,0 +1,8 @@
+require File.dirname(__FILE__) + "/helper"
+
+class AssignExprNodeTest < NodeTestCase
+  def test_to_sexp
+    node = AssignExprNode.new(NumberNode.new(10))
+    assert_sexp [:assign, [:lit, 10]], node
+  end
+end