summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-02-14 21:04:25 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-02-14 21:04:25 (GMT)
commit46df7f7566778f6e653d25f063fc6a57649e36a6 (patch)
tree6ea04402d2c4db05e12afb225fecbbf5ee44a090 /tests
parent00e736695a8c441fd7613f99a6a67fc101302477 (diff)
downloadtcl-46df7f7566778f6e653d25f063fc6a57649e36a6.zip
tcl-46df7f7566778f6e653d25f063fc6a57649e36a6.tar.gz
tcl-46df7f7566778f6e653d25f063fc6a57649e36a6.tar.bz2
New branch bug-3604074 with improved patch to correct fixempties() failurebug_3604074
to converge.
Diffstat (limited to 'tests')
-rw-r--r--tests/regexp.test5
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/regexp.test b/tests/regexp.test
index 70ee47e..a7b81b2 100644
--- a/tests/regexp.test
+++ b/tests/regexp.test
@@ -630,7 +630,10 @@ test regexp-21.13 {multiple matches handle newlines} {
test regexp-22.1 {Bug 1810038} {
regexp ($|^X)* {}
} 1
-
+test regexp-22.2 {Bug 3604074} {
+ # This will hang in interps where the bug is not fixed
+ regexp ((((((((a)*)*)*)*)*)*)*)* a
+} 1
# cleanup
::tcltest::cleanupTests