paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-02-04 07:54:58 +01:00
Code Issues Packages Projects Releases Wiki Activity

- removed markheap since it doesn't work anymore (since a long

Browse Source 
time already in fact)

git-svn-id: trunk@2968 -
This commit is contained in:
Jonas Maebe 2006-03-19 16:44:18 +00:00
parent ad0ac6ef1f
commit b8e3723bb0
1 changed files with 0 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
rtl/inc/heaptrc.pp
View File

@ -22,7 +22,6 @@ interface
{$endif}
Procedure DumpHeap;
Procedure MarkHeap;
{ define EXTRA to add more
tests :
@ -964,19 +963,6 @@ begin
end;
procedure markheap;
var
pp : pheap_mem_info;
begin
pp:=heap_mem_root;
while pp<>nil do
begin
pp^.sig:=$AAAAAAAA;
pp:=pp^.previous;
end;
end;
{*****************************************************************************
AllocMem
*****************************************************************************}