About timer.pas ...

About timer.pas ...

Hello,
 

Inside parallelhashlist.zip i have put a new timer.pas that compiles
correctly
under both Win32 and Win64, i have changed  the Tick method inside
timer.pas and added the 64 bits parts so  that it works correctly under

Win64:
 
Here is the new Tick method:  
 
----
 
function TLkBaseTimer.Tick: int64; register;
//asm
 // rdtsc;
//db
0fh, 31h
//end;
asm
  rdtsc
{$IFDEF CPU64}
  shl   rdx, 32
 
or    rax, rdx
{$ENDIF CPU64}
end; { GetCPUTimeStamp }
 
--
 
 
How to use the timer to time in microseconds ?
 
Like this:
 
Call Timestart() first like this:
 
HPT.Timestart;
 
and after that you can write the Time in microseconds like this
 
writeln('Time in microseconds: ',hpt.TimePeriod);
 
 
Please look inside test1.pas inside parallelhashlist.zip i have given you

an example on how to use timer.pas to time the throuput of your
multithreaded
program...
 
You can download parallelhashlist from:

http://pages.videotron.com/aminer/
 

Sincerely,
Amine Moulay Ramdane,
 

1 post / 0 new
For more complete information about compiler optimizations, see our Optimization Notice.