diff options
| author | filliatr | 1999-08-17 14:05:47 +0000 |
|---|---|---|
| committer | filliatr | 1999-08-17 14:05:47 +0000 |
| commit | c85ed98ae100c524bb572ebbfd2f4228a11932be (patch) | |
| tree | b461527c8fb68d464f3cea9832787e8352421c10 /kernel/names.mli | |
| parent | 6b2bb43c4eb815af8f7128b2f2848157c6b020d7 (diff) | |
generic, term et evd
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9 85f007b7-540e-0410-9357-904b9bb8a0f7
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 5445065f7a..5d8791ba97 100644 --- a/kernel/names.mli +++ b/kernel/names.mli @@ -18,6 +18,7 @@ val index_of_id : identifier -> int val id_ord : identifier -> identifier -> int val id_without_number : identifier -> bool +module Idset : Set.S with type elt = identifier val lift_ident : identifier -> identifier val next_ident_away_from : identifier -> identifier list -> identifier @@ -27,6 +28,7 @@ val next_name_away_with_default : string -> name -> identifier list -> identifier val get_new_ids : int -> identifier -> identifier list -> identifier list +val id_of_name : identifier -> name -> identifier type path_kind = CCI | FW | OBJ @@ -58,6 +60,7 @@ val sp_ord : section_path -> section_path -> int val sp_gt : section_path * section_path -> bool module Spset : Set.S with type elt = section_path +module Spmap : Map.S with type key = section_path (* Hash-consing *) val hcons_names : unit -> |