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

feat(kernel/formatter): print binder_info in simple formater

Browse source 
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
Leonardo de Moura 2014-05-14 16:51:49 -07:00
parent 5d61d23bf6
commit d5184a1751
1 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
src/kernel/formatter.cpp
View file

@ -66,8 +66,17 @@ struct print_expr_fn {
} }
void print_binder(char const * bname, expr const & e, context const & c) { void print_binder(char const * bname, expr const & e, context const & c) {
out() << bname << " " << binder_name(e) << " : "; out() << bname << " ";
if (binder_info(e).is_implicit())
out() << "{";
else if (binder_info(e).is_cast())
out() << "[";
out() << binder_name(e) << " : ";
print_child(binder_domain(e), c); print_child(binder_domain(e), c);
if (binder_info(e).is_implicit())
out() << "}";
else if (binder_info(e).is_cast())
out() << "]";
out() << ", "; out() << ", ";
print_child(binder_body(e), extend(c, binder_name(e), binder_domain(e))); print_child(binder_body(e), extend(c, binder_name(e), binder_domain(e)));
} }