diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2015-01-16 22:17:03 +0100 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2015-01-17 08:02:45 +0100 |
commit | 9f5586d88880cbb98c92edfe9c33c76564f1a19c (patch) | |
tree | 6de2a171eff5706b0e4ce9268554b84a922f12b3 /kernel/univ.mli | |
parent | 4985f0ff99278beb3b934f86edf1398659c611a8 (diff) |
Make native compiler handle universe polymorphic definitions.
One remaining issue: aliased constants raise an anomaly when some unsubstituted
universe variables remain. VM may suffer from the same problem.
Diffstat (limited to 'kernel/univ.mli')
-rw-r--r-- | kernel/univ.mli | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/kernel/univ.mli b/kernel/univ.mli index 454134f21..490ec0369 100644 --- a/kernel/univ.mli +++ b/kernel/univ.mli @@ -27,6 +27,8 @@ sig val equal : t -> t -> bool (** Equality function *) + val hash : t -> int + val make : Names.DirPath.t -> int -> t (** Create a new universe level from a unique identifier and an associated module path. *) @@ -35,6 +37,8 @@ sig (** Pretty-printing *) val var : int -> t + + val var_index : t -> int option end type universe_level = Level.t |