diff options
| author | Hugo Herbelin | 2014-07-03 12:43:28 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2014-07-07 21:30:18 +0200 |
| commit | abad0a15ac44cb5b53b87382bb4d587d9800a0f6 (patch) | |
| tree | accb7680bdff39d8e9233f30c0fe8990eddac2a6 /proofs/proofview.mli | |
| parent | 8e767acc26cb2335f1a8dac3c4c184e2cc0b64c4 (diff) | |
time tac
Diffstat (limited to 'proofs/proofview.mli')
| -rw-r--r-- | proofs/proofview.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/proofs/proofview.mli b/proofs/proofview.mli index 6a2d815114..df833a04ff 100644 --- a/proofs/proofview.mli +++ b/proofs/proofview.mli @@ -261,6 +261,9 @@ exception Timeout In case of timeout if fails with [tclZERO Timeout]. *) val tclTIMEOUT : int -> 'a tactic -> 'a tactic +(** [tclTIME t] displays time for each atomic call to t *) +val tclTIME : 'a tactic -> 'a tactic + (** [mark_as_unsafe] signals that the current tactic is unsafe. *) val mark_as_unsafe : unit tactic |