QueryPerformanceCounter precision

[Guest]

On 3/27/2021 at 12:01 AM, emailx45 said:

For managed code, the System.Diagnostics.Stopwatch class uses QPC as its precise time basis.

hi ALL, I have appoint that "QPC is ON STOPWATCH" since first answer for that topic....

Of course, @Mike Torrettinni want prove yourself that he have some theory better about measure time... as the engineers behind Microsoft or Embarcadero doesnt...

 

as always, the Mike-Topics are always polemics and generate many reply... in Youtube he would be richer. 

 

hug

[Mike Torrettinni 198]

7 minutes ago, emailx45 said:

Of course, @Mike Torrettinni want prove yourself that he have some theory better about measure time... as the engineers behind Microsoft or Embarcadero doesnt...

Eh, I'm just a Delphi rookie asking questions. I can only dream about being so knowledgeable or experienced to suggest anything to M. or E.

 

But it is interesting that so many factors affect simple 'precise' measurement. Not sure if anybody mentioned, but power usage plan on laptops also affects the QPC a lot!

Just tested on my 9 year old laptop and numbers are off the charts away from expected 😉

Edited March 30, 2021 by Mike Torrettinni
typo

[David Heffernan 2347]

7 minutes ago, emailx45 said:

hi ALL, I have appoint that "QPC is ON STOPWATCH" since first answer for that topic

No, that's not what you said. You were quoting an MS document that was talking about the .net System.Diagnostics.Stopwatch class.

[Guest]

1 minute ago, Mike Torrettinni said:

But it is interesting that so many factors affect simple 'precise' measurement. Not sure if anybody mentioned, but power usage plan on laptops also affects the QPC a lot!

Just tested on my 9 year old laptop and numbers of off the charts away from expected

hi @Mike Torrettinni

 

the power consume is descript on links in first anwser that I have post here... if you read the MS links you would know about it.

 

hug

[David Heffernan 2347]

3 minutes ago, Mike Torrettinni said:

Not sure if anybody mentioned, but power usage plan on laptops also affects the QPC a lot!

Well yeah, that's to be expected. And it's not just QPC. If the processor runs in a slower mode, then you code will be slower. And of course when you measure it, that will be reflected, no matter how you measure it.

[Guest]

TStopWatch...
  
System.Diagnostics.pas, line 101:
...class function TStopwatch.GetTimeStamp: Int64;  ...
    QueryPerformanceCounter(Result);
	
	
Winapi.Windows.pas, li ne 38622
function QueryPerformanceCounter; external kernel32 name 'QueryPerformanceCounter';	

Winapi.Windows.pas, line 38354
function GetTickCount; external kernel32 name 'GetTickCount';

 

hug

Edited March 30, 2021 by Guest

[David Heffernan 2347]

1 minute ago, emailx45 said:

TStopWatch...
  
System.Diagnostics.pas, line 101:
...class function TStopwatch.GetTimeStamp: Int64;  ...
    QueryPerformanceCounter(Result);
	
	
Winapi.Windows.pas, li ne 38622
function QueryPerformanceCounter; external kernel32 name 'QueryPerformanceCounter';	

 

hug

I don't think you understand. You talked about a .net class, but we are talking about the Delphi RTL.

[Guest]

System.pas, line 6340

procedure Randomize;
{$IFDEF MSWINDOWS}
var
  Counter: Int64;
begin
  if not QueryPerformanceCounter(Counter) then
    Counter := GetTickCount;
  RandomizeProc( (UInt64(Random(MAXINT)) shl 32) xor UInt64(Counter) );
end;
{$ENDIF MSWINDOWS}

Winapi.Windows.pas, line 11144
function QueryPerformanceCounter(var lpPerformanceCount: TLargeInteger): BOOL; stdcall;

 

hug

Edited March 30, 2021 by Guest

[David Heffernan 2347]

2 minutes ago, emailx45 said:

System.pas, line 6340

procedure Randomize;
{$IFDEF MSWINDOWS}
var
  Counter: Int64;
begin
  if not QueryPerformanceCounter(Counter) then
    Counter := GetTickCount;
  RandomizeProc( (UInt64(Random(MAXINT)) shl 32) xor UInt64(Counter) );
end;
{$ENDIF MSWINDOWS}

hug

That's nice. But it's off topic here.

[Guest]

      

 

https://docs.microsoft.com/en-us/windows/win32/api/profileapi/nf-profileapi-queryperformancecounter

Quote

BOOL QueryPerformanceCounter( LARGE_INTEGER *lpPerformanceCount );

 

hug

Edited March 30, 2021 by Guest

[Mike Torrettinni 198]

11 minutes ago, emailx45 said:

 

https://docs.microsoft.com/en-us/windows/win32/api/profileapi/nf-profileapi-queryperformancecounter

 

hug

What Delphi version is this? Does it say 200? Like 20.0?

Edited March 30, 2021 by Mike Torrettinni

[Attila Kovacs 629]

22 minutes ago, David Heffernan said:

If the processor runs in a slower mode, then you code will be slower.

I thought all the time he is comparing Δt's. What is the point to measure it in seconds?

[Guest]

13 minutes ago, Mike Torrettinni said:

What Delphi version is this? Does it say 200? Like 20.0?

Edited 3 minutes ago by Mike Torrettinni

First, as always I say, I never use "Program Files XX" (sytem folders) to install my softwares like RAD Studio.

• 200 = 20.0 = RAD Studio RIO == really, decimal dont help me here!
• look my profile icon on left = Delphi 10.3

Second, I dont think that 10.3 or 10.2 have some change about RTL sources and QPC use by M$ DLL external links, or more, before editions using this DLL... WinAPI

 

hug

Edited March 30, 2021 by Guest

[Mike Torrettinni 198]

14 hours ago, Stefan Glienke said:

Watch some videos by Chandler Carruth like these two:

At 17mins he says (paraphrasing): "This whole library has a pile of internal logic to run amazing numbers of iterations until we get something reasonably stable... and here we have example of 22Mio iterations to conclude this operation takes 32 nano seconds... and if I run it again you will some fluctuations..."

Wow.