Source position: calendarlite.pas line 385
procedure AddHoliday(
ADay: Integer;
var AHolidays: THolidays
);