Browse Source

Use macros for msdos OS to translate SysGetMem into SysTinyGetMem and similar, fixes several RTE 203 isssues for msdos target OS

git-svn-id: trunk@33682 -
pierre 9 years ago
parent
commit
fe6feb741b
1 changed files with 12 additions and 0 deletions
  1. 12 0
      rtl/inc/heaptrc.pp

+ 12 - 0
rtl/inc/heaptrc.pp

@@ -29,6 +29,18 @@ interface
   {$define windows}
   {$define windows}
 {$endif}
 {$endif}
 
 
+{$ifdef msdos}
+  {$macro on}
+  { msdos target OS uses tinyheap code }
+  {$define SysGetMem:=SysTinyGetMem}
+  {$define SysAllocMem:=SysTinyGetMem}
+  {$define SysFreeMem:=SysTinyFreeMem}
+  {$define SysFreeMemSize:=SysTinyFreeMemSize}
+  {$define SysMemSize:=SysTinyMemSize}
+  {$define SysTryResizeMem:=SysTinyTryResizeMem}
+  {$define SysGetFPCHeapStatus:=SysTinyGetFPCHeapStatus}
+  {$define SysGetHeapStatus:=SysTinyGetHeapStatus}
+{$endif}
 Procedure DumpHeap;
 Procedure DumpHeap;
 Procedure DumpHeap(SkipIfNoLeaks : Boolean);
 Procedure DumpHeap(SkipIfNoLeaks : Boolean);