From 1573844680a8439ae02a42fe4968d7deb4b05a02 Mon Sep 17 00:00:00 2001
From: Pekka Enberg <penberg@iki.fi>
Date: Sun, 30 Jun 2024 17:35:05 +0300
Subject: [PATCH] Make all.test exit with failure if test fails

---
 testing/all.test | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/testing/all.test b/testing/all.test
index 79e7eff84..333fa7bb4 100755
--- a/testing/all.test
+++ b/testing/all.test
@@ -11,7 +11,8 @@ proc evaluate_sql {sqlite_exec sql} {
 proc run_test {sqlite_exec sql expected_output} {
     set actual_output [evaluate_sql $sqlite_exec $sql]
     if {$actual_output ne $expected_output} {
-        puts "Test passed: '$sql' returned '$actual_output'"
+        puts "Test FAILED: '$sql' returned '$actual_output'"
+        exit 1
     }
 }