diff -urN ctcs-1.3.0pre8.bckkk/run ctcs-1.3.0pre8/run
--- ctcs-1.3.0pre8.bckkk/run	2003-01-19 01:12:19.000000000 +0000
+++ ctcs-1.3.0pre8/run	2003-01-19 01:16:30.000000000 +0000
@@ -28,6 +28,9 @@
 use timecalc;
 use hashstore;
 
+# flag to indicate failure of any test
+my $any_failures = 0;
+
 # tcf being parsed
 my $filename;
 
@@ -267,7 +270,11 @@
 	} else {
 		warn ("Test result inconclusive for $key, no results found\n");
 	}
-	
+
+	if ($fail != 0) {
+		$any_failures = 1;
+	}
+
 	if (defined($test_results{$key}->[0])) {
 		$test_results{$key}->[0] +=  $fail;
 		$test_results{$key}->[1] +=  $succeed;
@@ -941,9 +948,11 @@
 #	setlogmask ("debug");
 	main(("-"));
 	closelog();
+	exit $any_failures;
 } else {
 	openlog("Cerberus", "", "local7");
 #	setlogmask ("debug");
 	main(@ARGV);
 	closelog();
+	exit $any_failures;
 }