Import Tcl 8.6.11
This commit is contained in:
@@ -12,8 +12,8 @@
|
||||
# See the file "license.terms" for information on usage and redistribution
|
||||
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
||||
|
||||
if {[lsearch [namespace children] ::tcltest] == -1} {
|
||||
package require tcltest 2.2
|
||||
if {"::tcltest" ni [namespace children]} {
|
||||
package require tcltest 2.5
|
||||
namespace import -force ::tcltest::*
|
||||
}
|
||||
|
||||
@@ -25,7 +25,7 @@ testConstraint memory [llength [info commands memory]]
|
||||
|
||||
# Tests for wrong number of arguments
|
||||
|
||||
test apply-1.1 {too few arguments} -returnCodes error -body {
|
||||
test apply-1.1 {not enough arguments} -returnCodes error -body {
|
||||
apply
|
||||
} -result {wrong # args: should be "apply lambdaExpr ?arg ...?"}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user