anchor.diff:  
     { Register the new list into the dictionary }
   {$WARNINGS OFF}
  +{$IFDEF FPC}
     FRulesByYear.Add(Pointer(AYear), Result);
  +{$ELSE}
  +  FRulesByYear.Add(AYear, Result);
  +{$ENDIF}
   {$WARNINGS ON}
   end;
   
  
positive.code: {$IFNDEF SUPPORTS_MONITOR}
    SyncObjs,
  {$ENDIF}
    Contnrs,
    IniFiles;
  
  resourcestring
  
negative.code:   try
  {$WARNINGS OFF}
      { Check if we have a cached list of matching rules for this date's year }
  {$IFDEF FPC}
      if not FRulesByYear.Find(Pointer(LYear), Pointer(LCompiledList)) then
  {$ELSE}
      if not FRulesByYear.TryGetValue(LYear, LCompiledList) then
  {$ENDIF}
        LCompiledList := CompileRulesForYear(LYear);
  {$WARNINGS ON}
  
  