diff options
Diffstat (limited to 'kernel/names.ml')
| -rw-r--r-- | kernel/names.ml | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/kernel/names.ml b/kernel/names.ml index 811672ba3d..3aa20400a1 100644 --- a/kernel/names.ml +++ b/kernel/names.ml @@ -314,7 +314,8 @@ module Spset = Set.Make(SpOrdered) module Sppred = Predicate.Make(SpOrdered) module Spmap = Map.Make(SpOrdered) -(* Special references for inductive objects *) +(*s********************************************************************) +(* type of global reference *) type variable = section_path type constant = section_path @@ -322,6 +323,12 @@ 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 of name objects *) module Hname = Hashcons.Make( struct |