summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/safe.test6
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/safe.test b/tests/safe.test
index b453543..48782cf 100644
--- a/tests/safe.test
+++ b/tests/safe.test
@@ -10,7 +10,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: safe.test,v 1.7 1999/06/26 20:55:12 rjohnson Exp $
+# RCS: @(#) $Id: safe.test,v 1.8 1999/07/22 23:45:52 redman Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
@@ -180,6 +180,10 @@ test safe-6.3 {test safe interpreters knowledge of the world} {
[lsearch $r "debug"] != -1} {
set r [lreplace $r 1 1]
}
+ set threaded [lsearch $r "threaded"]
+ if {$threaded != -1} {
+ set r [lreplace $r $threaded $threaded]
+ }
set r
} {byteOrder platform}