comp.lang.ada
 help / color / mirror / Atom feed
From: "Sune Falck" <Sune.Falck@telia.com>
Subject: Re: CPU time for Win32 & GNAT
Date: Fri, 12 Oct 2001 18:30:51 GMT
Date: 2001-10-12T18:30:51+00:00	[thread overview]
Message-ID: <vFGx7.40$Z_1.10396@newsc.telia.net> (raw)
In-Reply-To: 7eDx7.26122$ev2.34594@www.newsranger.com

If you want to fetch elapsed time, cpu time in user mode and cpu time in
kernel mode
have a look at the system call GetProcessTimes.

A sample:

...
      Created : aliased Win32.Winbase.FILETIME;
      Exited  : aliased Win32.Winbase.FILETIME;
      User    : aliased Win32.Winbase.FILETIME;
      Kernel  : aliased Win32.Winbase.FILETIME;

      Ok          : Win32.BOOL;
   begin
      Ok :=  Win32.Winbase.GetProcessTimes (Win32.Winbase.GetCurrentProcess,
                                            Created'Unchecked_Access,
                                            Exited'Unchecked_Access,
                                            User'Unchecked_Access,
                                            Kernel'Unchecked_Access);
...

Sune Falck






  reply	other threads:[~2001-10-12 18:30 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2001-10-12 11:21 CPU time for Win32 & GNAT Gautier
2001-10-12 13:50 ` Pat Rogers
2001-10-12 14:43   ` Ted Dennison
2001-10-12 14:48     ` Pat Rogers
2001-10-12 17:17       ` Ted Dennison
2001-10-12 14:36 ` Ted Dennison
2001-10-12 18:30   ` Sune Falck [this message]
  -- strict thread matches above, loose matches on Subject: below --
2001-10-14 19:54 Gautier Write-only-address
2001-10-15 14:33 ` Ted Dennison
2001-10-15  9:47 Gautier Write-only-address
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox