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

feat(library/compiler/csimp): we may be able to unfold join point

Browse source
This commit is contained in:
Leonardo de Moura 2018-09-26 18:01:57 -07:00
parent ccd73701cb
commit 2c2103711c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/library/compiler/csimp.cpp
View file

@ -507,7 +507,7 @@ class csimp_fn {
optional<expr> new_jp_opt = mk_new_join_point(x, e, jp, new_jps, new_jp_cache);
if (!new_jp_opt) return none_expr();
expr new_jp = *new_jp_opt;
new_minor = mk_app(new_jp, jp_args);
new_minor = visit(mk_app(new_jp, jp_args), false);
} else {
optional<expr> e_y_opt = apply_at(x, e, minor_val);
if (!e_y_opt) return none_expr();