summaryrefslogtreecommitdiffstats
path: root/tests/safe.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/safe.test')
-rw-r--r--tests/safe.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/safe.test b/tests/safe.test
index c58c7b7..223559a 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.30 2009/12/28 12:50:43 dkf Exp $
+# RCS: @(#) $Id: safe.test,v 1.31 2009/12/29 14:55:42 dkf Exp $
package require Tcl 8.5
@@ -70,10 +70,10 @@ test safe-2.3 {creating safe interpreters, should have no unexpected aliases} -s
catch {safe::interpDelete a}
} -body {
interp create a -safe
- a aliases
+ lsort [a aliases]
} -cleanup {
interp delete a
-} -result {clock}
+} -result {::tcl::mathfunc::max ::tcl::mathfunc::min clock}
test safe-3.1 {calling safe::interpInit is safe} -setup {
catch {safe::interpDelete a}