admin/SSCLI-sscli_20021101
1
0
Fork 0
mirror of https://github.com/SSCLI/sscli_20021101 synced 2026-06-08 12:28:57 +00:00
Code Issues Packages Projects Releases Wiki Activity
Files
master
SSCLI-sscli_20021101/tests/jscript/ctrlflow/if107.js
T
yallie 9fa3874800 Added the contents of the archive. 
Moved the original file to the archive subfolder.
2017-11-20 16:11:42 +03:00

1082 lines
20 KiB
JavaScript
Raw Permalink Blame History

//# ==++==
//#
//#
//# 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 = 52849;
@if(!@aspx)
function obFoo() {};
@else
expando function obFoo() {};
@end
function if107() {
apInitTest("if107 ");
var tmp, n, bOb;
//----------------------------------------------------------------------------
apInitScenario("1. built-in, non-exec");
n = 0;
tmp = Math;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "non-executable object references--Math failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("2. built-in, exec, not instanciated");
n = 0;
tmp = Array;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Array failed ", 2*bOb, n,"");
n = 0;
tmp = Boolean;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Boolean failed ", 2*bOb, n,"");
n = 0;
tmp = Date;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Date failed ", 2*bOb, n,"");
n = 0;
tmp = Number;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Number failed ", 2*bOb, n,"");
n = 0;
tmp = Object;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Object failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("3. built-in, exec, instanciated");
n = 0;
tmp = new Array();
bOb = -1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Array failed ", 2*bOb, n,"");
n = 0;
tmp = new Boolean();
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Boolean failed ", 2*bOb, n,"");
n = 0;
tmp = new Date();
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Date failed ", 2*bOb, n,"");
n = 0;
tmp = new Number();
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Number failed ", 2*bOb, n,"");
n = 0;
tmp = new Object();
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--Object failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("4. user-defined, not instanciated");
n = 0;
tmp = obFoo;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--user-defined failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("5. user-defined, instanciated");
n = 0;
tmp = new obFoo();
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "executable object references--var instantiated user-defined ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("6. number, decimal, integer");
// >0
n = 0;
tmp = 1;
bOb = 1;
if (tmp - 0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos failed ", 2*bOb, n,"");
n = 0;
tmp = 1234567890;
bOb = 1;
if (tmp - 123456789) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos < n < max pos failed ", 2*bOb, n,"");
n = 0;
tmp = 2147400000;
bOb = 1;
if (tmp + 83647) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max pos failed ", 2*bOb, n,"");
// <0
n = 0;
tmp = 0;
bOb = 1;
if (tmp - 1) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max neg failed ", 2*bOb, n,"");
n = 0;
tmp = 123456789;
bOb = 1;
if (tmp - 1234567890) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg < n < max neg failed ", 2*bOb, n,"");
n = 0;
tmp = -2147400000;
bOb = 1;
if (tmp - 83647) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg failed ", 2*bOb, n,"");
// 0
n = 0;
tmp = 1;
bOb = -1;
if (tmp - 1) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "zero failed ", 2*bOb, n,"");
n = 0;
tmp = -0;
bOb = -1;
if (tmp + 0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "-zero failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("7. number, decimal, float");
// >0.0
n = 0;
tmp = 2.225073858507202e-308;
bOb = 1;
if (tmp + 0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos failed ", 2*bOb, n,"");
n = 0;
tmp = 1.2345678e90;
bOb = 1;
if (tmp / 9.98) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos < n < max pos failed ", 2*bOb, n,"");
n = 0;
tmp = 1.0e308;
bOb = 1;
if (tmp + 7.97693134862315807e307) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max pos failed ", 2*bOb, n,"");
n = 0;
tmp = 1.797693134862315807e308;
bOb = 1;
if (tmp + 1.0e308) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "> max pos (1.#INF) failed ", 2*bOb, n,"");
// <0
n = 0;
tmp = 0;
bOb = 1;
if (tmp + -2.225073858507202e-308) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max neg failed ", 2*bOb, n,"");
n = 0;
tmp = -1.2345678e90;
bOb = 1;
if (tmp * 2) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg < n < max neg failed ", 2*bOb, n,"");
n = 0;
tmp = 1.797693134862315807e308;
bOb = 1;
if (tmp * -1) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg failed ", 2*bOb, n,"");
n = 0;
tmp = 1.797693134862315807e309;
bOb = 1;
if (tmp - 1.999e307) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "< min neg (-1.#INF) failed ", 2*bOb, n,"");
// 0.0
n = 0;
tmp = 1.9;
bOb = -1;
if (tmp - 1.9) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "zero failed ", 2*bOb, n,"");
n = 0;
tmp = 0.0;
bOb = -1;
if (tmp * -1.0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "-zero failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("8. number, hexidecimal");
// >0
n = 0;
tmp = 0x1;
bOb = 1;
if (tmp - 0x0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos failed ", 2*bOb, n,"");
n = 0;
tmp = 0x9ABCDEF;
bOb = 1;
if (tmp - 0x2468ACE) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos < n < max pos failed ", 2*bOb, n,"");
n = 0;
tmp = 0xFFFF0000;
bOb = 1;
if (tmp + 0xFFFF) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max pos failed ", 2*bOb, n,"");
// <0
n = 0;
tmp = 0x0;
bOb = 1;
if (tmp - 0x1) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max neg failed ", 2*bOb, n,"");
n = 0;
tmp = 0x2468ACE;
bOb = 1;
if (tmp - 0x9ABCDEF) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg < n < max neg failed ", 2*bOb, n,"");
n = 0;
tmp = -0xFFFF0000;
bOb = 1;
if (tmp - 0xFFFF) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg failed ", 2*bOb, n,"");
// 0
n = 0;
tmp = 0x1;
bOb = -1;
if (tmp - 0x1) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "zero failed ", 2*bOb, n,"");
n = 0;
tmp = -0x0;
bOb = -1;
if (tmp + 0x0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "-zero failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("9. number, octal");
// >0
n = 0;
tmp = 01;
bOb = 1;
if (tmp - 00) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos failed ", 2*bOb, n,"");
n = 0;
tmp = 07654321;
bOb = 1;
if (tmp - 01234567) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min pos < n < max pos failed ", 2*bOb, n,"");
n = 0;
tmp = 037777700000;
bOb = 1;
if (tmp + 077777) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max pos failed ", 2*bOb, n,"");
// <0
n = 0;
tmp = 00;
bOb = 1;
if (tmp - 01) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "max neg failed ", 2*bOb, n,"");
n = 0;
tmp = 01234567;
bOb = 1;
if (tmp - 07654321) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg < n < max neg failed ", 2*bOb, n,"");
n = 0;
tmp = -037777700000;
bOb = 1;
if (tmp - 077777) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "min neg failed ", 2*bOb, n,"");
// 0
n = 0;
tmp = 01;
bOb = -1;
if (tmp - 01) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "zero failed ", 2*bOb, n,"");
n = 0;
tmp = -00;
bOb = -1;
if (tmp + 00) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "-zero failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("10. string");
n = 0;
tmp = "";
bOb = 1;
if (tmp + " ") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "single space failed ", 2*bOb, n,"");
n = 0;
tmp = " ";
bOb = 1;
if (tmp + " ") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "multiple spaces failed ", 2*bOb, n,"");
n = 0;
tmp = "";
bOb = 1;
if (tmp + false) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as false failed ", 2*bOb, n,"");
n = 0;
tmp = "";
bOb = 1;
if (tmp + 0) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "ns 0 failed ", 2*bOb, n,"");
n = 0;
tmp = "";
bOb = 1;
if (tmp + 1234567890) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "ns >0 failed ", 2*bOb, n,"");
n = 0;
tmp = " ";
bOb = 1;
if (tmp + 1234567890) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "ns >0, leading space failed ", 2*bOb, n,"");
n = 0;
tmp = 1234567890;
bOb = 1;
if (tmp + " ") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "ns >0, trailing space failed ", 2*bOb, n,"");
n = 0;
tmp = -1234567890;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "ns <0 failed ", 2*bOb, n,"");
n = 0;
tmp = "f";
bOb = 1;
if (tmp + "oo") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as single word failed ", 2*bOb, n,"");
n = 0;
tmp = " f";
bOb = 1;
if (tmp + "oo") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as single word, leading space failed ", 2*bOb, n,"");
n = 0;
tmp = "fo";
bOb = 1;
if (tmp + "o ") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as single word, trailing space failed ", 2*bOb, n,"");
n = 0;
tmp = "foo ";
bOb = 1;
if (tmp + "bar") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as multiple word failed ", 2*bOb, n,"");
n = 0;
tmp = " foo";
bOb = 1;
if (tmp + " bar") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as multiple word, leading space failed ", 2*bOb, n,"");
n = 0;
tmp = "foo";
bOb = 1;
if (tmp + " bar ") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "as multiple word, trailing space failed ", 2*bOb, n,"");
n = 0;
tmp = "";
bOb = -1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "undefined failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("11. constants");
n = 0;
tmp = true;
bOb = -1;
if (tmp * false) {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "constants--true failed ", 2*bOb, n,"");
n = 0;
tmp = false;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "constants--false failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("12. null");
n = 0;
tmp = null;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "null failed ", 2*bOb, n,"");
//----------------------------------------------------------------------------
apInitScenario("13. undefined");
var obUndef;
n = 0;
tmp = obUndef;
bOb = 1;
if (tmp + "") {
n++;
n++;
}
else {
n--;
n--;
}
if (n != 2*bOb) apLogFailInfo( "undefined failed ", 2*bOb, n,"");
apEndTest();
}
if107();
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() {}
Reference in New Issue View Git Blame Copy Permalink