1 files changed, 98 insertions, 0 deletions
diff --git a/js/src/tests/ecma/FunctionObjects/15.3.2.1-1.js b/js/src/tests/ecma/FunctionObjects/15.3.2.1-1.js
new file mode 100644
index 000000000..2f3334fd8
--- /dev/null
+++ b/js/src/tests/ecma/FunctionObjects/15.3.2.1-1.js
@@ -0,0 +1,98 @@
+/* -*- tab-width: 2; indent-tabs-mode: nil; js-indent-level: 2 -*- */
+/* This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
+
+
+/**
+   File Name:          15.3.2.1.js
+   ECMA Section:       15.3.2.1 The Function Constructor
+   new Function(p1, p2, ..., pn, body )
+
+   Description:        The last argument specifies the body (executable code)
+   of a function; any preceding arguments sepcify formal
+   parameters.
+
+   See the text for description of this section.
+
+   This test examples from the specification.
+
+   Author:             christine@netscape.com
+   Date:               28 october 1997
+
+*/
+var SECTION = "15.3.2.1";
+var VERSION = "ECMA_1";
+startTest();
+var TITLE   = "The Function Constructor";
+
+writeHeaderToLog( SECTION + " "+ TITLE);
+
+var MyObject = new Function( "value", "this.value = value; this.valueOf = new Function( 'return this.value' ); this.toString = new Function( 'return String(this.value);' )" );
+
+var myfunc = new Function();
+
+//    not going to test toString here since it is implementation dependent.
+//    new TestCase( SECTION,  "myfunc.toString()",     "function anonymous() { }",    myfunc.toString() );
+
+myfunc.toString = Object.prototype.toString;
+
+new TestCase( SECTION,  "myfunc = new Function(); myfunc.toString = Object.prototype.toString; myfunc.toString()",
+	      "[object Function]",
+	      myfunc.toString() );
+
+new TestCase( SECTION, 
+	      "myfunc.length",                           
+	      0,                     
+	      myfunc.length );
+
+new TestCase( SECTION,
+	      "myfunc.prototype.toString()",
+	      "[object Object]", 
+	      myfunc.prototype.toString() );
+
+new TestCase( SECTION,
+	      "myfunc.prototype.constructor",   
+	      myfunc,   
+	      myfunc.prototype.constructor );
+
+new TestCase( SECTION,
+	      "myfunc.arguments",  
+	      null,  
+	      myfunc.arguments );
+
+new TestCase( SECTION,
+	      "var OBJ = new MyObject(true); OBJ.valueOf()",
+	      true, 
+	      eval("var OBJ = new MyObject(true); OBJ.valueOf()") );
+
+new TestCase( SECTION,
+	      "OBJ.toString()",  
+	      "true", 
+	      OBJ.toString() );
+
+new TestCase( SECTION,
+	      "OBJ.toString = Object.prototype.toString; OBJ.toString()", "[object Object]",
+	      eval("OBJ.toString = Object.prototype.toString; OBJ.toString()") );
+
+new TestCase( SECTION, 
+	      "MyObject.toString = Object.prototype.toString; MyObject.toString()",
+	      "[object Function]", 
+	      eval("MyObject.toString = Object.prototype.toString; MyObject.toString()") );
+
+new TestCase( SECTION,
+	      "MyObject.length", 
+	      1,
+	      MyObject.length );
+
+new TestCase( SECTION,
+	      "MyObject.prototype.constructor",
+              MyObject,
+	      MyObject.prototype.constructor );
+
+new TestCase( SECTION,
+	      "MyObject.arguments",  
+	      null, 
+	      MyObject.arguments );
+
+test();