diff options
author | dgp <dgp@users.sourceforge.net> | 2013-04-08 19:59:03 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2013-04-08 19:59:03 (GMT) |
commit | 55102c2b83a91074eb32c07fb5930ccc9ca00c44 (patch) | |
tree | 66cc82c126d9de0e6ce6bc9579d76026b029826b /tests | |
parent | e0dbb5bd6286d83d5bffb1ee2890569951dce5d4 (diff) | |
parent | 7ff52157edb4f8563b115be8ef48d116e3730e0d (diff) | |
download | tcl-55102c2b83a91074eb32c07fb5930ccc9ca00c44.zip tcl-55102c2b83a91074eb32c07fb5930ccc9ca00c44.tar.gz tcl-55102c2b83a91074eb32c07fb5930ccc9ca00c44.tar.bz2 |
3610026 Stop crash when the number of "colors" in a regular expression
overflows a short int. Thanks to Heikki Linnakangas for the report and
the patch.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/regexp.test | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/regexp.test b/tests/regexp.test index 73c0edf..8138054 100644 --- a/tests/regexp.test +++ b/tests/regexp.test @@ -717,6 +717,17 @@ test regexp-22.4 {Bug 3606139} -setup { } -cleanup { rename a {} } -returnCodes 1 -result {couldn't compile regular expression pattern: nfa has too many states} +test regexp-22.5 {Bug 3610026} -setup { + set e {} + set cp 99 + while {$cp < 32864} { + append e [format %c [incr cp]] + } +} -body { + regexp -about $e +} -cleanup { + unset -nocomplain e cp +} -returnCodes error -match glob -result {*too many colors*} test regexp-23.1 {regexp -all and -line} { set string "" |