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

1835 lines
51 KiB
JavaScript

//# ==++==
//#
//#
//# Copyright (c) 2002 Microsoft Corporation. All rights reserved.
//#
//# The use and distribution terms for this software are contained in the file
//# named license.txt, which can be found in the root of this distribution.
//# By using this software in any fashion, you are agreeing to be bound by the
//# terms of this license.
//#
//# You must not remove this notice, or any other, from this software.
//#
//#
//# ==--==
//####################################################################################
@cc_on
import System;
var NULL_DISPATCH = null;
var apGlobalObj;
var apPlatform;
var lFailCount;
var iTestID = 53831;
var sCat = '';
var regPat = "";
var objExp = "";
var m_scen = '';
var strTest = "";
var strTemp = "";
var regExp = "";
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 tst_219() {
apInitTest("tst_219");
m_scen = ('Test 1 nonalpha /[-][-][-]/');
sCat = "Precise Sets ";
apInitScenario(m_scen);
regPat = /[-][-][-]/;
objExp = true;
regExp = new Array();
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '{ , ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 2 Slightly more complex strings');
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\   $\\$  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ',   $\\$ \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 3 nonalpha tests w/ multiples');
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 4 Slightly more complex strings w/ multiple finds');
strTest = '  $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' }$,} ¤ , \n\\$. $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '}$,} ¤ , \n\\$. $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ \r $\\$¤';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' , \\ $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\, ¤ $\\$\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest =   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤  $$\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤$  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '$ ? \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {\\  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\r \\ {\\¤ $~@\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' { \\ \\\r|} {*,}\\$.}. ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 5 nonalpha /[-][-~][-\\]/');
sCat = "Less Precise Sets ";
apInitScenario(m_scen);
regPat = /[-][-~][-\\]/;
objExp = true;
regExp = new Array();
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = 'Ç ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = 'Ç ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '{ , ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = 'ü  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = 'Ç  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = 'ü \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 6 Slightly more complex strings');
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\   $\\$  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ',   $\\$ \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 7 nonalpha tests w/ multiples');
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 8 Slightly more complex strings w/ multiple finds');
strTest = '  $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' }$\r,} ¤ , \n\\$. $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '}$\r,} ¤ , \n\\$. $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ \r $\\$¤';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' , \\ $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\, ¤ $\\$\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest =   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤  $$\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤$  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '$ ? \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \r\\  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\r \\ {\\¤ $~@\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' { \\ \\\r|} {*,}\\$.}. ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 9 nonalpha /[]/');
sCat = "One Character Sets ";
apInitScenario(m_scen);
regPat = /[]/;
objExp = true;
regExp = new Array();
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 10 Slightly more complex strings');
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\   $\\$  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ',   $\\$ \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 11 nonalpha tests w/ multiples');
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 12 Slightly more complex strings w/ multiple finds');
strTest = '  $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' }$,} ¤ , \n\\$. $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '}$,} ¤ , \n\\$. $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ \r $\\$¤';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' , \\ $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\, ¤ $\\$\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest =   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤  $$\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤$  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '$ ? \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\r \\ {\\¤ $~@\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' { \\ \\\r|} {*,}\\$.}. ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 13 nonalpha /[-]/');
sCat = "one character ranges ";
apInitScenario(m_scen);
regPat = /[-]/;
objExp = true;
regExp = new Array();
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 14 Slightly more complex strings');
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\   $\\$  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ',   $\\$ \\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 15 nonalpha tests w/ multiples');
strTest = ' ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\  ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 16 Slightly more complex strings w/ multiple finds');
strTest = '  $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' }$,} ¤ , \n\\$. $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '}$,} ¤ , \n\\$. $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ \r $\\$¤';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' , \\ $\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\, ¤ $\\$\\ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest =   $\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤  $$\\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤$  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '$ ? \\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\  \\$';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\r \\ {\\¤ $~@\\$ ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' { \\ \\\r|} {*,}\\$.}. ';
ArrayEqual(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 17 Failure - Lowercase /[\^-\^]/');
sCat = "Both Patterns do not exist ";
apInitScenario(m_scen);
regPat = /[\^-\^]/;
objExp = false;
regExp = new Array();
strTest = '{,~';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\{,~';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\{,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '{,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 18 Failure - Slightly more complex strings');
strTest = '{,~\\   $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\   $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  \\?{,~\\ $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\{,~\\   $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\{,~\\   $\\$  ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ', {,~\\   $\\$ \\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 19 Failure - Lowercase tests w/ multiples');
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 20 Failure - Slightly more complex strings w/ multiple finds');
strTest = ' {,~\\ $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' }$,} ¤ ,{,~\\ \n\\$. $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '}$,} ¤ ,{,~\\ \n\\$. $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ \r{,~\\ $\\$¤';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' , \\{,~\\ $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\, ¤{,~\\ $\\$\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest =  {,~\\ $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤ {,~\\ $$\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ \\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤$ {,~\\ \\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '$ ?{,~\\ \\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\ \\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\r \\ {{,~\\¤ $~@\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' { \\ \\\r{,~\\ {*,}\\$.}. ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 21 Failure - Lowercase /[^-~¤ ]/');
sCat = "Pattern: Exclsion Pattern";
apInitScenario(m_scen);
regPat = /[^-~¤ ]/;
objExp = false;
regExp = new Array();
strTest = '{,~';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\{,~';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\{,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '{,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 22 Failure - Slightly more complex strings');
strTest = '{,~\\   $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\   $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  \\?{,~\\ $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\{,~\\   $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\{,~\\   $\\$  ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '    $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ', {,~\\   $\\$ \\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 23 Failure - Lowercase tests w/ multiples');
strTest = ' {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\\ {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
m_scen = ('Test 24 Failure - Slightly more complex strings w/ multiple finds');
strTest = ' {,~\\ $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '  {,~\\ $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' }$,} ¤ ,{,~\\ \n\\$. $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '}$,} ¤ ,{,~\\ \n\\$. $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ \r{,~\\ $\\$¤';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' , \\{,~\\ $\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\, ¤{,~\\ $\\$\\ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest =  {,~\\ $\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤ {,~\\ $$\\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' {,~\\ \\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' ¤$ {,~\\ \\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '$ ?{,~\\ \\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' \\ {,~\\ \\$';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = '\r \\ {{,~\\¤ $~@\\$ ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
strTest = ' { \\ \\\r{,~\\ {*,}\\$.}. ';
verify(sCat+strTest, objExp, regPat.test(strTest));
@if (!@_fast)
regVerify(sCat+strTest, regExp, regPat.test(strTest));
@end
/*****************************************************************************/
apEndTest();
}
tst_219();
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() {}