Fail RunAndQuit if no tests are found

The RunAndQuit method is intended to run automated tests; if no tests are found, this is likely a test setup error.
gertjanklein · Jun 16, 2022 · f27111f · f27111f
1 parent a9562b3
commit f27111f
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Strix.Testing.Runner.cls b/src/Strix.Testing.Runner.cls
@@ -99,9 +99,10 @@ ClassMethod RunAndQuit(TestSpec As %String = "", Save As %Boolean = 0)
 {
 	Set $ZTrap = "Error"
 
+	#dim Runner As Strix.Testing.Runner
 	Set Runner = ..Run(TestSpec, 0, Save)
 
-	If Runner.Failed+Runner.Errors {
+	If (Runner.Failed+Runner.Errors) || 'Runner.Asserts {
 		; This returns exit status 1
 		Do $System.Process.Terminate()
 	}