diff options
author | rjohnson <rjohnson@noemail.net> | 1999-07-08 03:08:02 (GMT) |
---|---|---|
committer | rjohnson <rjohnson@noemail.net> | 1999-07-08 03:08:02 (GMT) |
commit | a95ddfac7c5fef8d0ae7498e84096936ac596ae5 (patch) | |
tree | 65e59ab649c0be5c1c193be33966bfb8cb4d1eb3 | |
parent | 42e531f77c2e0af13efd9f54ed82fc9195d6b2f2 (diff) | |
download | tcl-a95ddfac7c5fef8d0ae7498e84096936ac596ae5.zip tcl-a95ddfac7c5fef8d0ae7498e84096936ac596ae5.tar.gz tcl-a95ddfac7c5fef8d0ae7498e84096936ac596ae5.tar.bz2 |
Fixed bug in test suite - remember to update tests when
changing features!!!
FossilOrigin-Name: 2d21c464408c76004d5e063c60f4bf7b2ba8540d
-rw-r--r-- | tests/platform.test | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/platform.test b/tests/platform.test index e8a69f8..30188f1 100644 --- a/tests/platform.test +++ b/tests/platform.test @@ -19,6 +19,7 @@ if {[lsearch [namespace children] ::tcltest] == -1} { test platform-1.1 {TclpSetVariables: tcl_platform} { interp create i i eval {catch {unset tcl_platform(debug)}} + i eval {catch {unset tcl_platform(threaded)}} set result [i eval {lsort [array names tcl_platform]}] interp delete i set result |