diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/all.tcl | 44 |
1 files changed, 22 insertions, 22 deletions
diff --git a/tests/all.tcl b/tests/all.tcl index 770ee9c..59890a8 100644 --- a/tests/all.tcl +++ b/tests/all.tcl @@ -1,22 +1,22 @@ -# 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 -# in this directory. -# -# Copyright (c) 1998-1999 by Scriptics Corporation. -# -# See the file "license.terms" for information on usage and redistribution -# of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: all.tcl,v 1.9 2005/02/14 09:21:13 dkf Exp $ - -package require Tcl 8.4 -package require tcltest 2.1 -package require Tk ;# This is the Tk test suite; fail early if no Tk! -tcltest::configure -testdir [file join [pwd] [file dirname [info script]]] -tcltest::configure -loadfile \ - [file join [tcltest::testsDirectory] constraints.tcl] -tcltest::configure -singleproc 1 -eval tcltest::configure $argv -tcltest::runAllTests +# 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
+# in this directory.
+#
+# Copyright (c) 1998-1999 by Scriptics Corporation.
+#
+# See the file "license.terms" for information on usage and redistribution
+# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
+#
+# RCS: @(#) $Id: all.tcl,v 1.10 2007/08/18 15:39:03 dkf Exp $
+
+package require Tcl 8.5
+package require tcltest 2.2
+package require Tk ;# This is the Tk test suite; fail early if no Tk!
+tcltest::configure {*}$argv
+tcltest::configure -testdir [file join [pwd] [file dirname [info script]]]
+tcltest::configure -loadfile \
+ [file join [tcltest::testsDirectory] constraints.tcl]
+tcltest::configure -singleproc 1
+tcltest::runAllTests
|