龟速的malloc和神速的FastMM

最新推荐文章于 2021-05-15 04:45:31 发布

linzhengqun

最新推荐文章于 2021-05-15 04:45:31 发布

阅读量2.4k

点赞数

分类专栏： Delphi C++ 文章标签： delphi integer 多线程测试工作优化

本文链接：https://blog.csdn.net/linzhengqun/article/details/7035855

版权

这篇博客探讨了在Delphi项目中使用FastMM内存管理器与C++的Malloc在处理大量小对象创建和释放时的效率差异。通过测试发现，FastMM通过预置内存池提高了分配和回收小块内存的效率，减少了内存浪费。作者还转换了测试代码到C++，以比较两者的表现。

摘要由CSDN通过智能技术生成

由于在Delphi项目中，要频繁创建和释放大量小对象，因此担心有效率问题，于是打于GetMem.inc看看，发现FastMM对于小块内存作了很多工作，它预置了一组不同大小的内存池，当要创建一块内存时，FastMM找到大小最相近的内存池分配之，内存释放后回收到池中。这样的做法虽有小量内存浪费，但效率却是大大提高。

我决定做一个测试，看看效率研究如何：

  const
    cSize: Integer = 100;
    cNum: Integer = 10000;
  var
    N, I: Integer;
    P: array [0..9999] of Pointer;
    Fre: Int64;
    Count1, Count2: Int64;
    Time: Double;
  begin
    QueryPerformanceFrequency(Fre);
    QueryPerformanceCounter(Count1);

    for I := 0 to 1000 - 1 do
    begin
      for N := 0 to cNum - 1 do
        GetMem(P[N], cSize);
      for N := 0 to cNum - 1 do
        FreeMem(P[N]);
    end;

    QueryPerformanceCounter(Count2);
    Time := (Count2 - Count1) / Fre;
    Writeln(Format('Delphi2007 Release: %f', [Time]));
  end.

上面例子中，循环1000次，每次循环分别创建和释放10000个100字节的内存块，运行结果如下