diff options
| author | herbelin | 2000-05-31 11:46:29 +0000 |
|---|---|---|
| committer | herbelin | 2000-05-31 11:46:29 +0000 |
| commit | 301d5af223390fa5c82da9ae9958f610493ba814 (patch) | |
| tree | 304f4b7b194ace4c6fac67af90a0bcdf3ff3537f /kernel/instantiate.ml | |
| parent | aca8a6bbb4fa372cd3b27680eee642082d1c2ad5 (diff) | |
Nettoyage de Generic
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@482 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/instantiate.ml')
| -rw-r--r-- | kernel/instantiate.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/instantiate.ml b/kernel/instantiate.ml index 7a929b9fa3..5ec0e01b0b 100644 --- a/kernel/instantiate.ml +++ b/kernel/instantiate.ml @@ -22,7 +22,7 @@ let instantiate_constr ids c args = if is_id_inst ids args then c else - replace_vars (List.combine ids (List.map make_substituend args)) c + replace_vars (List.combine ids args) c let instantiate_type ids tty args = typed_app (fun c -> instantiate_constr ids c args) tty |