diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-04-07 17:19:41 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-04-07 17:19:41 +0000 |
| commit | 928287134ab9dd23258c395589f8633e422e939f (patch) | |
| tree | 192971793635b1057b78004b14df4ad5dfac9561 /tactics/dhyp.mli | |
| parent | c4ef643444acecdb4c08a74f37b9006ae060c5af (diff) | |
Globalisation des noms de tactiques dans les définitions de tactiques
pour compatibilité avec les modules.
Globalisation partielle des invocations de tactiques hors définitions
(partielle car noms des Intros/Assert/Inversion/... non connus).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3857 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/dhyp.mli')
| -rw-r--r-- | tactics/dhyp.mli | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tactics/dhyp.mli b/tactics/dhyp.mli index 2015f6053..b4ecfeac8 100644 --- a/tactics/dhyp.mli +++ b/tactics/dhyp.mli @@ -11,11 +11,13 @@ (*i*) open Names open Tacmach +open Tacexpr (*i*) (* Programmable destruction of hypotheses and conclusions. *) -val set_extern_interp : (Tacexpr.raw_tactic_expr -> tactic) -> unit +val set_extern_interp : (glob_tactic_expr -> tactic) -> unit +val set_extern_intern_tac : (raw_tactic_expr -> glob_tactic_expr) -> unit (* val dHyp : identifier -> tactic @@ -27,4 +29,4 @@ val h_auto_tdb : int option -> tactic val add_destructor_hint : identifier -> (bool,unit) Tacexpr.location -> - Topconstr.constr_expr -> int -> Tacexpr.raw_tactic_expr -> unit + Topconstr.constr_expr -> int -> raw_tactic_expr -> unit |