anchor.diff:  var
     tickStream: TKMemoryStream;
   begin
  -  if (Self = nil) or not fEnabled then Exit;
  +  if not DoEnabled then Exit;
   
     fGameTick := aGameTick;
   
  
positive.code: var
    list: TList<TKMRngLogRecord>;
  begin
    if (Self = nil) or not fEnabled then Exit;
  
    if not fRngLog.TryGetValue(aTick, list) then
    begin
  
negative.code:     fRngLog: TDictionary<Cardinal, TKMRLRecordList>;
      fTickStreamQueue: TObjectQueue<TKMemoryStream>;
  
      function DoEnabled: Boolean;
  
      function GetCallerID(const aCaller: AnsiString; aValue: Extended; aValueType: TKMLogRngType): Byte;
      procedure AddRecordToList(aTick: Cardinal; const aRec: TKMRngLogRecord);
      procedure AddRecordToDict(aTick: Cardinal; const aRec: TKMRngLogRecord);
  