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

+ removed handle checkin fileclose

Browse Source
This commit is contained in:
michael 2000-03-22 20:00:54 +00:00
parent afc3469620
commit 853e75626b
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/linux/filutil.inc
View File

@ -62,8 +62,6 @@ end;
Procedure FileClose (Handle : Longint); Procedure FileClose (Handle : Longint);
begin begin
if Handle<=4 then
exit;
fdclose(Handle); fdclose(Handle);
end; end;
@ -285,7 +283,10 @@ end;
{ {
$Log$ $Log$
Revision 1.15 2000-02-17 22:16:05 sg Revision 1.16 2000-03-22 20:00:54 michael
+ removed handle checkin fileclose
Revision 1.15 2000/02/17 22:16:05 sg
* Changed the second argument of FileWrite from "var buffer" to * Changed the second argument of FileWrite from "var buffer" to
"const buffer", like in Delphi. "const buffer", like in Delphi.