paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 10:58:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merge branch 'heap' into 'main'

Browse Source 
heap.inc with incremental formatting and instant recycling of fixed chunks.

See merge request freepascal.org/fpc/source!694
This commit is contained in:
Rika 2025-04-04 01:49:45 +03:00
commit 39d99f84ba
2 changed files with 1491 additions and 1444 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2929
rtl/inc/heap.inc
View File

File diff suppressed because it is too large Load Diff

6
rtl/inc/heaph.inc
View File

@ -97,12 +97,12 @@ Procedure Freememory(p:pointer;Size:ptruint);
Function MemSize(p:pointer):ptruint;
{ Delphi functions }
function GetMem(size:ptruint):pointer;
function GetMem(size:ptruint):pointer; inline;
function GetMemory(size:ptruint):pointer; cdecl;
function Freemem(p:pointer):ptruint;
function Freemem(p:pointer):ptruint; inline;
function Freememory(p:pointer):ptruint; cdecl;
function AllocMem(Size:ptruint):pointer;
function ReAllocMem(var p:pointer;Size:ptruint):pointer;
function ReAllocMem(var p:pointer;Size:ptruint):pointer; inline;
function ReAllocMemory(p:pointer;Size:ptruint):pointer; cdecl;
function GetHeapStatus:THeapStatus;
function GetFPCHeapStatus:TFPCHeapStatus;