Module Timing

Time measurement of computations.

val wrap : ?args:(string * Catapult.Tracing.arg) list -> string -> ('a -> 'b) -> 'a -> 'b