diff options
author | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2007-07-04 19:46:47 +0000 |
---|---|---|
committer | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2007-07-04 19:46:47 +0000 |
commit | f97ca2bcc9802825fadf6def028bd33d25bdc9bb (patch) | |
tree | 9d2ab069772bf3b11ab523d758ab6cb15b27d5c4 /rtl/macos | |
parent | 25a4bef12d0ac2db0b30b9a5486cd58a40df296b (diff) | |
download | fpc-f97ca2bcc9802825fadf6def028bd33d25bdc9bb.tar.gz |
* Convert heap to ptruint.
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@7950 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/macos')
-rw-r--r-- | rtl/macos/sysheap.inc | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/rtl/macos/sysheap.inc b/rtl/macos/sysheap.inc index 2f1c44c79e..0fc7b68011 100644 --- a/rtl/macos/sysheap.inc +++ b/rtl/macos/sysheap.inc @@ -19,18 +19,15 @@ { function to allocate size bytes more for the program } { must return the first address of new data space or nil if failed } -function SysOSAlloc(size: ptrint): pointer; +function SysOSAlloc(size: ptruint): pointer; begin result := NewPtr(size); end; {$define HAS_SYSOSFREE} -procedure SysOSFree(p: pointer; size: ptrint); +procedure SysOSFree(p: pointer; size: ptruint); begin DisposePtr(p); end; - - - |