paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 18:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* DosDevIOCtl prototype fixed, cdecl removed in DosSetFilePtr helper declaration

Browse Source
This commit is contained in:
Tomas Hajny 2000-10-26 20:07:19 +00:00
parent 7dc48bf946
commit 992275e5d4
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
rtl/os2/doscalls.pas
View File

@ -681,7 +681,7 @@ function DosSetFilePtr(Handle:Longint;Pos,Method:longint;
var PosActual:longint):Longint; cdecl; var PosActual:longint):Longint; cdecl;
{This variant seeks always from begin of file and does not return the {This variant seeks always from begin of file and does not return the
actual position.} actual position.}
function DosSetFilePtr(Handle:longint;Pos:longint):longint; cdecl; function DosSetFilePtr(Handle:longint;Pos:longint):longint;
{This variant returns the current filepointer.} {This variant returns the current filepointer.}
function DosGetFilePtr(Handle:longint;var PosActual:longint):longint; function DosGetFilePtr(Handle:longint;var PosActual:longint):longint;
@ -821,7 +821,7 @@ function DosQueryCurrentDir(DiskNum:longint;var Buffer:string):longint;
Receives size of the data returned by the device.} Receives size of the data returned by the device.}
function DosDevIOCtl(Handle,Category,Func:longint;var Params; function DosDevIOCtl(Handle,Category,Func:longint;var Params;
ParamLen:longint;var ParamSize:longint; ParamLen:longint;var ParamSize:longint;
var Data;var DataLen:longint;var DataSize: var Data;DataLen:longint;var DataSize:
longint):longint; cdecl; longint):longint; cdecl;
{**************************************************************************** {****************************************************************************
@ -2697,7 +2697,7 @@ function DosSetFilePtr(Handle:longint;Pos,Method:longint;
external 'DOSCALLS' index 256; external 'DOSCALLS' index 256;
function DosSetFilePtr(Handle:longint;Pos:longint):longint; cdecl; function DosSetFilePtr(Handle:longint;Pos:longint):longint;
var PosActual:longint; var PosActual:longint;
@ -2887,7 +2887,7 @@ end;
function DosDevIOCtl(Handle,Category,Func:longint;var Params; function DosDevIOCtl(Handle,Category,Func:longint;var Params;
ParamLen:longint;var ParamSize:longint; ParamLen:longint;var ParamSize:longint;
var Data;var DataLen:longint;var DataSize:longint):longint; cdecl; var Data;DataLen:longint;var DataSize:longint):longint; cdecl;
external 'DOSCALLS' index 284; external 'DOSCALLS' index 284;
@ -3949,7 +3949,10 @@ external 'DOSCALLS' index 582;
end. end.
{ {
$Log$ $Log$
Revision 1.4 2000-10-08 18:40:18 hajny Revision 1.5 2000-10-26 20:07:19 hajny
* DosDevIOCtl prototype fixed, cdecl removed in DosSetFilePtr helper declaration
Revision 1.4 2000/10/08 18:40:18 hajny
* wrong index for DosSelToFlat, DosFlatToSel * wrong index for DosSelToFlat, DosFlatToSel
Revision 1.3 2000/09/28 19:57:22 hajny Revision 1.3 2000/09/28 19:57:22 hajny