mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-23 00:09:31 +02:00
+ removed handle checkin fileclose
This commit is contained in:
parent
afc3469620
commit
853e75626b
@ -62,8 +62,6 @@ end;
|
||||
Procedure FileClose (Handle : Longint);
|
||||
|
||||
begin
|
||||
if Handle<=4 then
|
||||
exit;
|
||||
fdclose(Handle);
|
||||
end;
|
||||
|
||||
@ -285,7 +283,10 @@ end;
|
||||
|
||||
{
|
||||
$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
|
||||
"const buffer", like in Delphi.
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user