mirror of
https://github.com/peklaiho/madlisp.git
synced 2024-10-18 13:02:04 +00:00
3 lines
97 B
Plaintext
3 lines
97 B
Plaintext
|
;; Measure how long it takes to execute f
|
||
|
(defn timer (f) (let (st (mtime)) (f) (- (mtime) st)))
|