diff options
| author |  Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2015-01-17 20:17:17 +0530 |
|---|---|---|
| committer | Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2015-01-17 20:17:17 +0530 |
| commit | 3bcca0aecb368a723d247d1f8b2348790bc87035 (patch) | |
| tree | 81dbfb0613e67109887e9121e3d984bf752aa4ab /printing/pptactic.ml | |
| parent | 014878c3a05365d4af7e3edcfc8d612c45fdf1f3 (diff) | |
Univs: proper printing of global and local universe names (only
printing functions touched in the kernel).
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 7cc193a8d..f8264e5af 100644 --- a/printing/pptactic.ml +++ b/printing/pptactic.ml @@ -1451,7 +1451,7 @@ let () = (pr_clauses (Some true) (fun id -> pr_lident (Loc.ghost,id))) ; Genprint.register_print0 Constrarg.wit_sort - pr_glob_sort pr_glob_sort pr_sort; + pr_glob_sort pr_glob_sort (pr_sort Evd.empty); Genprint.register_print0 Constrarg.wit_uconstr Ppconstr.pr_constr_expr |