From de7abebd102227bda6af04a3078479ea09db1da3 Mon Sep 17 00:00:00 2001 From: barras Date: Thu, 24 Jul 2008 16:02:39 +0000 Subject: broke cyclic dependencies git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11253 85f007b7-540e-0410-9357-904b9bb8a0f7 --- library/lib.mli | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'library/lib.mli') diff --git a/library/lib.mli b/library/lib.mli index 42a68f0ed..3e64a5290 100644 --- a/library/lib.mli +++ b/library/lib.mli @@ -166,9 +166,10 @@ val reset_initial : unit -> unit val set_xml_open_section : (Names.identifier -> unit) -> unit val set_xml_close_section : (Names.identifier -> unit) -> unit +type binding_kind = Explicit | Implicit (*s Section management for discharge *) -type variable_info = Names.identifier * Rawterm.binding_kind * Term.constr option * Term.types +type variable_info = Names.identifier * binding_kind * Term.constr option * Term.types type variable_context = variable_info list val instance_from_variable_context : variable_context -> Names.identifier array @@ -180,7 +181,7 @@ val section_segment_of_mutual_inductive: Names.mutual_inductive -> variable_cont val section_instance : Libnames.global_reference -> Names.identifier array val is_in_section : Libnames.global_reference -> bool -val add_section_variable : Names.identifier -> Rawterm.binding_kind -> Term.types option -> unit +val add_section_variable : Names.identifier -> binding_kind -> Term.types option -> unit val add_section_constant : Names.constant -> Sign.named_context -> unit val add_section_kn : Names.kernel_name -> Sign.named_context -> unit val replacement_context : unit -> -- cgit v1.2.3