diff --git a/rtl/inc/heaptrc.pp b/rtl/inc/heaptrc.pp index d2347bdb19..cdac4bb7b8 100644 --- a/rtl/inc/heaptrc.pp +++ b/rtl/inc/heaptrc.pp @@ -726,6 +726,7 @@ var var etext: ptruint; external name '_etext'; edata : ptruint; external name '_edata'; + eend : ptruint; external name '_end'; {$endif} @@ -774,8 +775,8 @@ begin if (ptruint(p)>ptruint(get_frame)) and (ptruint(p)<$c0000000) then //todo: 64bit! goto _exit; - { inside data ? } - if (ptruint(p)>=ptruint(@etext)) and (ptruint(p)=ptruint(@etext)) and (ptruint(p)