diff options
Diffstat (limited to 'kernel/inductive.ml')
| -rw-r--r-- | kernel/inductive.ml | 2 |
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 -> |