//# ==++== //# //# //# 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 = 53221; var sCat = ''; var regPat = ""; var objExp = ""; var m_scen = ''; var strTest = ""; var strTemp = ""; var result = ""; 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 exec019() { apInitTest("exec019"); m_scen = ('Test 1 Lowercase /[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 Lowercase 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 Lowercase /[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 Lowercase 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 Lowercase /[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 Lowercase 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 Lowercase /[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 Lowercase 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 - Lowercase /[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 - Lowercase 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 - Lowercase /[^a-z]/'); sCat = "Pattern "; 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 - Lowercase 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 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 /*****************************************************************************/ apEndTest(); } exec019(); 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() {}