max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

fix(library/compiler/lcnf): apply_beta takes arguments in reverse order

Browse source
This commit is contained in:
Leonardo de Moura 2018-09-11 17:55:06 -07:00
parent 3ba777e709
commit 72e99ea3ee
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/library/compiler/lcnf.cpp
View file

@ -4,6 +4,7 @@ Released under Apache 2.0 license as described in the file LICENSE.
Author: Leonardo de Moura
*/
#include <algorithm>
#include "runtime/flet.h"
#include "kernel/type_checker.h"
#include "kernel/instantiate.h"
@ -69,9 +70,10 @@ public:
return m_lctx.mk_lambda(args, mk_app(e, args));
}
expr visit_projection(expr const & fn, buffer<expr> const & args, bool root) {
expr visit_projection(expr const & fn, buffer<expr> & args, bool root) {
constant_info info = m_env.get(const_name(fn));
expr fn_val = instantiate_value_lparams(info, const_levels(fn));
std::reverse(args.begin(), args.end());
return visit(apply_beta(fn_val, args.size(), args.data()), root);
}