diff --git a/rtl/embedded/heapmgr.pp b/rtl/embedded/heapmgr.pp index 681bb1f6af..0c67a04b37 100644 --- a/rtl/embedded/heapmgr.pp +++ b/rtl/embedded/heapmgr.pp @@ -37,7 +37,7 @@ Unit heapmgr; procedure InternalFreeMem(Addr: Pointer; Size: ptruint); forward; - function FindSize(p: pointer): ptruint; + function FindSize(p: pointer): ptruint; inline; begin FindSize := PPtrUInt(p)[-1]; end;