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

arosunits: corrected some sycall offsets in amigados

Browse Source 
git-svn-id: trunk@28719 -
This commit is contained in:
marcus 2014-09-27 19:10:51 +00:00
parent a8aa619228
commit 76b40cdcb7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/arosunits/src/amigados.pas
View File

@ -2095,8 +2095,8 @@ function StrToLong(const String_: STRPTR; var Value: LongInt): LongInt; syscall
function SystemTagList(const Command: STRPTR; const Tags: PTagItem): LongInt; syscall AOS_DOSBase 101;
//function DOSSystem(const command : PChar;const Tags : PTagItem) : LongInt; //* Real: SystemTagList ???
function UnGetC(File_: BPTR; Character: LongInt): LongInt; syscall AOS_DOSBase 53;
procedure UnLoadSeg(Seglist: BPTR); syscall AOS_DOSBase 25;
function UnLock(Lock: BPTR): LongBool; syscall AOS_DOSBase 26;
procedure UnLoadSeg(Seglist: BPTR); syscall AOS_DOSBase 26;
function UnLock(Lock: BPTR): LongBool; syscall AOS_DOSBase 15;
procedure UnLockDosList(Flags: LongWord); syscall AOS_DOSBase 110;
function UnLockRecord(Fh: BPTR; Offset: LongWord; Length: LongWord): LongBool; syscall AOS_DOSBase 47;
function UnLockRecords(RecArray: PRecordLock): LongBool; syscall AOS_DOSBase 48;