module Timed_function:sig
..end
This module is here to add timeouts to any functions.
exception Timeout
This module is here to add timeouts to any functions.
val run : timeout:float ->
f:('a -> 'b) ->
sexp_of:('b -> Core.Std.Sexp.t) ->
of_sexp:(Core.Std.Sexp.t -> 'b) -> 'a -> 'b