Processor time used by Emacs

Processor time used by Emacs

[Lars Brinkhoff]

Is there a way in Emacs Lisp to find out the amount of processor time
(perhaps separated into user/system time) spent by Emacs?

For example, if there was such a function called processor-time, this
should return (close to) 0:

        (let ((start (processor-time)))
          (sleep-for 10)
          (- (processor-time) start))

, whereas current-time would indicate that ten seconds passed
sleeping.

-- 
Lars Brinkhoff,         Services for Unix, Linux, GCC, HTTP
Brinkhoff Consulting    http://www.brinkhoff.se/

Re: Processor time used by Emacs

[Dan Anderson]

I don't know enough elisp to help you, but if you could execute a shell
command you could get the info simple enough:

% ps ax | grep emacs 

Then use a pipe or file to a program or file you want emacs to read
from.

-Dan

Re: Processor time used by Emacs

[David Kastrup]

Lars Brinkhoff <lars@nocrew.org> writes:

> Is there a way in Emacs Lisp to find out the amount of processor time
> (perhaps separated into user/system time) spent by Emacs?
> 
> For example, if there was such a function called processor-time, this
> should return (close to) 0:
> 
>         (let ((start (processor-time)))
>           (sleep-for 10)
>           (- (processor-time) start))
> 
> , whereas current-time would indicate that ten seconds passed
> sleeping.

(let ((start (current-time)))
  (sleep-for 10)
  (float-time (time-since start)))

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum

Re: Processor time used by Emacs

[Lars Brinkhoff]

David Kastrup <dak@gnu.org> writes:
> > Is there a way in Emacs Lisp to find out the amount of processor time
> > (perhaps separated into user/system time) spent by Emacs?
> > 
> > For example, if there was such a function called processor-time, this
> > should return (close to) 0:
> > 
> >         (let ((start (processor-time)))
> >           (sleep-for 10)
> >           (- (processor-time) start))
> > 
> > , whereas current-time would indicate that ten seconds passed
> > sleeping.
> 
> (let ((start (current-time)))
>   (sleep-for 10)
>   (float-time (time-since start)))

That would return (about) 10.0, right?  If so, time-since is not what
I need.

(My version of Emacs (20.7) doesn't have time-since, but I guess it's
the time-since function from Gnus.)

-- 
Lars Brinkhoff,         Services for Unix, Linux, GCC, HTTP
Brinkhoff Consulting    http://www.brinkhoff.se/