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

* Do not prefix with unit name unless necessary

Browse Source
This commit is contained in:
Michaël Van Canneyt 2024-02-27 09:44:31 +01:00
parent 8b40033964
commit 492717a25c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl-objpas/src/inc/fpmonitor.pp
View File

@ -247,7 +247,7 @@ begin
TimeToSleep:=SleepTime[Stage]; TimeToSleep:=SleepTime[Stage];
if aTimeout<TimeToSleep then if aTimeout<TimeToSleep then
TimeToSleep:=aTimeout; TimeToSleep:=aTimeout;
SysUtils.Sleep(TimeToSleep); Sleep(TimeToSleep);
end; end;
end; end;
TimeB:=GetTickCount64; TimeB:=GetTickCount64;