paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 01:48:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

powerpc-amiga: added some exec functions which will be required for some athreads rework

Browse Source 
git-svn-id: trunk@48253 -
This commit is contained in:
Károly Balogh 2021-01-21 03:04:20 +00:00
parent b88f9ad57c
commit 8ad127ca30
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/amiga/powerpc/execf.inc
View File

@ -35,6 +35,10 @@ function SetSignal(newSignals: longword; signalMask: longword): longword; syscal
procedure AddPort(port: PMsgPort); syscall IExec 300;
function CreateMsgPort(): PMsgPort; syscall IExec 308;
procedure DeleteMsgPort(Port: PMsgPort); syscall IExec 316;
function GetMsg(port: PMsgPort): PMessage; syscall IExec 324;
procedure PutMsg(port: PMsgPort; message: PMessage); syscall IExec 328;
procedure RemPort(port: PMsgPort); syscall IExec 332;
@ -58,6 +62,8 @@ procedure DropInterface(_interface: POS4Interface); syscall IExec 456;
function OpenDevice(devName: PChar; unitNumber: longword;ioRequest: PIORequest; flags: longword): longint; syscall IExec 504;
function CloseDevice(ioRequest: PIORequest): Pointer; syscall IExec 508;
function CreateIORequest(const IOReplyPort: PMsgPort; Size: LongWord): PIORequest; syscall IExec 512;
procedure DeleteIORequest(IORequest: PIORequest); syscall IExec 516;
function DoIO(ioRequest: PIORequest): shortint; syscall IExec 528;