anchor.diff:  
   procedure PyDisableEventTimes;
   begin
  -  FreeAndNil(PyEventTimes);
  +  FreeAndNil(_EventTimes);
   end;
   
   function PyEventTimesReport: string;
  
positive.code:   i: integer;
    tick: PtrInt;
  begin
    Result:= IntToStr(PyEventTime div 10 * 10)+'ms (';
    for i:= 0 to PyEventTimes.Count-1 do
    begin
      tick:= PtrInt(PyEventTimes.Objects[i]);
      if tick<1 then Continue;
      if i>0 then
        Result+= ', ';
      Result+=
        Copy(PyEventTimes[i], 6, MaxInt)+' '+
        IntToStr(tick)+'ms';
    end;
    Result+= ')';
  
negative.code: 
    _LoadedLocals:= TStringList.Create;
    _LoadedModules:= TStringList.Create;
    _EventTimes:= TStringList.Create;
  
  finalization
  
    if Assigned(_EventTimes) then
      FreeAndNil(_EventTimes);
    FreeAndNil(_LoadedModules);
    FreeAndNil(_LoadedLocals);
  
  