diff options
| author | herbelin | 2000-10-01 13:52:24 +0000 |
|---|---|---|
| committer | herbelin | 2000-10-01 13:52:24 +0000 |
| commit | 27a0d78c02d5c24d67246589964d189a61eb678a (patch) | |
| tree | 8e60c29cd461ccec70c126abb813049aee4495c1 /kernel/typeops.ml | |
| parent | 2fe6ededcaac24f69af31d40c3436717bd0d1be0 (diff) | |
Bug message erreur
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@630 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/typeops.ml')
| -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) | _ -> |