diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/typeops.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/typeops.ml b/kernel/typeops.ml index d3b8383262..c4e177d44e 100644 --- a/kernel/typeops.ml +++ b/kernel/typeops.ml @@ -335,7 +335,7 @@ let apply_rel_list env sigma nocheck argjl funj = apply_rec (n+1) (subst1 hj.uj_val c2) cst' restjl with NotConvertible -> error_cant_apply_bad_type CCI env sigma - (n,body_of_type hj.uj_type,c1) + (n,c1,body_of_type hj.uj_type) funj argjl) | _ -> |