Execution profiling and performance measurement
(scm profiling) measures where time goes: instrument procedures, run your workload, then read or print a report of call counts and timings. Uninstrument to restore normal execution.
(import (scm profiling))
(profile-reset!)
(profile-instrument!) ;; start collecting
;; ... run the code you want to measure ...
(profile-report) ;; print a report
(profile-uninstrument!) ;; stop collectingprofile-data returns the raw measurements if you'd rather format them yourself.
5 bindings
Syntax: (profile-data)
Library: (scm profiling)
Description: Returns profiling data as a list of lists, each of the
form (name calls total-jiffies), sorted by total-jiffies descending.
Example:
(profile-data)
=> (("(my lib):proc-a" 1000 4523400) ...)
Syntax: (profile-instrument! spec ...) Library: (scm profiling) Description: Instruments procedures for profiling. Each spec is a list whose car is a library name (as a list of symbols). The remaining elements are symbols naming the procedures to instrument. If no symbols are given, all procedures defined in the library are instrumented (including primitives bound in the library, but excluding imported bindings). Example: (profile-instrument! '((scheme base) map for-each)) (profile-instrument! '((my lib)))
Syntax: (profile-report)
(profile-report port)
Library: (scm profiling)
Description: Prints a formatted profiling report showing procedure
name, call count, total time in ms, average time in ms, and
percentage of total time. Output goes to the current output port
or to the given port.
Example:
(profile-report)
Syntax: (profile-reset!) Library: (scm profiling) Description: Resets all profiling counters and durations to zero. Instrumented procedures remain in place. Example: (profile-reset!)
Syntax: (profile-uninstrument!) Library: (scm profiling) Description: Removes all instrumentation, restoring the original procedures. Clears all profiling data. Example: (profile-uninstrument!)