diff options
| author | Pierre-Marie Pédrot | 2021-01-14 19:12:11 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2021-01-14 19:12:11 +0100 |
| commit | eb25e63d58555a67b74a046b8bdf2ab6252164c0 (patch) | |
| tree | b3deef1089255b400e66cb540c315d629aff4108 /engine/proofview.mli | |
| parent | b8a3ebaa9695596f062298f5913ae4f4debb0124 (diff) | |
| parent | 00a09f2cc4a8f4b6baeca0a474e5ab4062ff0f97 (diff) | |
Merge PR #13378: Add support for high resolution timeout functions
Ack-by: SkySkimmer
Ack-by: ejgallego
Reviewed-by: ppedrot
Diffstat (limited to 'engine/proofview.mli')
| -rw-r--r-- | engine/proofview.mli | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/engine/proofview.mli b/engine/proofview.mli index fe0d7ae51e..bf6021b1b6 100644 --- a/engine/proofview.mli +++ b/engine/proofview.mli @@ -418,7 +418,8 @@ val tclCHECKINTERRUPT : unit tactic (** [tclTIMEOUT n t] can have only one success. In case of timeout it fails with [tclZERO Tac_Timeout]. *) -val tclTIMEOUT : int -> 'a tactic -> 'a tactic +val tclTIMEOUTF : float -> 'a tactic -> 'a tactic +val tclTIMEOUT : int -> 'a tactic -> 'a tactic (** [tclTIME s t] displays time for each atomic call to t, using s as an identifying annotation if present *) |