diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/closure.mli | 2 | ||||
| -rw-r--r-- | kernel/inductive.mli | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/kernel/closure.mli b/kernel/closure.mli index 4abd866c35..96c86b05fd 100644 --- a/kernel/closure.mli +++ b/kernel/closure.mli @@ -115,7 +115,7 @@ type table_key = | ConstKey of constant | VarKey of identifier | FarRelKey of int - (* FarRel: index in the rel_context part of _initial_ environment *) + (* FarRel: index in the [rel_context] part of {\em initial} environment *) type 'a infos val ref_value_cache: 'a infos -> table_key -> 'a option diff --git a/kernel/inductive.mli b/kernel/inductive.mli index dbaf367889..f4d5b53461 100644 --- a/kernel/inductive.mli +++ b/kernel/inductive.mli @@ -59,7 +59,7 @@ val type_case_branches : env -> inductive * constr list -> unsafe_judgment -> constr -> types array * types * constraints -(* Check a case_info actually correspond to a Case expression on the +(* Check a [case_info] actually correspond to a Case expression on the given inductive type. *) val check_case_info : env -> inductive -> case_info -> unit |