diff options
| author | culler <culler> | 2020-11-10 13:59:25 (GMT) |
|---|---|---|
| committer | culler <culler> | 2020-11-10 13:59:25 (GMT) |
| commit | d94200fdcf927707b43670e7751208ea902b382e (patch) | |
| tree | c8f724ce055955eef67c4b799866138c5389715d /tests/all.tcl | |
| parent | a49d6e52a72b1f086503ae32cb28b0da62e5fa99 (diff) | |
| parent | 6133a711414cfb8fcc3a8b52ecf25b59a09e5800 (diff) | |
| download | tk-d94200fdcf927707b43670e7751208ea902b382e.zip tk-d94200fdcf927707b43670e7751208ea902b382e.tar.gz tk-d94200fdcf927707b43670e7751208ea902b382e.tar.bz2 | |
Merge main
Diffstat (limited to 'tests/all.tcl')
| -rw-r--r-- | tests/all.tcl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/tests/all.tcl b/tests/all.tcl index d15e5ca..46721a2 100644 --- a/tests/all.tcl +++ b/tests/all.tcl @@ -4,7 +4,7 @@ # tests. Execute it by invoking "source all.tcl" when running tktest # in this directory. # -# Copyright (c) 1998-1999 by Scriptics Corporation. +# Copyright © 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. @@ -14,6 +14,8 @@ package require tcltest 2.2 tcltest::configure {*}$argv tcltest::configure -testdir [file normalize [file dirname [info script]]] tcltest::configure -loadfile \ - [file join [tcltest::testsDirectory] constraints.tcl] + [file join [tcltest::testsDirectory] constraints.tcl] tcltest::configure -singleproc 1 -tcltest::runAllTests +set ErrorOnFailures [info exists env(ERROR_ON_FAILURES)] +encoding system utf-8 +if {[tcltest::runAllTests] && $ErrorOnFailures} {exit 1} |