From 3afaf3dde673d77cacaabc354f008dfbe49a7cee Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 24 Jul 2000 13:39:23 +0000 Subject: Passage à des contextes de vars et de rels pouvant contenir des déclarations git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@568 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/names.mli | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'kernel/names.mli') diff --git a/kernel/names.mli b/kernel/names.mli index 1ccf3c12ce..84b25d9cd6 100644 --- a/kernel/names.mli +++ b/kernel/names.mli @@ -5,7 +5,7 @@ open Pp (*i*) -(* Names. *) +(*s Identifiers *) type identifier type name = Name of identifier | Anonymous @@ -41,6 +41,7 @@ type path_kind = CCI | FW | OBJ val string_of_kind : path_kind -> string val kind_of_string : string -> path_kind +(*s Section paths *) type section_path val make_path : string list -> identifier -> path_kind -> section_path @@ -71,6 +72,7 @@ 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 +(*s Specific paths for declarations *) type inductive_path = section_path * int type constructor_path = inductive_path * int -- cgit v1.2.3