Files
yallie 9fa3874800 Added the contents of the archive.
Moved the original file to the archive subfolder.
2017-11-20 16:11:42 +03:00

310 lines
9.9 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 = 65401;
function FuncRetStr() {
return "function returning string";
}
function myObject() { this.toString = myObjStr; }
function myObjStr() { return "my object string"; }
function string14() {
var tmp,res,expected,emptyVar;
apInitTest("string14");
var myStr = new String("Apple Core");
var myDate = new Date();
myDate.setTime(0); // this is Wed Dec 31 16:00:00 PST 1969
myDate.setTime(Date.UTC(70,0,1,0) + myDate.getTimezoneOffset() * 60000 - 28800000);
var numvar = 4321;
var strvar = "Hippopotamus";
var ary = new Array();
ary[2] = "zero";
ary[3] = "albatross";
ary[4] = "what flavor is it?";
var myObj = new myObject();
var crlf = unescape("%0d%0a");
var lf = unescape("%0a"); // LF
@if (@_win16)
var FRScode =lf+"function FuncRetStr() {"+lf+" [native code]"+lf+"}"+lf;
var FRScode2="error";
var FRScode3="error";
@else
//crlf = unescape("%0d%0a");
crlf = Environment.NewLine;
var cr = unescape("%0d");
var FRScode = "function FuncRetStr() {" + crlf + ' return "function returning string";' + crlf + "}";
var FRScode2 = "function FuncRetStr() {" + cr + ' return "function returning string";' + cr + "}";
var FRScode3 = "function FuncRetStr() {" + crlf + 'return "function returning string";' + crlf + "}";
@end
var Mathcode = "[object Math]";
apInitScenario("add string expression to string object");
res = "Dil" + "bert" + myStr;
expected = "DilbertApple Core";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
if( new Date("12/25/2002 12:00:00 PST").getTimezoneOffset()/60 == 8) {
apInitScenario("add string expression to date (coerced to string)");
res = "Dil" + "bert" + ("" + myDate);
expected = "DilbertWed Dec 31 16:00:00 PST 1969";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to date.toString()");
res = "Dil" + "bert" + (myDate.toString());
expected = "DilbertWed Dec 31 16:00:00 PST 1969";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
}
apInitScenario("add string expression to function returning string");
res = "Dil" + "bert" + FuncRetStr();
expected = "Dilbertfunction returning string";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to null");
res = "Dil" + "bert" + null;
expected = "Dilbertnull";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to null string");
res = "Dil" + "bert" + "";
expected = "Dilbert";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to coerced numeric constant");
res = "Dil" + "bert" + ("" + 1234);
expected = "Dilbert1234";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to numeric constant");
res = "Dil" + "bert" + 1234;
expected = "Dilbert1234";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to exp numeric constant");
res = "Dil" + "bert" + 3e300;
expected = "Dilbert3e+300";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to fp numeric constant");
res = "Dil" + "bert" + 1234.56;
expected = "Dilbert1234.56";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to numeric variable");
res = "Dil" + "bert" + numvar;
expected = "Dilbert4321";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to string constant");
res = "Dil" + "bert" + "Bernoulli";
expected = "DilbertBernoulli";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to string expression");
res = "Dil" + "bert" + ("abc" + "def");
expected = "Dilbertabcdef";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to string variable");
res = "Dil" + "bert" + strvar;
expected = "DilbertHippopotamus";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to string array element");
res = "Dil" + "bert" + ary[3];
expected = "Dilbertalbatross";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to empty variable");
res = "Dil" + "bert" + emptyVar;
expected = "Dilbertundefined";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to user-defined object member");
res = "Dil" + "bert" + myObj.toString();
expected = "Dilbertmy object string";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to string.toString");
res = "Dil" + "bert" + "Horse".toString();
expected = "DilbertHorse";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to Math.toString");
res = "Dil" + "bert" + Math.toString();
expected = "Dilbert" + Mathcode;
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apInitScenario("add string expression to eval string");
res = "Dil" + "bert" + eval("\"boingo\"");
expected = "Dilbertboingo";
if (res != expected) {
apLogFailInfo("wrong result",expected,res,"");
}
if (typeof(res) != "string") {
apLogFailInfo("result had wrong type","string",typeof(res),"");
}
apEndTest();
}
string14();
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() {}