home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / tcl / tclsrc / tests / all < prev    next >
Encoding:
Text File  |  1996-01-16  |  354 b   |  15 lines

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