diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-03-08 02:44:21 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-03-08 17:40:23 +0100 |
| commit | 643e624909ecec7ba43326ff962b13c184991125 (patch) | |
| tree | efb6eb90e799f0322917103151a6185565de23c2 /kernel/names.mli | |
| parent | adcc15063fd917e7c93ee73cf43b15b667f98742 (diff) | |
Using HMaps in global references.
Diffstat (limited to 'kernel/names.mli')
| -rw-r--r-- | kernel/names.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/kernel/names.mli b/kernel/names.mli index a9da13399..b2a363174 100644 --- a/kernel/names.mli +++ b/kernel/names.mli @@ -243,6 +243,7 @@ sig (** Comparisons *) val compare : t -> t -> int val equal : t -> t -> bool + val hash : t -> int end module KNset : CSig.SetS with type elt = KerName.t @@ -412,10 +413,12 @@ val eq_ind : inductive -> inductive -> bool val ind_ord : inductive -> inductive -> int val ind_hash : inductive -> int val ind_user_ord : inductive -> inductive -> int +val ind_user_hash : inductive -> int val eq_constructor : constructor -> constructor -> bool val constructor_ord : constructor -> constructor -> int val constructor_user_ord : constructor -> constructor -> int val constructor_hash : constructor -> int +val constructor_user_hash : constructor -> int (** Better to have it here that in Closure, since required in grammar.cma *) type evaluable_global_reference = |