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

* small fixes to prototypes to compile it

Browse Source
This commit is contained in:
marco 2003-01-08 21:56:54 +00:00
parent 55a161bbbf
commit 4a0ec9ad00
1 changed files with 14 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
rtl/beos/sysutils.pp
View File

@ -44,7 +44,11 @@ BEGIN
end; end;
Function FileCreate (Const FileName : String) : Longint; Function FileCreate (Const FileName : String) : longint;
begin
end;
Function FileCreate (Const FileName : String;Mode:longint) : longint;
begin begin
end; end;
@ -59,7 +63,11 @@ begin
end; end;
Function FileSeek (Handle,FOffset,Origin : Longint) : Longint; Function FileSeek (Handle,FOffset,Origin : longint) : longint;
begin
end;
Function FileSeek (Handle:longint;FOffset,Origin : int64) : int64;
begin begin
end; end;
@ -128,12 +136,6 @@ Function RenameFile (Const OldName, NewName : String) : Boolean;
begin begin
end; end;
Function FileSearch (Const Name, DirList : String) : String;
begin
end;
{**************************************************************************** {****************************************************************************
Disk Functions Disk Functions
****************************************************************************} ****************************************************************************}
@ -258,7 +260,10 @@ Finalization
end. end.
{ {
$Log$ $Log$
Revision 1.3 2002-09-07 16:01:17 peter Revision 1.4 2003-01-08 21:56:54 marco
* small fixes to prototypes to compile it
Revision 1.3 2002/09/07 16:01:17 peter
* old logs removed and tabs fixed * old logs removed and tabs fixed
} }