Add pspy times

This commit is contained in:
Peter Taoussanis 2014-02-26 12:59:14 +07:00
parent 1153ed4dfd
commit 6117b3b18d
1 changed files with 6 additions and 0 deletions

View File

@ -30,6 +30,12 @@
(defmacro p [id & body] `(pspy ~id ~@body)) ; Alias
(comment
(time (dotimes [_ 1000000])) ; ~20ms
;; Note that times are ~= for `pspy` as a pure macro and as a `pspy*` fn caller:
(time (dotimes [_ 1000000] (pspy :foo))) ; ~300ms
)
(declare pdata-stats format-pdata)
(defmacro with-pdata [level & body]