diff options
| -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 a03a8c2466..9c7b627c87 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 -> |