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

1110 lines
34 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 = 53286;
var sCat = '';
var regPat = "";
var objExp = "";
var regExp = "";
var strTest = "";
var m_scen = '';
var strTemp = "";
function verify(sCat1, sExp, sAct)
{
//this function makes sure sAct and sExp are equal
if (sExp != sAct)
apLogFailInfo( m_scen+(sCat1.length?"--"+sCat1:"")+" failed", sExp,sAct, "");
}
function verifyStringObj(sCat1, sExp, sAct)
{
//this function simply calls verify with the values of the string
verify(sCat1, sExp.valueOf(), sAct.valueOf());
}
function ArrayEqual(sCat1, arrayExp, arrayAct)
{var i;
//Makes Sure that Arrays are equal
if (arrayAct == null)
verify(sCat1 + ' NULL Err', arrayExp, arrayAct);
else if (arrayExp.length != arrayAct.length)
verify(sCat1 + ' Array length', arrayExp.length, arrayAct.length);
else
{
for (i in arrayExp)
verify(sCat1 + ' index '+i, arrayExp[i], arrayAct[i]);
}
}
function regVerify(sCat1, arrayReg, arrayAct)
{
var i;
var expArray = new Array('','','','','','','','','');
for (i in arrayReg)
if (i < 10)
expArray[i] = arrayReg[i];
else
break;
for(i =0; i<9;i++)
verify(sCat1 + ' RegExp.$'+ (i+1) +' ', expArray[i], eval('RegExp.$'+(i+1)));
}
function rep_019() {
@if(@_fast)
var i, strTest, regExp;
@end
apInitTest("rep_019");
m_scen = ('Test 1 Lowercase /[a-c][a-c][a-c]/');
sCat = "Precise Sets ";
apInitScenario(m_scen);
regPat = /[a-c][a-c][a-c]/;
regExp = new Array();
objExp = 'a';
strTest = 'abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da';
strTest = 'dabc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'dae';
strTest = 'dabce';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ae';
strTest = 'abce';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a';
strTest = ' abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a ';
strTest = 'abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da ';
strTest = 'dabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a ';
strTest = ' abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' da ';
strTest = ' dabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab a';
strTest = 'ab abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab a';
strTest = 'ab abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'm na ';
strTest = 'm nabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab ae ';
strTest = 'ab abce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab a ';
strTest = 'ab abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'abe dae ';
strTest = 'abe dabce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 2 Slightly more complex strings');
objExp = 'a ab c abracadabra';
strTest = 'abc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a ab c abracadabra';
strTest = ' abc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a ab c abracadabra ';
strTest = 'abc ab c abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' da ab c abracadabrab';
strTest = ' dabc ab c abracadabrab';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da ab c abracadabrab c ';
strTest = 'dabc ab c abracadabrab c ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' ea ab c abracadabra';
strTest = ' eabc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'na ab c abracadabrab d ';
strTest = 'nabc ab c abracadabrab d ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 3 Lowercase tests w/ multiples');
objExp = 'a abc';
strTest = 'abc abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a abc';
strTest = ' abc abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a abc ';
strTest = 'abc abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da abce ';
strTest = 'dabc abce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a abc ';
strTest = ' abc abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' ad eabc ';
strTest = ' abcd eabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 4 Slightly more complex strings w/ multiple finds');
objExp = 'a abc abracadabra';
strTest = 'abc abc abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a abc abracadabra';
strTest = ' abc abc abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a abc abracadabra ';
strTest = 'abc abc abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' oranaabo sienabcathedral abracadabrae';
strTest = ' oranabcabo sienabcathedral abracadabrae';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'oranaabo sienabcathedral abracadabrae ';
strTest = 'oranabcabo sienabcathedral abracadabrae ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' dae fabcg eabracadabras';
strTest = ' dabce fabcg eabracadabras';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'tan dabc abracadabra ';
strTest = 'tabcn dabc abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' dan sabc abracadabrad ';
strTest = ' dabcn sabc abracadabrad ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'sa babc rabcadabra';
strTest = 'sabc babc rabcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' sa babc rabracadabra';
strTest = ' sabc babc rabracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a abc abcadabra ';
strTest = 'abc abc abcadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' sar babca abcadabra';
strTest = ' sabcr babca abcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ra vabc abcadabra ';
strTest = 'rabc vabc abcadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' mad aababcab aaabcadabra';
strTest = ' mabcd aababcab aaabcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'fgadg maabcds rzabcxaadabra ';
strTest = 'fgabcdg maabcds rzabcxaadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' mtadg dfabcwo mknoabcadabrablol ';
strTest = ' mtabcdg dfabcwo mknoabcadabrablol ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 5 Lowercase /[a-c][a-z][a-d]/');
sCat = "Less Precise Sets ";
apInitScenario(m_scen);
regPat = /[a-c][a-z][a-d]/;
regExp = new Array();
objExp = 'a';
strTest = 'abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da';
strTest = 'dabc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'dae';
strTest = 'dabce';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ae';
strTest = 'abce';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a';
strTest = ' abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a ';
strTest = 'abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da ';
strTest = 'dabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a ';
strTest = ' abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' da ';
strTest = ' dabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab a';
strTest = 'ab abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab a';
strTest = 'ab abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'm na ';
strTest = 'm nabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab ae ';
strTest = 'ab abce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab a ';
strTest = 'ab abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'abe dae ';
strTest = 'abe dabce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 6 Slightly more complex strings');
objExp = 'a ab c abracadabra';
strTest = 'abc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a ab c abracadabra';
strTest = ' abc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a ab c abracadabra ';
strTest = 'abc ab c abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' da ab c abracadabrab';
strTest = ' dabc ab c abracadabrab';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da ab c abracadabrab c ';
strTest = 'dabc ab c abracadabrab c ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' ea ab c abracadabra';
strTest = ' eabc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'na ab c abracadabrab d ';
strTest = 'nabc ab c abracadabrab d ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 7 Lowercase tests w/ multiples');
objExp = 'a abc';
strTest = 'abc abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a abc';
strTest = ' abc abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a abc ';
strTest = 'abc abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'da abce ';
strTest = 'dabc abce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a abc ';
strTest = ' abc abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' ad eabc ';
strTest = ' abcd eabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 8 Slightly more complex strings w/ multiple finds');
objExp = 'a abc abracadabra';
strTest = 'abc abc abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' a abc abracadabra';
strTest = ' abc abc abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a abc abracadabra ';
strTest = 'abc abc abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' orfnaabo sienabcathedral abracadabrae';
strTest = ' orfnabcabo sienabcathedral abracadabrae';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'orfnaabo sienabcathedral abracadabrae ';
strTest = 'orfnabcabo sienabcathedral abracadabrae ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' dae fabcg eabracadabras';
strTest = ' dabce fabcg eabracadabras';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'tan dabc abracadabra ';
strTest = 'tabcn dabc abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' dan sabc abracadabrad ';
strTest = ' dabcn sabc abracadabrad ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'sa babc rabcadabra';
strTest = 'sabc babc rabcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' sa babc rabracadabra';
strTest = ' sabc babc rabracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'a abc abcadabra ';
strTest = 'abc abc abcadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' sar babca abcadabra';
strTest = ' sabcr babca abcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ra vabc abcadabra ';
strTest = 'rabc vabc abcadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' fad aababcab aaabcadabra';
strTest = ' fabcd aababcab aaabcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'fgadg maabcds rzabcxaadabra ';
strTest = 'fgabcdg maabcds rzabcxaadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' mtadg dfabcwo mknoabcadabrablol ';
strTest = ' mtabcdg dfabcwo mknoabcadabrablol ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 9 Lowercase /[c]/');
sCat = "One Character Sets ";
apInitScenario(m_scen);
regPat = /[c]/;
regExp = new Array();
objExp = 'aba';
strTest = 'abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'daba';
strTest = 'dabc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'dabae';
strTest = 'dabce';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'abae';
strTest = 'abce';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aba';
strTest = ' abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'aba ';
strTest = 'abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'daba ';
strTest = 'dabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aba ';
strTest = ' abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' daba ';
strTest = ' dabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab aba';
strTest = 'ab abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab aba';
strTest = 'ab abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ababa ';
strTest = 'ababc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab abae ';
strTest = 'ab abce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'ab aba ';
strTest = 'ab abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'abe dabae ';
strTest = 'abe dabce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 10 Slightly more complex strings');
objExp = 'aba ab c abracadabra';
strTest = 'abc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aba ab c abracadabra';
strTest = ' abc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'aba ab c abracadabra ';
strTest = 'abc ab c abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' daba ab c abracadabrab';
strTest = ' dabc ab c abracadabrab';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'daba ab c abracadabrab c ';
strTest = 'dabc ab c abracadabrab c ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' eaba ab c abracadabra';
strTest = ' eabc ab c abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'naba ab c abracadabrab d ';
strTest = 'nabc ab c abracadabrab d ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 11 Lowercase tests w/ multiples');
objExp = 'aba abc';
strTest = 'abc abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aba abc';
strTest = ' abc abc';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'aba abc ';
strTest = 'abc abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'daba abce ';
strTest = 'dabc abce ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aba abc ';
strTest = ' abc abc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' abad eabc ';
strTest = ' abcd eabc ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
m_scen = ('Test 12 Slightly more complex strings w/ multiple finds');
objExp = 'aba abc abracadabra';
strTest = 'abc abc abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aba abc abracadabra';
strTest = ' abc abc abracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'aba abc abracadabra ';
strTest = 'abc abc abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' oranabaabo sienabcathedral abracadabrae';
strTest = ' oranabcabo sienabcathedral abracadabrae';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'oranabaabo sienabcathedral abracadabrae ';
strTest = 'oranabcabo sienabcathedral abracadabrae ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' dabae fabcg eabracadabras';
strTest = ' dabce fabcg eabracadabras';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'taban dabc abracadabra ';
strTest = 'tabcn dabc abracadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' daban sabc abracadabrad ';
strTest = ' dabcn sabc abracadabrad ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'saba babc rabcadabra';
strTest = 'sabc babc rabcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' saba babc rabracadabra';
strTest = ' sabc babc rabracadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'aba abc abcadabra ';
strTest = 'abc abc abcadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' sabar babca abcadabra';
strTest = ' sabcr babca abcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'raba vabc abcadabra ';
strTest = 'rabc vabc abcadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' aabad aababcab aaabcadabra';
strTest = ' aabcd aababcab aaabcadabra';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = 'fgabadg maabcds rzabcxaadabra ';
strTest = 'fgabcdg maabcds rzabcxaadabra ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
objExp = ' mtabadg dfabcwo mknoabcadabrablol ';
strTest = ' mtabcdg dfabcwo mknoabcadabrablol ';
ArrayEqual(sCat+strTest, objExp, strTest.replace(regPat, "a"));
@if (!@_fast)
regVerify(sCat+strTest, regExp, strTest.replace(regPat, "a"));
@end
/*****************************************************************************/
apEndTest();
}
rep_019();
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() {}