diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-09-18 18:43:05 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-09-18 18:43:05 +0000 |
| commit | dfa78c4fdd1ec8755010b64ec5494f4efa71bd4d (patch) | |
| tree | f1c38c434447854d08ce4a07f8916e155f5d8c6e /translate/pptacticnew.ml | |
| parent | 213af2faacf3945bb8d67a53e635531331a0c1a5 (diff) | |
Traduction de Instantiate
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4414 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'translate/pptacticnew.ml')
| -rw-r--r-- | translate/pptacticnew.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/translate/pptacticnew.ml b/translate/pptacticnew.ml index a03a8c246..9c7b627c8 100644 --- a/translate/pptacticnew.ml +++ b/translate/pptacticnew.ml @@ -272,7 +272,7 @@ and pr_atom1 env = function hov 1 (str "lettac" ++ spc () ++ pr_id id ++ str " :=" ++ pr_constrarg env c ++ pr_clause_pattern pr_ident cl) | TacInstantiate (n,c) -> - hov 1 (str "instantiate" ++ pr_arg int n ++ pr_lconstrarg env c) + hov 1 (str "instantiate" ++ pr_arg int n ++ pr_constrarg env c) (* Derived basic tactics *) | TacOldInduction h -> |