From e012b4fa237fd3b52bcad04d86ac0851d52898ed Mon Sep 17 00:00:00 2001
From: Jeppe Johansen <jeppe@j-software.dk>
Date: Sat, 4 Oct 2014 11:05:25 +0000
Subject: [PATCH] Inline calls to FindSize which removes a lot of unnecessary
 calls.

git-svn-id: trunk@28735 -
---
 rtl/embedded/heapmgr.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;