diff options
Diffstat (limited to 'tcl/tests/all.tcl')
-rw-r--r-- | tcl/tests/all.tcl | 20 |
1 files changed, 13 insertions, 7 deletions
diff --git a/tcl/tests/all.tcl b/tcl/tests/all.tcl index fbf8cde9452..80c7d6886c0 100644 --- a/tcl/tests/all.tcl +++ b/tcl/tests/all.tcl @@ -1,19 +1,25 @@ # all.tcl -- # -# This file contains a top-level script to run all of the Tk -# tests. Execute it by invoking "source all.tcl" when running tktest +# This file contains a top-level script to run all of the Tcl +# tests. Execute it by invoking "source all.test" when running tcltest # in this directory. # # Copyright (c) 1998-1999 by Scriptics Corporation. +# Copyright (c) 2000 by Ajuba Solutions # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # # RCS: @(#) $Id$ -package require Tcl 8.4 -package require tcltest 2.1 -tcltest::configure -testdir [file join [pwd] [file dirname [info script]]] -tcltest::configure -singleproc 1 -eval tcltest::configure $argv +set tcltestVersion [package require tcltest] +namespace import -force tcltest::* + +if {$tcl_platform(platform) == "macintosh"} { + tcltest::singleProcess 1 +} + +tcltest::testsDirectory [file dir [info script]] tcltest::runAllTests + +return |