Răsfoiți Sursa

- removed markheap since it doesn't work anymore (since a long
time already in fact)

git-svn-id: trunk@2968 -

Jonas Maebe 19 ani în urmă
părinte
comite
b8e3723bb0
1 a modificat fișierele cu 0 adăugiri și 14 ștergeri
  1. 0 14
      rtl/inc/heaptrc.pp

+ 0 - 14
rtl/inc/heaptrc.pp

@@ -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
 *****************************************************************************}