aboutsummaryrefslogtreecommitdiff
path: root/kernel/names.mli
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/names.mli')
-rw-r--r--kernel/names.mli10
1 files changed, 9 insertions, 1 deletions
diff --git a/kernel/names.mli b/kernel/names.mli
index cdf8c8c83a..a50dc28c4d 100644
--- a/kernel/names.mli
+++ b/kernel/names.mli
@@ -111,13 +111,21 @@ module Spset : Set.S with type elt = section_path
module Sppred : Predicate.S with type elt = section_path
module Spmap : Map.S with type key = section_path
-(*s Specific paths for declarations *)
+(*s********************************************************************)
+(* type of global reference *)
+
type variable = section_path
type constant = section_path
type inductive = section_path * int
type constructor = inductive * int
type mutual_inductive = section_path
+type global_reference =
+ | VarRef of section_path
+ | ConstRef of constant
+ | IndRef of inductive
+ | ConstructRef of constructor
+
(* Hash-consing *)
val hcons_names : unit ->
(section_path -> section_path) * (section_path -> section_path) *