diff options
Diffstat (limited to 'test/test_sanctoral_ef.ml')
| -rw-r--r-- | test/test_sanctoral_ef.ml | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/test/test_sanctoral_ef.ml b/test/test_sanctoral_ef.ml index ebf96dc..5c46edf 100644 --- a/test/test_sanctoral_ef.ml +++ b/test/test_sanctoral_ef.ml @@ -47,7 +47,13 @@ let test_load_and_counts () = let commemoration_only = List.filter (fun e -> e.L.cel.Cel.status = Cel.Commemoration_only) l.L.entries in - Alcotest.(check int) "104 Commemoration_only" 104 (List.length commemoration_only); + (* 102, not 104: ef-sanctoral-status promoted `ubaldus` (16 May) and + `didacus` (13 November) to Feast. Both are ranked "III classis" outright + in the Missal's own universal calendarium, with no commemoration rubric, + and both have their own Mass entry in the Proprium taking its readings + from a Common. They were the ONLY two defects found by auditing all 290 + fixed-date entries against that calendarium -- see the register. *) + Alcotest.(check int) "102 Commemoration_only" 102 (List.length commemoration_only); let class1 = List.filter (fun e -> e.L.cel.Cel.rank = V.Class1) l.L.entries in Alcotest.(check int) "12 Class1" 12 (List.length class1); let temporal_subjects = List.filter (fun e -> e.L.cel.Cel.subject = Sub.Temporal) l.L.entries in |