anchor.diff:  {$ifend}
   type
     PMemoryMgr = {$ifdef MEMORYMANAGEREX}^TMemoryManagerEx{$else}^TMemoryManager{$endif};
  +{$ifdef MSWINDOWS}
  +const
  +  BRAINMM_MARKER: array[1..15] of AnsiChar = 'BrainMM_Marker_';
  +  HEX_CHARS: array[0..15] of AnsiChar = '0123456789ABCDEF';
  +var
  +  i: Integer;
  +  ProcessId: Cardinal;
  +  Buffer: array[0..SizeOf(BRAINMM_MARKER) + 8] of AnsiChar;
  +  Handle: HWND;
  +  BrainMMRegistered: ^TBrainMemoryManager;
  +{$endif}
   begin
     InitializeOffsetsMedium;
   
  
positive.code:   {$if Defined(FPC) or (CompilerVersion >= 18)}
      {$define OPERATORSUPPORT}
    {$ifend}
  {$else}
    {$define CPUINTEL}
    {$define SMALLINT}
  
negative.code:   end;
  
    TBrainMemoryManager = packed record
    case Integer of
      0: (
          BrainMM: packed record
            GetMemoryBlock: function(BlockSize: TMemoryBlockSize; PagesMode: NativeUInt): MemoryBlock;
            FreeMemoryBlock: function(Block: MemoryBlock; PagesMode: NativeUInt): Boolean;
            GetMemoryPages: function(Count: NativeUInt; PagesMode: NativeUInt): MemoryPages;
            RegetMemoryPages: function(Pages: MemoryPages; NewCount: NativeUInt; PagesMode: NativeUInt): MemoryPages;
            ReallocMemoryPages: function(Pages: MemoryPages; NewCount: NativeUInt; PagesMode: NativeUInt): MemoryPages;
            FreeMemoryPages: function(Pages: MemoryPages; PagesMode: NativeUInt): Boolean;
            Reserved: array[1..4] of Pointer;
            GetMemAligned: function(Align: TMemoryAlign; Size: NativeUInt): Pointer;
            RegetMem: function(P: Pointer; NewSize: NativeUInt): Pointer;
          end;
          Standard: packed record
            GetMem: function(Size: NativeUInt): Pointer;
            FreeMem: function(P: Pointer): Integer;
            ReallocMem: function(P: Pointer; NewSize: NativeUInt): Pointer;
            AllocMem: function(Size: NativeUInt): Pointer;
            RegisterExpectedMemoryLeak: function(P: Pointer): Boolean;
            UnregisterExpectedMemoryLeak: function(P: Pointer): Boolean;
            Reserved: array[1..4] of Pointer;
          end;
         );
      1: (POINTERS: array[1..22] of Pointer);
    end;
  
  var
  