diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-11-14 18:37:54 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-11-14 18:37:54 +0000 |
commit | e88e0b2140bdd2d194a52bc09f8338b5667d0f92 (patch) | |
tree | 67ca22f77ddb98725456e5f9a0b5ad613ae28da5 /tactics/tactics.mli | |
parent | e4efb857fa9053c41e4c030256bd17de7e24542f (diff) |
Réforme de l'interprétation des termes :
- Le parsing se fait maintenant via "constr_expr" au lieu de "Coqast.t"
- "Coqast.t" reste pour l'instant pour le pretty-printing. Un deuxième
pretty-printer dans ppconstr.ml est basé sur "constr_expr".
- Nouveau répertoire "interp" qui hérite de la partie interprétation qui
se trouvait avant dans "parsing" (constrintern.ml remplace astterm.ml;
constrextern.ml est l'équivalent de termast.ml pour le nouveau
printer; topconstr.ml; contient la définition de "constr_expr";
modintern.ml remplace astmod.ml)
- Libnames.reference tend à remplacer Libnames.qualid
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3235 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/tactics.mli')
-rw-r--r-- | tactics/tactics.mli | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/tactics/tactics.mli b/tactics/tactics.mli index ce31a4dcc..2e35c1761 100644 --- a/tactics/tactics.mli +++ b/tactics/tactics.mli @@ -96,7 +96,7 @@ val try_intros_until : val assumption : tactic val exact_no_check : constr -> tactic val exact_check : constr -> tactic -val exact_proof : Coqast.t -> tactic +val exact_proof : Topconstr.constr_expr -> tactic (*s Reduction tactics. *) @@ -121,12 +121,11 @@ val simpl_option : hyp_location option -> tactic val normalise_in_concl: tactic val normalise_in_hyp : hyp_location -> tactic val normalise_option : hyp_location option -> tactic -val unfold_in_concl : (int list * Closure.evaluable_global_reference) list - -> tactic +val unfold_in_concl : (int list * evaluable_global_reference) list -> tactic val unfold_in_hyp : - (int list * Closure.evaluable_global_reference) list -> hyp_location -> tactic + (int list * evaluable_global_reference) list -> hyp_location -> tactic val unfold_option : - (int list * Closure.evaluable_global_reference) list -> hyp_location option + (int list * evaluable_global_reference) list -> hyp_location option -> tactic val reduce : red_expr -> hyp_location list -> tactic val change : constr -> hyp_location list -> tactic |