diff options
| author | herbelin | 2003-01-21 18:45:37 +0000 |
|---|---|---|
| committer | herbelin | 2003-01-21 18:45:37 +0000 |
| commit | 9fc6e8201ea567a6b2c4ba115ce595791a67d336 (patch) | |
| tree | 4e2bc232a62a9954a6b4925d3ea6f1e0ec1625b8 /proofs/tactic_debug.mli | |
| parent | 7cb5aca864f2c65ffe2e4871385dc7dbbf762bde (diff) | |
Plus du tout de backtracking dans "Match term"; vrai Exit dans débogueur
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3566 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/tactic_debug.mli')
| -rw-r--r-- | proofs/tactic_debug.mli | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/proofs/tactic_debug.mli b/proofs/tactic_debug.mli index 1bb8a7f42d..9b542c7848 100644 --- a/proofs/tactic_debug.mli +++ b/proofs/tactic_debug.mli @@ -20,11 +20,10 @@ open Term type debug_info = | DebugOn of int | DebugOff - | Exit (* Prints the state and waits *) val debug_prompt : int -> goal sigma option -> Tacexpr.raw_tactic_expr -> - (debug_info -> 'a) -> (unit -> 'a) -> 'a + (debug_info -> 'a) -> 'a (* Prints a constr *) val db_constr : debug_info -> Environ.env -> constr -> unit |