aboutsummaryrefslogtreecommitdiff
path: root/kernel/inductive.ml
diff options
context:
space:
mode:
authorMaxime Dénès2014-04-05 14:05:26 -0400
committerMaxime Dénès2014-07-22 17:55:06 -0400
commit3c9f42251c7552d4a53f93af27b3134c64a3f916 (patch)
treefc9de038214c3b59d624c4ff0697532441f6fd94 /kernel/inductive.ml
parent3077bf499e88754196b42b7241abe8153544cc40 (diff)
Typo in comment.
Diffstat (limited to 'kernel/inductive.ml')
-rw-r--r--kernel/inductive.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/inductive.ml b/kernel/inductive.ml
index f408de8c75..9cfa5c632e 100644
--- a/kernel/inductive.ml
+++ b/kernel/inductive.ml
@@ -688,7 +688,7 @@ let get_recargs_approx env ind args =
assert (List.is_empty largs);
build_recargs (ienv_push_var ienv (na, b, mk_norec)) d
| Rel k ->
- (* Free variable are allowed and assigned Norec *)
+ (* Free variables are allowed and assigned Norec *)
(try snd (List.nth ra_env (k-1))
with Failure _ | Invalid_argument _ -> mk_norec)
| Ind ind_kn ->