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

* make Dos.GetMsCount a dummy for embedded targets

Browse Source 
git-svn-id: trunk@33065 -
This commit is contained in:
florian 2016-02-07 11:16:39 +00:00
parent 328b6464ed
commit 0695c92b73
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/embedded/dos.pp
View File

@ -42,6 +42,8 @@ type
implementation implementation
{$define HAS_GETMSCOUNT}
{$I dos.inc} {$I dos.inc}
{****************************************************************************** {******************************************************************************
@ -132,12 +134,14 @@ procedure GetTime(Var Hour, Minute, Second, Sec100: Word);
begin begin
end; end;
Procedure SetTime(Hour, Minute, Second, Sec100: Word); Procedure SetTime(Hour, Minute, Second, Sec100: Word);
begin begin
end; end;
function GetMsCount: int64;
begin
result:=0;
end;
{****************************************************************************** {******************************************************************************
--- Exec --- --- Exec ---