blob: 44941032e90567845c798c7e63267bd5a1a2e387 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
# This file contains a top-level script to run all of the Tcl
# tests. Execute it by invoking "source all" when running tclTest
# in this directory.
#
# @(#) all 1.2 94/08/10 15:52:50
foreach i [lsort [glob *.test]] {
if [string match l.*.test $i] {
# This is an SCCS lock file; ignore it.
continue
}
puts stdout $i
source $i
}
|