summaryrefslogtreecommitdiffstats
path: root/library/tcltest/tcltest.tcl
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2018-10-21 10:16:05 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2018-10-21 10:16:05 (GMT)
commit0c78f5bbada0703c8063287e2e063604c4023ba7 (patch)
tree3681bd86e5eeb8d13b50a1941bb888679aa5728e /library/tcltest/tcltest.tcl
parent2e0a0b53053f3699f0593ca9e50b5ba45a548da1 (diff)
downloadtcl-0c78f5bbada0703c8063287e2e063604c4023ba7.zip
tcl-0c78f5bbada0703c8063287e2e063604c4023ba7.tar.gz
tcl-0c78f5bbada0703c8063287e2e063604c4023ba7.tar.bz2
Disable windows builds. Make test failures fatal.
Diffstat (limited to 'library/tcltest/tcltest.tcl')
-rw-r--r--library/tcltest/tcltest.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl
index 8e43859..0d55ff7 100644
--- a/library/tcltest/tcltest.tcl
+++ b/library/tcltest/tcltest.tcl
@@ -2696,7 +2696,7 @@ proc tcltest::GetMatchingDirectories {rootdir} {
# shell being tested
#
# Results:
-# None.
+# Whether there were any failures.
#
# Side effects:
# None.
@@ -2842,7 +2842,7 @@ proc tcltest::runAllTests { {shell ""} } {
puts [outputChannel] ""
puts [outputChannel] [string repeat ~ 44]
}
- return
+ return [info exists testFileFailures]
}
#####################################################################