diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-06-16 12:32:49 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-06-16 12:32:49 (GMT) |
commit | c44181ecafaa160b94728593527ebca0260dc51f (patch) | |
tree | 0ec29da0c538b7360a29c01ede019832d514d796 /tests/all.tcl | |
parent | 14994d8a856c6e59890aad6023793a6760c98e1a (diff) | |
parent | 824f6218752373b6a11e1e9dfaa7d7f2eedc6c42 (diff) | |
download | tcl-c44181ecafaa160b94728593527ebca0260dc51f.zip tcl-c44181ecafaa160b94728593527ebca0260dc51f.tar.gz tcl-c44181ecafaa160b94728593527ebca0260dc51f.tar.bz2 |
Change signature of Tcl_GetRange() to use size_t. Merge trunk.
Diffstat (limited to 'tests/all.tcl')
-rw-r--r-- | tests/all.tcl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/all.tcl b/tests/all.tcl index 69a16ba..ad372db 100644 --- a/tests/all.tcl +++ b/tests/all.tcl @@ -18,5 +18,14 @@ configure {*}$argv -testdir [file dir [info script]] if {[singleProcess]} { interp debug {} -frame 1 } + +set testsdir [file dirname [file dirname [file normalize [info script]/...]]] +lappend auto_path $testsdir {*}[apply {{testsdir args} { + lmap x $args { + if {$x eq $testsdir} continue + lindex $x + } +}} $testsdir {*}$auto_path] + runAllTests proc exit args {} |