CVS update: MODIFIED: automated ...
User: vins
Date: 05/02/02 04:40:03
Modified: xemacs/tests/automated Tag: release-21-4 regexp-tests.el
Log:
Added shy regexp test for gnus infloop bug.
Revision Changes Path
No revision
No revision
1.2.2.39 +5 -0 XEmacs/xemacs/tests/ChangeLog
(In the diff below, changes in quantity of whitespace are not shown.)
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/tests/ChangeLog,v
retrieving revision 1.2.2.38
retrieving revision 1.2.2.39
diff -u -b -r1.2.2.38 -r1.2.2.39
--- ChangeLog 2005/01/16 02:39:11 1.2.2.38
+++ ChangeLog 2005/02/02 03:39:56 1.2.2.39
＠＠ -1,3 +1,8 ＠＠
+2005-02-01 Vin Shelton <acs(a)xemacs.org>
+
+ * automated/regexp-tests.el: Added an additional shy groups test
+ authored by Arnaud Giersch <arnaud.giersch(a)free.fr>
+
2005-01-14 Stephen J. Turnbull <stephen(a)xemacs.org>
* automated/mule-tests.el (file-system character conversion):
No revision
No revision
1.2.2.10 +5 -0 XEmacs/xemacs/tests/automated/regexp-tests.el
(In the diff below, changes in quantity of whitespace are not shown.)
Index: regexp-tests.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/tests/automated/regexp-tests.el,v
retrieving revision 1.2.2.9
retrieving revision 1.2.2.10
diff -u -b -r1.2.2.9 -r1.2.2.10
--- regexp-tests.el 2005/01/16 02:39:18 1.2.2.9
+++ regexp-tests.el 2005/02/02 03:40:01 1.2.2.10
＠＠ -442,5 +442,10 ＠＠
(Assert (string= text2 (match-string 0 text2)))
(Assert (string= "a" (match-string 1 text2)))
(Assert (null (match-string 2 text2)))
+
+ ;; Test Arnaud Giersch's shy group fix
+ (Assert (progn (string-match "\\(a\\)" "a")
+ (string-match "\\(?:a\\)" "a")
+ (not (match-beginning 1))))
)