diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-18 12:01:44 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-18 12:01:44 (GMT) |
commit | 345894cae91f9e72bbbfd6264ab98a2263d9dd1b (patch) | |
tree | be8fc32b86fb7d57054c9a6c09ec0efb0fb61ae4 /tests | |
parent | f4032799de0b3f701b1801344e0b1adcfe1cf6c0 (diff) | |
download | tcl-345894cae91f9e72bbbfd6264ab98a2263d9dd1b.zip tcl-345894cae91f9e72bbbfd6264ab98a2263d9dd1b.tar.gz tcl-345894cae91f9e72bbbfd6264ab98a2263d9dd1b.tar.bz2 |
Protect "interp limit" command better for allowed range in -millis and -seconds values
Diffstat (limited to 'tests')
-rw-r--r-- | tests/interp.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/interp.test b/tests/interp.test index c19755f..385d3e2 100644 --- a/tests/interp.test +++ b/tests/interp.test @@ -3524,7 +3524,7 @@ test interp-35.19 {interp limit syntax} -body { interp limit $i time -seconds -1 } -cleanup { interp delete $i -} -returnCodes error -result {seconds must be at least 0} +} -match glob -returnCodes error -result {seconds must be between 0 and *} test interp-35.20 {interp limit syntax} -body { set i [interp create] interp limit $i time -millis foobar @@ -3536,7 +3536,7 @@ test interp-35.21 {interp limit syntax} -body { interp limit $i time -millis -1 } -cleanup { interp delete $i -} -returnCodes error -result {milliseconds must be at least 0} +} -match glob -returnCodes error -result {milliseconds must be between 0 and *} test interp-35.22 {interp time limits normalize milliseconds} -body { set i [interp create] interp limit $i time -seconds 1 -millis 1500 |