Index: openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl,v
diff -u -r1.71.2.56 -r1.71.2.57
--- openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	14 Jun 2023 08:40:23 -0000	1.71.2.56
+++ openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	30 Jan 2024 16:56:51 -0000	1.71.2.57
@@ -1490,6 +1490,25 @@
             }
     }
 
+aa_register_case \
+    -cats {
+        smoke
+        production_safe
+    } acs_kernel__server_startup_ok {
+
+        Checks that the server has booted without errors.
+
+        This is mostly useful as part of an automated CI pipeline, as
+        executing this test at a later time, e.g. after a run of the
+        test suite, will most likely fail: every error will be
+        counted, including expected ones coming from the tests
+        themselves.
+    } {
+        set errors [dict get [ns_logctl stats] Error]
+        aa_log "Number of errors: $errors, warnings: [dict get [ns_logctl stats] Warning]"
+        aa_equals "No errors detected during startup sequence" $errors 0
+    }
+
 #
 # This test could be used to make sure binaries in use in the code are
 # actually available to the system.