anchor.diff:  
   class function TPlatform.GetTickCount: TTickCount;
   begin
  -  Result := {$IFDEF CPU64}GetTickCount64{$ELSE}{$IFNDEF FPC}Windows.{$ELSE}SysUtils.{$ENDIF}GetTickCount{$ENDIF};
  +  Result := {$IFDEF CPU64}GetTickCount64{$ELSE}
  +   {$IFDEF FPC}System.GetTickCount{$ELSE}
  +     {$IFDEF MSWINDOWS}Windows.GetTickCount{$ELSE}
  +     TThread.GetTickCount;
  +     {$ENDIF}
  +   {$ENDIF}
  +  {$ENDIF}
   end;
   
   { TBytesBuffer }
  
positive.code:   SetLength(rbs,Length(Self));
    inc_i := Low(rbs) - Low(Self);
    for i:=Low(Self) to High(Self) do begin
      if (Self[i] in [32..126]) then rbs[i+inc_i] := AnsiChar(Self[i])
      else rbs[i+inc_i] := AnsiChar(126);
    end;
    Result := rbs;
  end;
  
negative.code: uses
    Classes, SysUtils;
  
  {$I config.inc}
  
  Type
    {$IFDEF NO_ANSISTRING}
      // When Delphi + Android, then no ANSISTRING available
      PAnsiChar = PByte;
      PPAnsiChar = ^PAnsiChar;
    {$ENDIF}
  
  
    // Raw data in a maximum 65k bytes
    TDynRawBytes = TBytes;
    // Raw data in a maximum 256 bytes
  