//# ==++== //# //# //# 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 = 53239; var sCat = ''; var regPat; var objExp; var m_scen = ''; 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 exec029() { apInitTest("exec029"); m_scen = ('Test 1 Upper Case /[A-C][A-C][A-C]/'); sCat = "Precise Sets "; apInitScenario(m_scen); regPat = /[A-C][A-C][A-C]/; objExp = new Array('ABC'); var regExp = new Array(); var strTest = 'ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'M NABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABE DABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 2 Slightly more complex strings'); strTest = 'ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC AB C ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC AB C ABRACADABRAB'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC AB C ABRACADABRAB C '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' EABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'NABC AB C ABRACADABRAB D '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 3 Upper Case tests w/ multiples'); strTest = 'ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCD EABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 4 Slightly more complex strings w/ multiple finds'); strTest = 'ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ORANABCABO SIENABCATHEDRAL ABRACADABRAE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ORANABCABO SIENABCATHEDRAL ABRACADABRAE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCE FABCG EABRACADABRAS'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'TABCN DABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCN SABC ABRACADABRAD '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'SABC BABC RABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABC BABC RABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABCR BABCA ABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'RABC VABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MABCD aABABCAB AAABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'FGABCDG MAABCDS RZABCXAaDABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MTABCDG DFABCWO mkNOABCADABRABlol '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 5 Upper Case /[A-C][A-Z][A-D]/'); sCat = "Less Precise Sets "; apInitScenario(m_scen); regPat = /[A-C][A-Z][A-D]/; objExp = new Array('ABC'); regExp = new Array(); strTest = 'ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'M NABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABE DABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 6 Slightly more complex strings'); strTest = 'ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC AB C ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC AB C ABRACADABRAB'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC AB C ABRACADABRAB C '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' EABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'NABC AB C ABRACADABRAB D '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 7 Upper Case tests w/ multiples'); strTest = 'ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCD EABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 8 Slightly more complex strings w/ multiple finds'); strTest = 'ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ORFNABCABO SIENABCATHEDRAL ABRACADABRAE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ORFNABCABO SIENABCATHEDRAL ABRACADABRAE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCE FABCG EABRACADABRAS'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'TABCN DABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCN SABC ABRACADABRAD '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'SABC BABC RABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABC BABC RABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABCR BABCA ABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'RABC VABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' FABCD aABABCAB AAABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'FGABCDG MAABCDS RZABCXAaDABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MTABCDG DFABCWO mkNOABCADABRABlol '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 9 Upper Case /[C]/'); sCat = "One Character Sets "; apInitScenario(m_scen); regPat = /[C]/; objExp = new Array('C'); regExp = new Array(); strTest = 'ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABE DABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 10 Slightly more complex strings'); strTest = 'ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC AB C ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC AB C ABRACADABRAB'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC AB C ABRACADABRAB C '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' EABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'NABC AB C ABRACADABRAB D '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 11 Upper Case tests w/ multiples'); strTest = 'ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCD EABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 12 Slightly more complex strings w/ multiple finds'); strTest = 'ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ORANABCABO SIENABCATHEDRAL ABRACADABRAE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ORANABCABO SIENABCATHEDRAL ABRACADABRAE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCE FABCG EABRACADABRAS'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'TABCN DABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCN SABC ABRACADABRAD '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'SABC BABC RABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABC BABC RABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABCR BABCA ABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'RABC VABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' AABCD aABABCAB AAABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'FGABCDG MAABCDS RZABCXAaDABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MTABCDG DFABCWO mkNOABCADABRABlol '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 13 Upper Case /[A-A]/'); sCat = "one character ranges "; apInitScenario(m_scen); regPat = /[A-A]/; objExp = new Array('A'); regExp = new Array(); strTest = 'ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABCE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABE DABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 14 Slightly more complex strings'); strTest = 'ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC AB C ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC AB C ABRACADABRAB'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC AB C ABRACADABRAB C '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' EABC AB C ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'NABC AB C ABRACADABRAB D '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 15 Upper Case tests w/ multiples'); strTest = 'ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC ABCE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCD EABC '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 16 Slightly more complex strings w/ multiple finds'); strTest = 'ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC ABC ABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ORANABCABO SIENABCATHEDRAL ABRACADABRAE'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ORANABCABO SIENABCATHEDRAL ABRACADABRAE '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCE FABCG EABRACADABRAS'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'TABCN DABC ABRACADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCN SABC ABRACADABRAD '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'SABC BABC RABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABC BABC RABRACADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC ABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABCR BABCA ABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'RABC VABC ABCADABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' AABCD aABABCAB AAABCADABRA'; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'FGABCDG MAABCDS RZABCXAaDABRA '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MTABCDG DFABCWO mkNOABCADABRABlol '; ArrayEqual(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 17 Failure - Upper Case /[Q-Q]/'); sCat = "Both Patterns do not exist "; apInitScenario(m_scen); regPat = /[Q-Q]/; objExp = null; regExp = new Array(); strTest = 'ABCMNZ'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCMNZ'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCEMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABCEMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCE MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABE DABCE MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 18 Failure - Slightly more complex strings'); strTest = 'ABCMNZD AB C ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCMNZD AB C ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB C DABCVMNZD ABRACADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCMNZD AB C ABRACADABRAB'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCMNZD AB C ABRACADABRAB C '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' EABC AB C ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'NABC MNZD AB C ABRACADABRAB D '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 19 Failure - Upper Case tests w/ multiples'); strTest = 'ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCD EMNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 20 Failure - Slightly more complex strings w/ multiple finds'); strTest = 'ABC MNZD ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD ABRACADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ORANABCABO SIENMNZDTHEDRAL ABRACADABRAE'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ORANABCABO SIENMNZDTHEDRAL ABRACADABRAE '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCE FMNZD EABRACADABRAS'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'TABCN DMNZD ABRACADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCN SMNZD ABRACADABRAD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'SABC BMNZD RABCADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABC BMNZD RABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD ABCADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABCR BMNZDA ABCADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'RABC VMNZD ABCADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' AABCD aABMNZDAB AAABCADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'FGABCDG MAMNZDS RZABCXAaDABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MTABCDG DFMNZD mkNOABCADABRABlol '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 21 Failure - Upper Case /[^A-Z ]/'); sCat = "Both Patterns do not exist "; apInitScenario(m_scen); regPat = /[^A-Z ]/; objExp = null; regExp = new Array(); strTest = 'ABCMNZ'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCMNZ'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCEMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABCEMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCMNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABCE MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB ABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABE DABCE MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 22 Failure - Slightly more complex strings'); strTest = 'ABCMNZD AB C ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCMNZD AB C ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'AB C DABCVMNZD ABRACADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCMNZD AB C ABRACADABRAB'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABCMNZD AB C ABRACADABRAB C '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' EABC AB C ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'NABC MNZD AB C ABRACADABRAB D '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 23 Failure - Upper Case tests w/ multiples'); strTest = 'ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'DABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABCD EMNZD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end m_scen = ('Test 24 Failure - Slightly more complex strings w/ multiple finds'); strTest = 'ABC MNZD ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ABC MNZD ABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD ABRACADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' ORANABCABO SIENMNZDTHEDRAL ABRACADABRAE'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ORANABCABO SIENMNZDTHEDRAL ABRACADABRAE '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCE FMNZD EABRACADABRAS'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'TABCN DMNZD ABRACADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' DABCN SMNZD ABRACADABRAD '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'SABC BMNZD RABCADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABC BMNZD RABRACADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'ABC MNZD ABCADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' SABCR BMNZDA ABCADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'RABC VMNZD ABCADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' AABCD ABMNZDAB AAABCADABRA'; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = 'FGABCDG MAMNZDS RZABCXADABRA '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end strTest = ' MTABCDG DFMNZD NOABCADABRAB '; verify(sCat+strTest, objExp, regPat.exec(strTest)); @if (!@_fast) @if (!@_fast) regVerify(sCat+strTest, regExp, regPat.exec(strTest)); @end @end /*****************************************************************************/ apEndTest(); } exec029(); 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() {}