Slightly better output for tests

This commit is contained in:
Vasilii Rogin
2025-06-01 14:08:18 +03:00
parent 22bd1ffbba
commit 161bb82f30
2 changed files with 5 additions and 3 deletions
+1 -1
View File
@@ -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);
+4 -2
View File
@@ -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 " +