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

feat(frontends/lean/pp): pretty print "num numerals" too

Browse source 
This is an useful for "eval" demos
This commit is contained in:
Leonardo de Moura 2015-10-13 17:26:27 -07:00
parent 7838ed386d
commit 2b3af47fcf
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/frontends/lean/pp.cpp
View file

@ -477,8 +477,10 @@ auto pretty_fn::pp_child(expr const & e, unsigned bp, bool ignore_hide) -> resul
if (is_app(e)) {
if (auto r = pp_local_ref(e))
return add_paren_if_needed(*r, bp);
if (m_numerals)
if (m_numerals) {
if (auto n = to_num(e)) return pp_num(*n);
if (auto n = to_num_core(e)) return pp_num(*n);
}
expr const & f = app_fn(e);
if (auto it = is_abbreviated(f)) {
return pp_abbreviation(e, *it, true, bp, ignore_hide);
@ -972,8 +974,10 @@ auto pretty_fn::pp_notation_child(expr const & e, unsigned lbp, unsigned rbp) ->
if (auto it = is_abbreviated(e))
return pp_abbreviation(e, *it, false, rbp);
if (is_app(e)) {
if (m_numerals)
if (m_numerals) {
if (auto n = to_num(e)) return pp_num(*n);
if (auto n = to_num_core(e)) return pp_num(*n);
}
expr const & f = app_fn(e);
if (auto it = is_abbreviated(f)) {
return pp_abbreviation(e, *it, true, rbp);
@ -1225,8 +1229,10 @@ auto pretty_fn::pp(expr const & e, bool ignore_hide) -> result {
flet<unsigned> let_d(m_depth, m_depth+1);
m_num_steps++;
if (m_numerals)
if (m_numerals) {
if (auto n = to_num(e)) return pp_num(*n);
if (auto n = to_num_core(e)) return pp_num(*n);
}
if (auto n = is_abbreviated(e))
return pp_abbreviation(e, *n, false);
if (auto r = pp_notation(e))