diff options
| author | Arnaud Spiwack | 2015-06-25 14:55:07 +0200 |
|---|---|---|
| committer | Arnaud Spiwack | 2015-06-25 14:55:07 +0200 |
| commit | 0ae66237261b9810976eb2614dfda8e293e4b9ea (patch) | |
| tree | 0d0a2c51a3677e72dc8fcd0fb49a471d5d26ee36 /printing/pptactic.ml | |
| parent | 9420069e4d0bf3bf377c950bbc41ea762fbcfce8 (diff) | |
Remove useless `and_short_name` in interpreted level in `Tacexpr`.
Diffstat (limited to 'printing/pptactic.ml')
| -rw-r--r-- | printing/pptactic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/pptactic.ml b/printing/pptactic.ml index b8ad996aa3..1502884be7 100644 --- a/printing/pptactic.ml +++ b/printing/pptactic.ml @@ -1382,7 +1382,7 @@ module Make pr_lconstr = pr_lconstr_env env Evd.empty; pr_pattern = pr_pat_and_constr_expr (pr_glob_constr_env env); pr_lpattern = pr_pat_and_constr_expr (pr_lglob_constr_env env); - pr_constant = pr_and_short_name (pr_evaluable_reference_env env); + pr_constant = pr_evaluable_reference_env env; pr_reference = pr_located pr_ltac_constant; pr_name = pr_id; pr_generic = Genprint.generic_top_print; |