diff options
| author | Hugo Herbelin | 2019-01-24 21:47:38 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2019-01-24 21:47:38 +0100 |
| commit | 6994539744e4ffaa4f622c8bccc66276e445ae9a (patch) | |
| tree | 947e51227ebd55ed24b9e52b4ad1aa2b71a480cc /printing | |
| parent | d79efa598d310b885c3472105d7d376f52dd3e50 (diff) | |
| parent | 63c7aa195022a908e0ee43d3cfb48c836405a835 (diff) | |
Merge PR #9325: Stop [Print] from saying [is (not) universe polymorphic].
Reviewed-by: maximedenes
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/prettyp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/prettyp.ml b/printing/prettyp.ml index c417ef8a66..408bd5f60b 100644 --- a/printing/prettyp.ml +++ b/printing/prettyp.ml @@ -267,7 +267,6 @@ let print_name_infos ref = print_ref true ref None; blankline] else [] in - print_polymorphism ref @ print_type_in_type ref @ print_primitive ref @ type_info_for_implicit @ @@ -838,6 +837,7 @@ let print_about_any ?loc env sigma k udecl = Dumpglob.add_glob ?loc ref; pr_infos_list (print_ref false ref udecl :: blankline :: + print_polymorphism ref @ print_name_infos ref @ (if Pp.ismt rb then [] else [rb]) @ print_opacity ref @ |