Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

exit with non-zero status when there are failed tests

  • Loading branch information...
commit 7905331ede21e4e88db2665fd27e1695f98fb46a 1 parent fe2173a
@pietern pietern authored
Showing with 3 additions and 3 deletions.
  1. +3 −3 tests/test_helper.tcl
View
6 tests/test_helper.tcl
@@ -82,13 +82,13 @@ proc main {} {
execute_tests "unit/sort"
execute_tests "unit/expire"
execute_tests "unit/other"
-
+
+ cleanup
puts "\n[expr $::passed+$::failed] tests, $::passed passed, $::failed failed"
if {$::failed > 0} {
puts "\n*** WARNING!!! $::failed FAILED TESTS ***\n"
+ exit 1
}
-
- cleanup
}
# parse arguments
Please sign in to comment.
Something went wrong with that request. Please try again.