benchmark   macro


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/runtime/scheme.xtm

Implementation

(define-macro (benchmark expr)
  `(let* ((t (clock:clock))
          (res ,expr))
     (- (clock:clock) t)))


Back to Index