diff options
| author | Matthieu Sozeau | 2014-05-30 20:55:48 +0200 |
|---|---|---|
| committer | Matthieu Sozeau | 2014-06-04 15:48:31 +0200 |
| commit | dd96b1e5e8d0eb9f93cff423b6f9cf900aee49d7 (patch) | |
| tree | 70a184062496f64841ca013929a0622600ac1b2f /printing/ppconstr.ml | |
| parent | 0bbaba7bde67a8673692356c3b3b401b4f820eb7 (diff) | |
- Fix hashing of levels to get the "right" order in universe contexts etc...
- Add a tentative syntax for specifying universes: Type{"i"} and foo@{Type{"i"},Type{"j"}}.
These are always rigid.
- Use level-to-level substitutions where the more general level-to-universe substitutions
were previously used.
Diffstat (limited to 'printing/ppconstr.ml')
| -rw-r--r-- | printing/ppconstr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/ppconstr.ml b/printing/ppconstr.ml index 950594397a..019fad0ce8 100644 --- a/printing/ppconstr.ml +++ b/printing/ppconstr.ml @@ -119,7 +119,7 @@ let pr_qualid = pr_qualid let pr_patvar = pr_id let pr_universe_instance l = - pr_opt (pr_in_comment Univ.Instance.pr) l + pr_opt (pr_in_comment (prlist_with_sep spc pr_glob_sort)) l let pr_cref ref us = pr_reference ref ++ pr_universe_instance us |