mirror of
https://github.com/SSCLI/sscli_20021101
synced 2026-06-08 12:28:57 +00:00
yallie
696 lines
16 KiB
JavaScript
696 lines
16 KiB
JavaScript
//# ==++==
|
|
//#
|
|
//#
|
|
//# Copyright (c) 2002 Microsoft Corporation. All rights reserved.
|
|
//#
|
|
//# The use and distribution terms for this software are contained in the file
|
|
//# named license.txt, which can be found in the root of this distribution.
|
|
//# By using this software in any fashion, you are agreeing to be bound by the
|
|
//# terms of this license.
|
|
//#
|
|
//# You must not remove this notice, or any other, from this software.
|
|
//#
|
|
//#
|
|
//# ==--==
|
|
//####################################################################################
|
|
@cc_on
|
|
|
|
|
|
import System;
|
|
|
|
var NULL_DISPATCH = null;
|
|
var apGlobalObj;
|
|
var apPlatform;
|
|
var lFailCount;
|
|
|
|
|
|
var iTestID = 52257;
|
|
|
|
|
|
|
|
@if(!@aspx)
|
|
function obFoo() {};
|
|
@else
|
|
expando function obFoo() {};
|
|
@end
|
|
|
|
function do019() {
|
|
|
|
apInitTest("do019 ");
|
|
|
|
var n = 0;
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("1. built-in, non-exec");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (Math && false);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "non-executable object references--Math failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("2. built-in, exec, not instanciated");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(Array + ""));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Array failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!Boolean + 0);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Boolean failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!!Date * false);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Date failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("" + Number));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Number failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (0 / !!Object);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Object failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("3. built-in, exec, instanciated");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(new Array() + ""));
|
|
n++;
|
|
|
|
if (n != 0) apLogFailInfo( "executable object references--Array failed ", 0, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(new Boolean()) + 0);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Boolean failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!!(new Date()) * false);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Date failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("" + new Number()));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Number failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (0 / !!(new Object()));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--Object failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("4. user-defined, not instanciated");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!!obFoo ^ 1);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--user-defined failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("5. user-defined, instanciated");
|
|
|
|
n = 1;
|
|
var x = new obFoo();
|
|
do {
|
|
if (--n) break;
|
|
} while (!x << 4);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--instantiated user-defined failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(new obFoo()) << 4);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "executable object references--instantiated user-defined failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("6. number, decimal, integer");
|
|
|
|
// >0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1 - 0));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1234567890 - 123456789));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos < n < max pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(2147400000 + 83647));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max pos failed ", 1, n, "");
|
|
|
|
// <0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0 - 1));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(123456789 - 1234567890));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg < n < max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(-2147400000 - 83647));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg failed ", 1, n, "");
|
|
|
|
// 0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (1 - 1);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "zero failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (-0 + 0);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "-zero failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("7. number, decimal, float");
|
|
|
|
// >0.0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0+2.225073858507202e-308));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1.2345678e90 / 9.98));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos < n < max pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1.0e308 + 7.97693134862315807e307));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1.797693134862315807e308 + 1.0e308));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "> max pos (1.#INF) failed ", 1, n, "");
|
|
|
|
// <0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0-2.225073858507202e-308));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(-1.2345678e90 * 2));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg < n < max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1.797693134862315807e308 * -1));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1.797693134862315807e309 - 1.999e307));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "< min neg (-1.#INF) failed ", 1, n, "");
|
|
|
|
// 0.0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (1.9 - 1.9);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "zero failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (0.0 * -1.0);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "-zero failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("8. number, hexidecimal");
|
|
|
|
// >0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0x1 - 0x0));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0x9ABCDEF - 0x2468ACE));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos < n < max pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0xFFFF0000 + 0xFFFF));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max pos failed ", 1, n, "");
|
|
|
|
// <0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!0x0 - 0x1);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(0x2468ACE - 0x9ABCDEF));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg < n < max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(-0xFFFF0000 - 0xFFFF));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg failed ", 1, n, "");
|
|
|
|
// 0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (0x1 - 0x1);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "zero failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (-0x0 + 0x0);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "-zero failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("9. number, octal");
|
|
|
|
// >0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(01 - 00));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(07654321 - 01234567));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min pos < n < max pos failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(037777700000 + 077777));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max pos failed ", 1, n, "");
|
|
|
|
// <0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(00 - 01));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(01234567 - 07654321));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg < n < max neg failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(-037777700000 - 077777));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "min neg failed ", 1, n, "");
|
|
|
|
// 0
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (01 - 01);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "zero failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (-00 + 00);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "-zero failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("10. string");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("" + " "));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "single space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(" " + " "));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "multiple spaces failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("" + false));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as false failed ", 1, n, "");
|
|
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("" + 0));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "ns 0 failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("" + 1234567890));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "ns >0 failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(" " + 1234567890));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "ns >0, leading space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(1234567890 + " "));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "ns >0, trailing space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(-1234567890+ ""));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "ns <0 failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("f" + "oo"));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as single word failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(" f" + "oo"));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as single word, leading space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("fo" + "o "));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as single word, trailing space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("foo " + "bar"));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as multiple word failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(" foo" + " bar"));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as multiple word, leading space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!("foo" + " bar "));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "as multiple word, trailing space failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while ("" + "");
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "zls failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("11. constants");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (true * false);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "constants--true failed ", 1, n, "");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(false + ""));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "constants--1 failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("12. null");
|
|
|
|
n = 1;
|
|
do {
|
|
if (--n) break;
|
|
} while (null || false);
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "object references--null failed ", 1, n, "");
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
apInitScenario("13. undefined");
|
|
|
|
n = 1;
|
|
var obUndef;
|
|
do {
|
|
if (--n) break;
|
|
} while (!(obUndef + ""));
|
|
n++;
|
|
|
|
if (n != 1) apLogFailInfo( "undefined failed ", 1, n, "");
|
|
|
|
|
|
apEndTest();
|
|
|
|
}
|
|
|
|
|
|
do019();
|
|
|
|
|
|
if(lFailCount >= 0) System.Environment.ExitCode = lFailCount;
|
|
else System.Environment.ExitCode = 1;
|
|
|
|
function apInitTest(stTestName) {
|
|
lFailCount = 0;
|
|
|
|
apGlobalObj = new Object();
|
|
apGlobalObj.apGetPlatform = function Funca() { return "Rotor" }
|
|
apGlobalObj.LangHost = function Funcb() { return 1033;}
|
|
apGlobalObj.apGetLangExt = function Funcc(num) { return "EN"; }
|
|
|
|
apPlatform = apGlobalObj.apGetPlatform();
|
|
var sVer = "1.0"; //navigator.appVersion.toUpperCase().charAt(navigator.appVersion.toUpperCase().indexOf("MSIE")+5);
|
|
apGlobalObj.apGetHost = function Funcp() { return "Rotor " + sVer; }
|
|
print ("apInitTest: " + stTestName);
|
|
}
|
|
|
|
function apInitScenario(stScenarioName) {print( "\tapInitScenario: " + stScenarioName);}
|
|
|
|
function apLogFailInfo(stMessage, stExpected, stActual, stBugNum) {
|
|
lFailCount = lFailCount + 1;
|
|
print ("***** FAILED:");
|
|
print ("\t\t" + stMessage);
|
|
print ("\t\tExpected: " + stExpected);
|
|
print ("\t\tActual: " + stActual);
|
|
}
|
|
|
|
function apGetLocale(){ return 1033; }
|
|
function apWriteDebug(s) { print("dbg ---> " + s) }
|
|
function apEndTest() {}
|