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: nesting-1.js 24 Reference: http://scopus.mcom.com/bugsplat/show_bug.cgi?id=122040 25 Description: Regression test for a nested function 26 27 Author: christine (at) netscape.com 28 Date: 15 June 1998 29 */ 30 31 var SECTION = "function/nesting-1.js"; 32 var VERSION = "JS_12"; 33 startTest(); 34 var TITLE = "Regression test for 122040"; 35 36 writeHeaderToLog( SECTION + " "+ TITLE); 37 38 var testcases = new Array(); 39 40 function f(a) {function g(b) {return a+b;}; return g;}; f(7) 41 42 testcases[tc++] = new TestCase( SECTION, 43 'function f(a) {function g(b) {return a+b;}; return g;}; typeof f(7)', 44 "function", 45 typeof f(7) ); 46 47 test(); 48 49 function test() { 50 for ( tc=0; tc < testcases.length; tc++ ) { 51 testcases[tc].passed = writeTestCaseResult( 52 testcases[tc].expect, 53 testcases[tc].actual, 54 testcases[tc].description +" = "+ 55 testcases[tc].actual ); 56 57 testcases[tc].reason += ( testcases[tc].passed ) ? "" : "wrong value "; 58 } 59 stopTest(); 60 return ( testcases ); 61 } 62