Преглед на файлове

* Improve clarity of MR !1056

Michaël Van Canneyt преди 3 месеца
родител
ревизия
45df8cc902
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/vcl-compat/src/system.diagnostics.pp

+ 1 - 1
packages/vcl-compat/src/system.diagnostics.pp

@@ -178,7 +178,7 @@ var
 
 begin
   clock_gettime(CLOCK_MONOTONIC, @res);
-  Result:=((Int64(1000000000)*res.tv_sec)+res.tv_nsec) div 100;
+  Result:=((Int64(100*StopWatchResolution)*res.tv_sec)+res.tv_nsec) div 100;
 end;