Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 618 → Rev 619

/programs/develop/fp/rtl/sysutils.pp
161,7 → 161,7
ReleaseFileRecord(Handle);
end;
 
function FileTruncate(Handle: THandle; Size: Longint): Boolean;
function FileTruncate(Handle: THandle; Size: Int64): Boolean;
begin
Result := False;
end;