From 161bb82f307e0092b68243cf5a2c034b9dfdec46 Mon Sep 17 00:00:00 2001 From: Vasilii Rogin Date: Sun, 1 Jun 2025 14:08:18 +0300 Subject: [PATCH] Slightly better output for tests --- sfall_testing/gl_test_stats.ssl | 2 +- sfall_testing/test_utils.ssl | 6 ++++-- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/sfall_testing/gl_test_stats.ssl b/sfall_testing/gl_test_stats.ssl index fcb86c85..052d8bfe 100644 --- a/sfall_testing/gl_test_stats.ssl +++ b/sfall_testing/gl_test_stats.ssl @@ -77,7 +77,7 @@ procedure test_stat_critter(variable critter, variable stat_id) begin end procedure start begin - display_msg("===== stats test ====="); + display_msg("Testing stats..."); test_suite_errors := 0; call test_stat_pc(STAT_max_hit_points); diff --git a/sfall_testing/test_utils.ssl b/sfall_testing/test_utils.ssl index 9d15cfbb..c5dac58d 100644 --- a/sfall_testing/test_utils.ssl +++ b/sfall_testing/test_utils.ssl @@ -29,8 +29,10 @@ procedure assertNotEquals(variable desc, variable a, variable b) begin end procedure report_test_results(variable desc) begin - display_msg("Done " + test_suite_assertions + - " assertions with " + test_suite_errors + " errors"); + + display_msg("DONE " + desc + " " + + (test_suite_assertions-test_suite_errors) + "/" + test_suite_assertions + ""); + display_msg("================"); if (test_suite_errors == 0) then begin float_msg(dude_obj, desc + " tests passed " +