1/* The contents of this file are subject to the Netscape Public 2 * License Version 1.1 (the "License"); you may not use this file 3 * except in compliance with the License. You may obtain a copy of 4 * the License at http://www.mozilla.org/NPL/ 5 * 6 * Software distributed under the License is distributed on an "AS 7 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or 8 * implied. See the License for the specific language governing 9 * rights and limitations under the License. 10 * 11 * The Original Code is Mozilla Communicator client code, released March 12 * 31, 1998. 13 * 14 * The Initial Developer of the Original Code is Netscape Communications 15 * Corporation. Portions created by Netscape are 16 * Copyright (C) 1998 Netscape Communications Corporation. All 17 * Rights Reserved. 18 * 19 * Contributor(s): 20 * 21 */ 22/** 23 File Name: 15.3.2.1-3.js 24 ECMA Section: 15.3.2.1 The Function Constructor 25 new Function(p1, p2, ..., pn, body ) 26 27 Description: The last argument specifies the body (executable code) 28 of a function; any preceeding arguments sepcify formal 29 parameters. 30 31 See the text for description of this section. 32 33 This test examples from the specification. 34 35 Author: christine@netscape.com 36 Date: 28 october 1997 37 38*/ 39 var SECTION = "15.3.2.1-3"; 40 var VERSION = "ECMA_1"; 41 startTest(); 42 var TITLE = "The Function Constructor"; 43 44 writeHeaderToLog( SECTION + " "+ TITLE); 45 46 var testcases = getTestCases(); 47 test(); 48 49function getTestCases() { 50 var array = new Array(); 51 var item = 0; 52 53 var args = ""; 54 55 for ( var i = 0; i < 2000; i++ ) { 56 args += "arg"+i; 57 if ( i != 1999 ) { 58 args += ","; 59 } 60 } 61 62 var s = ""; 63 64 for ( var i = 0; i < 2000; i++ ) { 65 s += ".0005"; 66 if ( i != 1999 ) { 67 s += ","; 68 } 69 } 70 71 MyFunc = new Function( args, "var r=0; for (var i = 0; i < MyFunc.length; i++ ) { if ( eval('arg'+i) == void 0) break; else r += eval('arg'+i); }; return r"); 72 MyObject = new Function( args, "for (var i = 0; i < MyFunc.length; i++ ) { if ( eval('arg'+i) == void 0) break; eval('this.arg'+i +'=arg'+i); };"); 73 74 array[item++] = new TestCase( SECTION, "MyFunc.length", 2000, MyFunc.length ); 75 array[item++] = new TestCase( SECTION, "var MY_OB = eval('MyFunc(s)')", 1, eval("var MY_OB = MyFunc("+s+"); MY_OB") ); 76 77 array[item++] = new TestCase( SECTION, "MyObject.length", 2000, MyObject.length ); 78 79 array[item++] = new TestCase( SECTION, "FUN1 = new Function( 'a','b','c', 'return FUN1.length' ); FUN1.length", 3, eval("FUN1 = new Function( 'a','b','c', 'return FUN1.length' ); FUN1.length") ); 80 array[item++] = new TestCase( SECTION, "FUN1 = new Function( 'a','b','c', 'return FUN1.length' ); FUN1()", 3, eval("FUN1 = new Function( 'a','b','c', 'return FUN1.length' ); FUN1()") ); 81 array[item++] = new TestCase( SECTION, "FUN1 = new Function( 'a','b','c', 'return FUN1.length' ); FUN1(1,2,3,4,5)", 3, eval("FUN1 = new Function( 'a','b','c', 'return FUN1.length' ); FUN1(1,2,3,4,5)") ); 82 83 return ( array ); 84} 85function test() { 86 for ( tc=0; tc < testcases.length; tc++ ) { 87 testcases[tc].passed = writeTestCaseResult( 88 testcases[tc].expect, 89 testcases[tc].actual, 90 testcases[tc].description +" = "+ testcases[tc].actual ); 91 92 testcases[tc].reason += ( testcases[tc].passed ) ? "" : "wrong value "; 93 } 94 stopTest(); 95 return ( testcases ); 96} 97