Fixed Issue #15 (#19)

Improved the pattern match in run.sh to detect and suppress odin
test runner additional information on how to only run failed
tests.

Author: rmonnet

bin/run.sh

@@ -53,7 +53,7 @@ run_tests() {
 # remove text that can change from run to run, or from system to system.
 sanitize_odin_test_output() {
     gawk -v pwd="${PWD}/" '
-        /To run only the failed test,/ {exit}
+        /To run only the failed tests?,/ {exit}
         /Finished [[:digit:]]+ tests? in / { sub(/ in [[:digit:].]+.s/, "") }
         {
             gsub(pwd, "") # trim full paths from filenames

tests/multi-test-failures/expected_results.json

@@ -0,0 +1,54 @@
+{
+  "version": 3,
+  "status": "fail",
+  "tests": [
+    {
+      "name": "year not divisible by 4 in common year",
+      "status": "pass",
+      "test_code": "testing.expect(t, !is_leap_year(2015))"
+    },
+    {
+      "name": "year divisible by 2, not divisible by 4 in common year",
+      "status": "pass",
+      "test_code": "testing.expect(t, !is_leap_year(1970))"
+    },
+    {
+      "name": "year divisible by 4, not divisible by 100 in leap year",
+      "status": "pass",
+      "test_code": "testing.expect(t, is_leap_year(1996))"
+    },
+    {
+      "name": "year divisible by 4 and 5 is still a leap year",
+      "status": "pass",
+      "test_code": "testing.expect(t, is_leap_year(1960))"
+    },
+    {
+      "name": "year divisible by 100, not divisible by 400 in common year",
+      "message": "expected !is_leap_year(2100) to be true",
+      "status": "fail",
+      "test_code": "testing.expect(t, !is_leap_year(2100))"
+    },
+    {
+      "name": "year divisible by 100 but not by 3 is still not a leap year",
+      "message": "expected !is_leap_year(1900) to be true",
+      "status": "fail",
+      "test_code": "testing.expect(t, !is_leap_year(1900))"
+    },
+    {
+      "name": "year divisible by 400 is leap year",
+      "status": "pass",
+      "test_code": "testing.expect(t, is_leap_year(2000))"
+    },
+    {
+      "name": "year divisible by 400 but not by 125 is still a leap year",
+      "status": "pass",
+      "test_code": "testing.expect(t, is_leap_year(2400))"
+    },
+    {
+      "name": "year divisible by 200, not divisible by 400 in common year",
+      "message": "expected !is_leap_year(1800) to be true",
+      "status": "fail",
+      "test_code": "testing.expect(t, !is_leap_year(1800))"
+    }
+  ]
+}

tests/multi-test-failures/multi_test_failures.odin

@@ -0,0 +1,5 @@
+package multi_test_failures
+
+is_leap_year :: proc(year: int) -> bool {
+	return year % 400 == 0 || year % 4 == 0 && year % 100 != 1
+}

tests/multi-test-failures/multi_test_failures_test.odin

@@ -0,0 +1,57 @@
+package multi_test_failures
+
+import "core:testing"
+
+@(test)
+/// description = year not divisible by 4 in common year
+test_year_not_divisible_by_4_in_common_year :: proc(t: ^testing.T) {
+	testing.expect(t, !is_leap_year(2015))
+}
+
+@(test)
+/// description = year divisible by 2, not divisible by 4 in common year
+test_year_divisible_by_2_not_divisible_by_4_in_common_year :: proc(t: ^testing.T) {
+	testing.expect(t, !is_leap_year(1970))
+}
+
+@(test)
+/// description = year divisible by 4, not divisible by 100 in leap year
+test_year_divisible_by_4_not_divisible_by_100_in_leap_year :: proc(t: ^testing.T) {
+	testing.expect(t, is_leap_year(1996))
+}
+
+@(test)
+/// description = year divisible by 4 and 5 is still a leap year
+test_year_divisible_by_4_and_5_is_still_a_leap_year :: proc(t: ^testing.T) {
+	testing.expect(t, is_leap_year(1960))
+}
+
+@(test)
+/// description = year divisible by 100, not divisible by 400 in common year
+test_year_divisible_by_100_not_divisible_by_400_in_common_year :: proc(t: ^testing.T) {
+	testing.expect(t, !is_leap_year(2100))
+}
+
+@(test)
+/// description = year divisible by 100 but not by 3 is still not a leap year
+test_year_divisible_by_100_but_not_by_3_is_still_not_a_leap_year :: proc(t: ^testing.T) {
+	testing.expect(t, !is_leap_year(1900))
+}
+
+@(test)
+/// description = year divisible by 400 is leap year
+test_year_divisible_by_400_is_leap_year :: proc(t: ^testing.T) {
+	testing.expect(t, is_leap_year(2000))
+}
+
+@(test)
+/// description = year divisible by 400 but not by 125 is still a leap year
+test_year_divisible_by_400_but_not_by_125_is_still_a_leap_year :: proc(t: ^testing.T) {
+	testing.expect(t, is_leap_year(2400))
+}
+
+@(test)
+/// description = year divisible by 200, not divisible by 400 in common year
+test_year_divisible_by_200_not_divisible_by_400_in_common_year :: proc(t: ^testing.T) {
+	testing.expect(t, !is_leap_year(1800))
+}