1 /* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
2 /* ***** BEGIN LICENSE BLOCK *****
3 * Version: MPL 1.1/GPL 2.0/LGPL 2.1
5 * The contents of this file are subject to the Mozilla Public License Version
6 * 1.1 (the "License"); you may not use this file except in compliance with
7 * the License. You may obtain a copy of the License at
8 * http://www.mozilla.org/MPL/
10 * Software distributed under the License is distributed on an "AS IS" basis,
11 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
12 * for the specific language governing rights and limitations under the
15 * The Original Code is JavaScript Engine testing utilities.
17 * The Initial Developer of the Original Code is
18 * Netscape Communications Corp.
19 * Portions created by the Initial Developer are Copyright (C) 2003
20 * the Initial Developer. All Rights Reserved.
23 * ji_bo@yahoo.com, pschwartau@netscape.com
25 * Alternatively, the contents of this file may be used under the terms of
26 * either the GNU General Public License Version 2 or later (the "GPL"), or
27 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
28 * in which case the provisions of the GPL or the LGPL are applicable instead
29 * of those above. If you wish to allow use of your version of this file only
30 * under the terms of either the GPL or the LGPL, and not to allow others to
31 * use your version of this file under the terms of the MPL, indicate your
32 * decision by deleting the provisions above and replace them with the notice
33 * and other provisions required by the GPL or the LGPL. If you do not delete
34 * the provisions above, a recipient may use your version of this file under
35 * the terms of any one of the MPL, the GPL or the LGPL.
37 * ***** END LICENSE BLOCK ***** */
41 * Date: 06 January 2003
42 * SUMMARY: RegExp conformance test
43 * See http://bugzilla.mozilla.org/show_bug.cgi?id=187133
45 * The tests here employ the regular expression construct:
49 * This is a "zero-width lookahead negative assertion".
50 * From the Perl documentation:
52 * For example, /foo(?!bar)/ matches any occurrence
53 * of 'foo' that isn't followed by 'bar'.
55 * It is "zero-width" means that it does not consume any characters and that
56 * the parens are non-capturing. A non-null match array in the example above
57 * will have only have length 1, not 2.
60 //-----------------------------------------------------------------------------
62 var BUGNUMBER = 187133;
63 var summary = 'RegExp conformance test';
65 var statusmessages = new Array();
67 var patterns = new Array();
69 var strings = new Array();
71 var actualmatches = new Array();
72 var expectedmatch = '';
73 var expectedmatches = new Array();
76 pattern = /(\.(?!com|org)|\/)/;
77 status = inSection(1);
79 actualmatch = string.match(pattern);
80 expectedmatch = ['.', '.'];
83 status = inSection(2);
85 actualmatch = string.match(pattern);
86 expectedmatch = ['/', '/'];
89 status = inSection(3);
91 actualmatch = string.match(pattern);
96 pattern = /(?!a|b)|c/;
97 status = inSection(4);
99 actualmatch = string.match(pattern);
100 expectedmatch = [''];
103 status = inSection(5);
105 actualmatch = string.match(pattern);
106 expectedmatch = [''];
109 status = inSection(6);
111 actualmatch = string.match(pattern);
112 expectedmatch = [''];
118 //-------------------------------------------------------------------------------------------------
120 //-------------------------------------------------------------------------------------------------
125 statusmessages[i] = status;
126 patterns[i] = pattern;
128 actualmatches[i] = actualmatch;
129 expectedmatches[i] = expectedmatch;
137 printBugNumber(BUGNUMBER);
138 printStatus (summary);
139 testRegExp(statusmessages, patterns, strings, actualmatches, expectedmatches);