mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-23 13:14:24 +02:00
amiga/morphos: fix freepooled(), it has no return value
git-svn-id: trunk@44426 -
This commit is contained in:
parent
c7136b59c7
commit
f69c099cfe
@ -2136,9 +2136,9 @@ function AllocPooled(poolHeader: Pointer location 'a0';
|
|||||||
memSize : Cardinal location 'd0'): Pointer;
|
memSize : Cardinal location 'd0'): Pointer;
|
||||||
SysCall MOS_ExecBase 708;
|
SysCall MOS_ExecBase 708;
|
||||||
|
|
||||||
function FreePooled(poolHeader: Pointer location 'a0';
|
procedure FreePooled(poolHeader: Pointer location 'a0';
|
||||||
memory : Pointer location 'a1';
|
memory : Pointer location 'a1';
|
||||||
memSize : Cardinal location 'd0'): Pointer;
|
memSize : Cardinal location 'd0');
|
||||||
SysCall MOS_ExecBase 714;
|
SysCall MOS_ExecBase 714;
|
||||||
|
|
||||||
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
||||||
|
@ -406,9 +406,9 @@ function AllocPooled(poolHeader: Pointer location 'a0';
|
|||||||
memSize : Cardinal location 'd0'): Pointer;
|
memSize : Cardinal location 'd0'): Pointer;
|
||||||
SysCall AOS_ExecBase 708;
|
SysCall AOS_ExecBase 708;
|
||||||
|
|
||||||
function FreePooled(poolHeader: Pointer location 'a0';
|
procedure FreePooled(poolHeader: Pointer location 'a0';
|
||||||
memory : Pointer location 'a1';
|
memory : Pointer location 'a1';
|
||||||
memSize : Cardinal location 'd0'): Pointer;
|
memSize : Cardinal location 'd0');
|
||||||
SysCall AOS_ExecBase 714;
|
SysCall AOS_ExecBase 714;
|
||||||
|
|
||||||
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
||||||
|
@ -403,9 +403,9 @@ function AllocPooled(poolHeader: Pointer location 'a0';
|
|||||||
memSize : Cardinal location 'd0'): Pointer;
|
memSize : Cardinal location 'd0'): Pointer;
|
||||||
SysCall MOS_ExecBase 708;
|
SysCall MOS_ExecBase 708;
|
||||||
|
|
||||||
function FreePooled(poolHeader: Pointer location 'a0';
|
procedure FreePooled(poolHeader: Pointer location 'a0';
|
||||||
memory : Pointer location 'a1';
|
memory : Pointer location 'a1';
|
||||||
memSize : Cardinal location 'd0'): Pointer;
|
memSize : Cardinal location 'd0');
|
||||||
SysCall MOS_ExecBase 714;
|
SysCall MOS_ExecBase 714;
|
||||||
|
|
||||||
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
||||||
|
Loading…
Reference in New Issue
Block a user