aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/keys.mli
diff options
context:
space:
mode:
authorGravatar Matthieu Sozeau <matthieu.sozeau@inria.fr>2014-09-24 22:19:46 +0200
committerGravatar Matthieu Sozeau <matthieu.sozeau@inria.fr>2014-09-27 21:22:50 +0200
commita95210435f336d89f44052170a7c65563e6e35f2 (patch)
tree8af644805f9ab0952b87adf0abb13315cc3b7869 /library/keys.mli
parentad2e11471dbfc0894b4fdfedd895e7f0a75bd930 (diff)
Index keys instead of simply global references.
Diffstat (limited to 'library/keys.mli')
-rw-r--r--library/keys.mli9
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. *)