]>
git.saurik.com Git - apple/javascriptcore.git/blob - tests/mozilla/ecma_3/RegExp/regress-187133.js
1 /* ***** BEGIN LICENSE BLOCK *****
2 * Version: NPL 1.1/GPL 2.0/LGPL 2.1
4 * The contents of this file are subject to the Netscape Public License
5 * Version 1.1 (the "License"); you may not use this file except in
6 * compliance with the License. You may obtain a copy of the License at
7 * http://www.mozilla.org/NPL/
9 * Software distributed under the License is distributed on an "AS IS" basis,
10 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
11 * for the specific language governing rights and limitations under the
14 * The Original Code is JavaScript Engine testing utilities.
16 * The Initial Developer of the Original Code is Netscape Communications Corp.
17 * Portions created by the Initial Developer are Copyright (C) 2003
18 * the Initial Developer. All Rights Reserved.
20 * Contributor(s): ji_bo@yahoo.com, pschwartau@netscape.com
22 * Alternatively, the contents of this file may be used under the terms of
23 * either the GNU General Public License Version 2 or later (the "GPL"), or
24 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
25 * in which case the provisions of the GPL or the LGPL are applicable instead
26 * of those above. If you wish to allow use of your version of this file only
27 * under the terms of either the GPL or the LGPL, and not to allow others to
28 * use your version of this file under the terms of the NPL, indicate your
29 * decision by deleting the provisions above and replace them with the notice
30 * and other provisions required by the GPL or the LGPL. If you do not delete
31 * the provisions above, a recipient may use your version of this file under
32 * the terms of any one of the NPL, the GPL or the LGPL.
34 * ***** END LICENSE BLOCK *****
37 * Date: 06 January 2003
38 * SUMMARY: RegExp conformance test
39 * See http://bugzilla.mozilla.org/show_bug.cgi?id=187133
41 * The tests here employ the regular expression construct:
45 * This is a "zero-width lookahead negative assertion".
46 * From the Perl documentation:
48 * For example, /foo(?!bar)/ matches any occurrence
49 * of 'foo' that isn't followed by 'bar'.
51 * It is "zero-width" means that it does not consume any characters and that
52 * the parens are non-capturing. A non-null match array in the example above
53 * will have only have length 1, not 2.
56 //-----------------------------------------------------------------------------
59 var summary
= 'RegExp conformance test';
61 var statusmessages
= new Array();
63 var patterns
= new Array();
65 var strings
= new Array();
67 var actualmatches
= new Array();
68 var expectedmatch
= '';
69 var expectedmatches
= new Array();
72 pattern
= /(\.(?!com|org)|\/)/;
73 status
= inSection(1);
75 actualmatch
= string
.match(pattern
);
76 expectedmatch
= ['.', '.'];
79 status
= inSection(2);
81 actualmatch
= string
.match(pattern
);
82 expectedmatch
= ['/', '/'];
85 status
= inSection(3);
87 actualmatch
= string
.match(pattern
);
92 pattern
= /(?!a|b)|c/;
93 status
= inSection(4);
95 actualmatch
= string
.match(pattern
);
99 status
= inSection(5);
101 actualmatch
= string
.match(pattern
);
102 expectedmatch
= [''];
105 status
= inSection(6);
107 actualmatch
= string
.match(pattern
);
108 expectedmatch
= [''];
114 //-------------------------------------------------------------------------------------------------
116 //-------------------------------------------------------------------------------------------------
121 statusmessages
[i
] = status
;
122 patterns
[i
] = pattern
;
124 actualmatches
[i
] = actualmatch
;
125 expectedmatches
[i
] = expectedmatch
;
133 printBugNumber (bug
);
134 printStatus (summary
);
135 testRegExp(statusmessages
, patterns
, strings
, actualmatches
, expectedmatches
);