diff options
Diffstat (limited to 'test/test_differential.ml')
| -rw-r--r-- | test/test_differential.ml | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/test/test_differential.ml b/test/test_differential.ml index 25a690d..8edde31 100644 --- a/test/test_differential.ml +++ b/test/test_differential.ml @@ -164,7 +164,7 @@ let allow_list_path = "../data/ef/expected-divergences.sexp" deliberately, after re-running the exact command the provenance note names -- never by copying the actual value back in to make a mismatch pass, which would defeat the point of pinning it at all. *) -let fixture_sha256 = "a3092e3f465c2a369ae060c2c310cd3087918b821ea839bf06276ab9d82a10ce" +let fixture_sha256 = "ab25fadc068f2833e6ce355474ca595ce54487e91fd9571d5ddf6bc7396b7eee" (* Same technique tools/bootstrap_sanctoral.ml already uses for this exact purpose (that file's own comment: shelling out to the system's @@ -1306,16 +1306,9 @@ let layer_c_reason (l : row) (c : row) diffs = filed there. See data/ef/expected-divergences.sexp's own closure note. *) else if String.equal c.slug good_friday_slug && diffs = [ First_f; Gospel_f; Colour_f ] then Some "C36" - else if List.mem c.slug violet_vigil_slugs && diffs = [ Colour_f ] then Some "C37" - else if - List.mem c.slug promoted_feast_slugs - && (diffs = [ Slug_f; Rank; First_f; Gospel_f ] - || diffs = [ Slug_f; Rank; First_f; Gospel_f; Colour_f ]) - then Some "C38" + else if List.mem c.slug promoted_feast_slugs && diffs = [ First_f; Gospel_f ] then Some "C38" else if List.mem c.slug holy_week_slugs && diffs = [ First_f; Gospel_f ] then Some "C23" else if String.equal c.slug passion_tuesday_slug && diffs = [ First_f; Gospel_f ] then Some "C26" - else if String.equal c.slug advent_ember_sat_slug && diffs = [ First_f; Gospel_f ] then Some "C27" - else if String.equal c.slug september_ember_sat_slug && diffs = [ First_f; Gospel_f ] then Some "C28" else None (* ---------------------------------------------------------------------- *) |