You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Copy file name to clipboardExpand all lines: tests/unit/cdomains/threadIdDomainTest.ml
+5-4Lines changed: 5 additions & 4 deletions
Original file line number
Diff line number
Diff line change
@@ -58,7 +58,7 @@ let test_history_may_be_ancestor _ =
58
58
assert_equal true (may_be_ancestor main (main >> a >> a));
59
59
assert_equal true (may_be_ancestor main (main >> a >> b >> b));
60
60
assert_equal true (may_be_ancestor (main >> a) (main >> a >> b >> b));
61
-
(*TODO: added elements condition always true by construction in tests?*)
61
+
(*No false tests because added elements condition is always true by construction in unit test harness.*)
62
62
63
63
(* non-unique created by unique and is prefix: removed elements must be in set *)
64
64
assert_equal true (may_be_ancestor (main >> a) (main >> a >> a));
@@ -81,8 +81,8 @@ let test_history_may_be_ancestor _ =
81
81
assert_equal false (may_be_ancestor (main >> a >> b >> b) (main >> a >> c >> c)); (* from set *)(* 53-races-mhp/08-not-created6, also passes with simple may_be_ancestor *)
82
82
assert_equal false (may_be_ancestor (main >> a >> b >> b) (main >> b >> b)); (* from prefix *)(* infeasible for race: definitely_not_started requires (main >> a or main >> a >> b), where this must happen, to be must parent for (main >> b >> b), which it is not *)
83
83
(* non-unique creates non-unique: removed elements and set must be in new set *)
84
-
(*assert_equal false (may_be_ancestor (main >> a >> b >> c >> c) (main >> a >> c >> c)); *)
85
-
(*TODO: cannot test due because by construction after prefix check?*)
84
+
assert_equal false (may_be_ancestor (main >> a >> b >> c >> c) (main >> a >> c >> c));(* already fails previous condition*)
85
+
(*No false tests because already fails previous by construction in unit test harness.*)
86
86
(* non-unique creates non-unique *)
87
87
assert_equal true (may_be_ancestor (main >> a >> a) (main >> a >> a));
88
88
assert_equal true (may_be_ancestor (main >> a >> a) (main >> a >> a >> b));
@@ -94,7 +94,8 @@ let test_history_may_be_ancestor _ =
94
94
assert_equal true (may_be_ancestor (main >> a >> b >> b) (main >> b >> b >> a));
95
95
assert_equal true (may_be_ancestor (main >> a >> b >> b) (main >> b >> a >> b));
0 commit comments