diff options
| author | stanton <stanton> | 1999-08-05 01:21:09 (GMT) |
|---|---|---|
| committer | stanton <stanton> | 1999-08-05 01:21:09 (GMT) |
| commit | cda7ffb973ff484284cff45a5f820e86e95dd7e3 (patch) | |
| tree | df8da3970a4f5d66212286f5e5e7fe63d05fc98d /tests/reg.test | |
| parent | 144c26987f8a6f6285efd2f4e878e844b9c13d33 (diff) | |
| download | tcl-cda7ffb973ff484284cff45a5f820e86e95dd7e3.zip tcl-cda7ffb973ff484284cff45a5f820e86e95dd7e3.tar.gz tcl-cda7ffb973ff484284cff45a5f820e86e95dd7e3.tar.bz2 | |
* tests/reg.test: Added test for REG_EXPECT bug fixed by Henry's
patch.
Diffstat (limited to 'tests/reg.test')
| -rw-r--r-- | tests/reg.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/reg.test b/tests/reg.test index 3487f1d..027ab75 100644 --- a/tests/reg.test +++ b/tests/reg.test @@ -6,7 +6,7 @@ # # Copyright (c) 1998, 1999 Henry Spencer. All rights reserved. # -# RCS: @(#) $Id: reg.test,v 1.9 1999/07/08 23:17:56 stanton Exp $ +# RCS: @(#) $Id: reg.test,v 1.10 1999/08/05 01:21:09 stanton Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -927,6 +927,7 @@ i 10 ?P abc+? xyabc {2 4} {5 4} i 11 ?P abc+? xyabcc {2 4} {6 5} i 12 ?P abc+? xyabcd {2 4} {6 5} i 13 ? abcd|bc xyabc {3 4} {2 4} +i 14 ? abc+ xyabcdd {2 4} {7 6} |