diff options
author | Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2014-09-24 22:19:46 +0200 |
---|---|---|
committer | Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2014-09-27 21:22:50 +0200 |
commit | a95210435f336d89f44052170a7c65563e6e35f2 (patch) | |
tree | 8af644805f9ab0952b87adf0abb13315cc3b7869 /library/keys.mli | |
parent | ad2e11471dbfc0894b4fdfedd895e7f0a75bd930 (diff) |
Index keys instead of simply global references.
Diffstat (limited to 'library/keys.mli')
-rw-r--r-- | library/keys.mli | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/library/keys.mli b/library/keys.mli index 4e6a803e4..87ba45558 100644 --- a/library/keys.mli +++ b/library/keys.mli @@ -8,8 +8,13 @@ open Globnames -val declare_keys : global_reference -> global_reference -> unit +type key + +val declare_keys : key -> key -> unit (** Declare two keys as being equivalent. *) -val equiv_keys : global_reference -> global_reference -> bool +val equiv_keys : key -> key -> bool (** Check equivalence of keys. *) + +val constr_key : Term.constr -> key +(** Compute the head key of a term. *) |