COM.INFORMATIMAGO.CLMISC.RESOURCE-UTILIZATION
Display resource utilisation summary.
This package exports a macro that gather resource utilization statistics
and report them.
Usage:
(reporting-sru (:job-origin (remote-client) :stream (remote-stream))
(do-something-lengthy))
(reporting-sru (:job-origin (remote-client) :stream (remote-stream)
:report-to (lambda (cpu-time sys-time device-i/o paging-i/o
job-origin &key (stream t))
(SUMMARY-RESOURCE-UTILIZATION
cpu-time sys-time device-i/o paging-i/o
job-origin :stream stream)))
(do-something-lengthy))
Example:
(reporting-sru (:job-origin "REPL")
(asdf-load :com.informatimago.clext))
prints:
Summary of resource utilization
-------------------------------
CPU time: 0.300 sec Device I/O: 175
Overhead CPU: 0.012 sec Paging I/O: 1
CPU model: AMD Athlon(tm) Processor 6.4.2 1200.303 MHz (2402.66 bogomips)
Job origin: REPL