Ver Fonte

atari: use gemdos malloc/free as underlying functions for the heap

git-svn-id: trunk@34616 -
Károly Balogh há 8 anos atrás
pai
commit
5cec4b565b
1 ficheiros alterados com 3 adições e 1 exclusões
  1. 3 1
      rtl/atari/sysheap.inc

+ 3 - 1
rtl/atari/sysheap.inc

@@ -17,13 +17,15 @@
       OS Memory allocation / deallocation
  ****************************************************************************}
 
+
 function SysOSAlloc(size: ptruint): pointer;
 begin
-  Result:=nil;
+  Result:=gemdos_malloc(size);
 end;
 
 {$define HAS_SYSOSFREE}
 
 procedure SysOSFree(p: pointer; size: ptruint);
 begin
+  gemdos_free(p);
 end;