ProfilingΒΆ
In Emacs
elp-instrument-function
elp-instrument-package
In SBCL
(require :sb-sprof)
(defvar l '())
(dotimes (x 10000) (push (random 10) l))
(sb-sprof:with-profiling (:report :graph) (loop for x in l collect (* x 2)))
In Emacs
elp-instrument-function
elp-instrument-package
In SBCL
(require :sb-sprof)
(defvar l '())
(dotimes (x 10000) (push (random 10) l))
(sb-sprof:with-profiling (:report :graph) (loop for x in l collect (* x 2)))