michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(library/type_inference): improve process_assignment

Browse source
This commit is contained in:
Leonardo de Moura 2015-10-28 18:29:31 -07:00
parent ab1937d46e
commit 6fa4691eb4
1 changed files with 9 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/library/type_inference.cpp
View file

@ -606,9 +606,15 @@ bool type_inference::process_assignment(expr const & ma, expr const & v) {
buffer<expr> args;
expr const & m = get_app_args(ma, args);
buffer<expr> locals;
for (expr const & arg : args) {
if (!is_tmp_local(arg))
break; // is not local
for (expr & arg : args) {
expr new_arg = arg;
// try to instantiate
if (is_meta(new_arg))
new_arg = instantiate_uvars_mvars(arg);
if (!is_local(new_arg))
break; // it is not local
arg = new_arg;
lean_assert(is_local(arg));
if (std::any_of(locals.begin(), locals.end(), [&](expr const & local) {
return mlocal_name(local) == mlocal_name(arg); }))
break; // duplicate local