TMemoryManagerState = packed record
  SmallBlockTypeStates: TSmallBlockTypeStates;
  AllocatedMediumBlockCount: Cardinal;
  TotalAllocatedMediumBlockSize: Cardinal;
  ReservedMediumBlockAddressSpace: Cardinal;
  AllocatedLargeBlockCount: Cardinal;
  TotalAllocatedLargeBlockSize: Cardinal;
  ReservedLargeBlockAddressSpace: Cardinal;
end;

struct TMemoryManagerState {
  TSmallBlockTypeStates SmallBlockTypeStates;
  unsigned AllocatedMediumBlockCount;
  unsigned TotalAllocatedMediumBlockSize;
  unsigned ReservedMediumBlockAddressSpace;
  unsigned AllocatedLargeBlockCount;
  unsigned TotalAllocatedLargeBlockSize;
  unsigned ReservedLargeBlockAddressSpace;
};