From f350cd8cb53e675a5793336b9b17c4749fa474b8 Mon Sep 17 00:00:00 2001
From: msozeau
Date: Fri, 30 May 2008 12:41:39 +0000
Subject: Improvements on coqdoc by adding more information into .glob files,
 about definitions and type of references. - Add missing location information
 on fixpoints/cofixpoint in topconstr and syntactic definitions in
 vernacentries for correct dumping. - Dump definition information in
 vernacentries: defs, constructors, projections etc... - Modify
 coqdoc/index.mll to use this information instead of trying to scan the file.
 - Use the type information in latex output, update coqdoc.sty accordingly. -
 Use the hyperref package to do crossrefs between definition and   references
 to coq objects in latex.

Next step is to test and debug it on bigger developments.

On the side:
- Fix Program Let which was adding a Global definition. 
- Correct implicits for well-founded Program Fixpoints.
- Add new [Method] declaration kind.


git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11024 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 library/decl_kinds.ml  | 5 ++++-
 library/decl_kinds.mli | 1 +
 2 files changed, 5 insertions(+), 1 deletion(-)

(limited to 'library')

diff --git a/library/decl_kinds.ml b/library/decl_kinds.ml
index 20808f1e6e..735a8fb074 100644
--- a/library/decl_kinds.ml
+++ b/library/decl_kinds.ml
@@ -40,6 +40,7 @@ type definition_object_kind =
   | StructureComponent
   | IdentityCoercion
   | Instance
+  | Method
 
 type assumption_object_kind = Definitional | Logical | Conjectural
 
@@ -97,7 +98,9 @@ let string_of_definition_kind (l,boxed,d) =
   | Global, Example -> "Example"
   | Local, (CanonicalStructure|Example) ->
       anomaly "Unsupported local definition kind"
-  | _, (StructureComponent|Scheme|CoFixpoint|Fixpoint|IdentityCoercion|Instance)
+  | Local, Instance -> "Instance"
+  | Global, Instance -> "Global Instance"
+  | _, (StructureComponent|Scheme|CoFixpoint|Fixpoint|IdentityCoercion|Method)
       -> anomaly "Internal definition kind"
 
 (* Strength *)
diff --git a/library/decl_kinds.mli b/library/decl_kinds.mli
index 2ee4544427..7aa1df0c9a 100644
--- a/library/decl_kinds.mli
+++ b/library/decl_kinds.mli
@@ -40,6 +40,7 @@ type definition_object_kind =
   | StructureComponent
   | IdentityCoercion
   | Instance
+  | Method
 
 type assumption_object_kind = Definitional | Logical | Conjectural
 
-- 
cgit v1.2.3