js/src/tests/ecma/FunctionObjects/15.3.2.1-3.js

changeset 0
6474c204b198
equal deleted inserted replaced
-1:000000000000 0:e64db0ea442c
1 /* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
2 /* This Source Code Form is subject to the terms of the Mozilla Public
3 * License, v. 2.0. If a copy of the MPL was not distributed with this
4 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
5
6
7 /**
8 File Name: 15.3.2.1-3.js
9 ECMA Section: 15.3.2.1 The Function Constructor
10 new Function(p1, p2, ..., pn, body )
11
12 Description: The last argument specifies the body (executable code)
13 of a function; any preceding arguments sepcify formal
14 parameters.
15
16 See the text for description of this section.
17
18 This test examples from the specification.
19
20 Author: christine@netscape.com
21 Date: 28 october 1997
22
23 */
24 var SECTION = "15.3.2.1-3";
25 var VERSION = "ECMA_1";
26 startTest();
27 var TITLE = "The Function Constructor";
28
29 writeHeaderToLog( SECTION + " "+ TITLE);
30
31 var args = "";
32
33 for ( var i = 0; i < 2000; i++ ) {
34 args += "arg"+i;
35 if ( i != 1999 ) {
36 args += ",";
37 }
38 }
39
40 var s = "";
41
42 for ( var i = 0; i < 2000; i++ ) {
43 s += ".0005";
44 if ( i != 1999 ) {
45 s += ",";
46 }
47 }
48
49 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");
50 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); };");
51
52 new TestCase( SECTION, "MyFunc.length", 2000, MyFunc.length );
53 new TestCase( SECTION, "var MY_OB = eval('MyFunc(s)')", 1, eval("var MY_OB = MyFunc("+s+"); MY_OB") );
54
55 new TestCase( SECTION, "MyObject.length", 2000, MyObject.length );
56
57 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") );
58 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()") );
59 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)") );
60
61 test();

mercurial