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

fix(kernel/level): bug in get_undef_param

Browse source 
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
Leonardo de Moura 2014-05-12 14:22:23 -07:00
parent ad2b1d0d91
commit b6d6df161f
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/kernel/level.cpp
View file

@ -466,7 +466,7 @@ optional<name> get_undef_param(level const & l, param_names const & ps) {
for_each(l, [&](level const & l) { for_each(l, [&](level const & l) {
if (!has_param(l)) if (!has_param(l))
return false; return false;
if (l.kind() == level_kind::Param && std::find(ps.begin(), ps.end(), param_id(l)) != ps.end()) if (is_param(l) && std::find(ps.begin(), ps.end(), param_id(l)) == ps.end())
r = param_id(l); r = param_id(l);
return true; return true;
}); });
@ -478,7 +478,7 @@ optional<name> get_undef_global(level const & l, environment const & env) {
for_each(l, [&](level const & l) { for_each(l, [&](level const & l) {
if (!has_global(l)) if (!has_global(l))
return false; return false;
if (l.kind() == level_kind::Global && env.is_global_level(global_id(l))) if (is_global(l) && env.is_global_level(global_id(l)))
r = global_id(l); r = global_id(l);
return true; return true;
}); });