diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-08-30 00:05:19 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-08-30 00:05:19 (GMT) |
| commit | c920fce750db18f523a53b78892cb2c1610f5fcc (patch) | |
| tree | b5c0fc271ea0fd6dbddade04e906a194ddd9294e /tests | |
| parent | 379048cb89b55b63858d61a573dbe5537b3656e5 (diff) | |
| download | tcl-c920fce750db18f523a53b78892cb2c1610f5fcc.zip tcl-c920fce750db18f523a53b78892cb2c1610f5fcc.tar.gz tcl-c920fce750db18f523a53b78892cb2c1610f5fcc.tar.bz2 | |
[Bug 3398794]: Use Tcl errors in scripts, not panics.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/interp.test | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/interp.test b/tests/interp.test index 5e6d6b0..510ab4a 100644 --- a/tests/interp.test +++ b/tests/interp.test @@ -3429,6 +3429,13 @@ test interp-35.22 {interp time limits normalize milliseconds} -body { } -cleanup { interp delete $i } -result {2 500} +# Bug 3398794 +test interp-35.23 {interp command limits can't touch current interp} -body { + interp limit {} commands -value 10 +} -returnCodes error -result {limits on current interpreter inaccessible} +test interp-35.24 {interp time limits can't touch current interp} -body { + interp limit {} time -seconds 2 +} -returnCodes error -result {limits on current interpreter inaccessible} test interp-36.1 {interp bgerror syntax} -body { interp bgerror |