aboutsummaryrefslogtreecommitdiff
path: root/kernel/declarations.mli
diff options
context:
space:
mode:
authorherbelin2005-01-21 17:18:23 +0000
committerherbelin2005-01-21 17:18:23 +0000
commitd7b2414b631d71e89e677d650b84bd4fadd44895 (patch)
tree47b653e7e0ae9b83dbc8a96b2c5be4717b2eefbd /kernel/declarations.mli
parentea6bd4e5496f0fd7e059cd9b924f29ca80a38ae2 (diff)
Compatibilité ocamlweb pour cible doc
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6616 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/declarations.mli')
-rw-r--r--kernel/declarations.mli10
1 files changed, 5 insertions, 5 deletions
diff --git a/kernel/declarations.mli b/kernel/declarations.mli
index 30c0ffde0d..3c99b67ac9 100644
--- a/kernel/declarations.mli
+++ b/kernel/declarations.mli
@@ -33,7 +33,7 @@ type constant_body = {
const_body : constr_substituted option;
const_type : types;
const_body_code : to_patch_substituted;
- (* const_type_code : to_patch;*)
+ (*i const_type_code : to_patch;i*)
const_constraints : constraints;
const_opaque : bool }
@@ -119,8 +119,8 @@ and module_specification_body =
{ msb_modtype : module_type_body;
msb_equiv : module_path option;
msb_constraints : constraints }
- (* type_of(equiv) <: modtype (if given)
- + substyping of past With_Module mergers *)
+ (* [type_of](equiv) <: modtype (if given)
+ + substyping of past [With_Module] mergers *)
type structure_elem_body =
@@ -136,7 +136,7 @@ and module_expr_body =
| MEBfunctor of mod_bound_id * module_type_body * module_expr_body
| MEBstruct of mod_self_id * module_structure_body
| MEBapply of module_expr_body * module_expr_body (* (F A) *)
- * constraints (* type_of(A) <: input_type_of(F) *)
+ * constraints (* [type_of](A) <: [input_type_of](F) *)
and module_body =
{ mod_expr : module_expr_body option;
@@ -144,7 +144,7 @@ and module_body =
mod_type : module_type_body;
mod_equiv : module_path option;
mod_constraints : constraints }
- (* type_of(mod_expr) <: mod_user_type (if given) *)
+ (* [type_of(mod_expr)] <: [mod_user_type] (if given) *)
(* if equiv given then constraints are empty *)