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

* fix compilation of arm-embedded, resolves #36626

Browse Source 
git-svn-id: trunk@44034 -
(cherry picked from commit 5aaf68b088)
This commit is contained in:
florian 2020-01-25 14:59:28 +00:00 committed by marcoonthegit
parent d35d69b851
commit 716a9c641d
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/embedded/sysutils.pp
View File

@ -52,13 +52,13 @@ begin
result := -1; result := -1;
end; end;
function FileGetDate(Handle: THandle) : Int64; function FileGetDate(Handle: THandle) : TOSTimestamp;
begin begin
result := -1; result := -1;
end; end;
function FileSetDate(Handle: THandle; Age: LongInt) : Longint; function FileSetDate(Handle: THandle; Age: TOSTimestamp) : Longint;
begin begin
result := -1; result := -1;
end; end;
@ -128,7 +128,7 @@ begin
end; end;
Function FileAge (Const FileName : RawByteString): Int64; Function FileAge (Const FileName : RawByteString): TOSTimestamp;
begin begin
result := -1; result := -1;
end; end;