diff options
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/eauto.ml4 | 2 | ||||
| -rw-r--r-- | tactics/inv.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tactics/eauto.ml4 b/tactics/eauto.ml4 index 2d18c36fee..3efa9b2186 100644 --- a/tactics/eauto.ml4 +++ b/tactics/eauto.ml4 @@ -345,7 +345,7 @@ ARGUMENT EXTEND hintbases | [ ] -> [ Some [] ] END -let pr_constr_coma_sequence prc _ _ = prlist_with_sep pr_coma prc +let pr_constr_coma_sequence prc _ _ = prlist_with_sep pr_comma prc ARGUMENT EXTEND constr_coma_sequence TYPED AS constr_list diff --git a/tactics/inv.ml b/tactics/inv.ml index 3130c1ca9b..e732a31c4c 100644 --- a/tactics/inv.ml +++ b/tactics/inv.ml @@ -50,7 +50,7 @@ let check_no_metas clenv ccl = errorlabstrm "inversion" (str ("Cannot find an instantiation for variable"^ (if List.length metas = 1 then " " else "s ")) ++ - prlist_with_sep pr_coma pr_name metas + prlist_with_sep pr_comma pr_name metas (* ajouter "in " ++ pr_lconstr ccl mais il faut le bon contexte *)) let var_occurs_in_pf gl id = |