mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-22 10:01:33 +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;
|
||||
SysCall MOS_ExecBase 708;
|
||||
|
||||
function FreePooled(poolHeader: Pointer location 'a0';
|
||||
memory : Pointer location 'a1';
|
||||
memSize : Cardinal location 'd0'): Pointer;
|
||||
procedure FreePooled(poolHeader: Pointer location 'a0';
|
||||
memory : Pointer location 'a1';
|
||||
memSize : Cardinal location 'd0');
|
||||
SysCall MOS_ExecBase 714;
|
||||
|
||||
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
||||
|
@ -406,9 +406,9 @@ function AllocPooled(poolHeader: Pointer location 'a0';
|
||||
memSize : Cardinal location 'd0'): Pointer;
|
||||
SysCall AOS_ExecBase 708;
|
||||
|
||||
function FreePooled(poolHeader: Pointer location 'a0';
|
||||
memory : Pointer location 'a1';
|
||||
memSize : Cardinal location 'd0'): Pointer;
|
||||
procedure FreePooled(poolHeader: Pointer location 'a0';
|
||||
memory : Pointer location 'a1';
|
||||
memSize : Cardinal location 'd0');
|
||||
SysCall AOS_ExecBase 714;
|
||||
|
||||
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
||||
|
@ -403,9 +403,9 @@ function AllocPooled(poolHeader: Pointer location 'a0';
|
||||
memSize : Cardinal location 'd0'): Pointer;
|
||||
SysCall MOS_ExecBase 708;
|
||||
|
||||
function FreePooled(poolHeader: Pointer location 'a0';
|
||||
memory : Pointer location 'a1';
|
||||
memSize : Cardinal location 'd0'): Pointer;
|
||||
procedure FreePooled(poolHeader: Pointer location 'a0';
|
||||
memory : Pointer location 'a1';
|
||||
memSize : Cardinal location 'd0');
|
||||
SysCall MOS_ExecBase 714;
|
||||
|
||||
function AttemptSemaphoreShared(sigSem: pSignalSemaphore location 'a0'): Cardinal;
|
||||
|
Loading…
Reference in New Issue
Block a user