* set the TinyHeapMinBlock const relative to the pointer size

git-svn-id: trunk@24521 -

rtl/inc/tinyheap.inc

@@ -14,7 +14,7 @@
  **********************************************************************}
 
     const
-      TinyHeapMinBlock = 16;
+      TinyHeapMinBlock = 4*sizeof(pointer);
 
     type
       PTinyHeapBlock = ^TTinyHeapBlock;