summaryrefslogtreecommitdiffstats
path: root/tests/interp.test
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-05-19 20:29:17 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-05-19 20:29:17 (GMT)
commit2c09f44d03ebe26aa32f1b033f260f090ed65705 (patch)
tree250e85214930e4f82b19237dee8beb85eb5441f7 /tests/interp.test
parente52d9cbf151b4d4106c36834e820db9442ec9a3b (diff)
downloadtcl-2c09f44d03ebe26aa32f1b033f260f090ed65705.zip
tcl-2c09f44d03ebe26aa32f1b033f260f090ed65705.tar.gz
tcl-2c09f44d03ebe26aa32f1b033f260f090ed65705.tar.bz2
Spelling whoops! Moved constraint declaration to near top of file
Diffstat (limited to 'tests/interp.test')
-rw-r--r--tests/interp.test5
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/interp.test b/tests/interp.test
index 8e84db0..8c0f7b7 100644
--- a/tests/interp.test
+++ b/tests/interp.test
@@ -10,13 +10,15 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: interp.test,v 1.32 2004/05/19 20:15:31 dkf Exp $
+# RCS: @(#) $Id: interp.test,v 1.33 2004/05/19 20:29:17 dkf Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2.1
namespace import -force ::tcltest::*
}
+testConstraint testinterpdelete [llength [info commands testinterpdelete]]
+
set hidden_cmds {cd encoding exec exit fconfigure file glob load open pwd socket source}
foreach i [interp slaves] {
@@ -674,7 +676,6 @@ test interp-17.5 {alias loop prevention} {
# the bugs as a core dump.
#
-testCosntraint testinterpdelete [llength [info commands testinterpdelete]]
test interp-18.1 {testing Tcl_DeleteInterp vs slaves} testinterpdelete {
list [catch {testinterpdelete} msg] $msg
} {1 {wrong # args: should be "testinterpdelete path"}}