fix(frontends/lean): fix pretty-printing spacing problem
This commit is contained in:
parent
3aac26d658
commit
fa26c2301c
2 changed files with 8 additions and 3 deletions
|
@ -741,6 +741,13 @@ auto pretty_fn::pp_notation_child(expr const & e, unsigned lbp, unsigned rbp) ->
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static bool add_extra_space_first(name const & tk) {
|
||||||
|
// TODO(Leo): this is a hard-coded temporary solution for deciding whether extra
|
||||||
|
// spaces should be added or not when pretty printing notation.
|
||||||
|
// We should implement a better solution in the future.
|
||||||
|
return tk != "(" && tk != ")";
|
||||||
|
}
|
||||||
|
|
||||||
static bool add_extra_space(name const & tk) {
|
static bool add_extra_space(name const & tk) {
|
||||||
// TODO(Leo): this is a hard-coded temporary solution for deciding whether extra
|
// TODO(Leo): this is a hard-coded temporary solution for deciding whether extra
|
||||||
// spaces should be added or not when pretty printing notation.
|
// spaces should be added or not when pretty printing notation.
|
||||||
|
@ -852,7 +859,7 @@ auto pretty_fn::pp_notation(notation_entry const & entry, buffer<optional<expr>>
|
||||||
--i;
|
--i;
|
||||||
result arg_res = pp_notation_child(rec_args[i], curr_lbp, a.rbp());
|
result arg_res = pp_notation_child(rec_args[i], curr_lbp, a.rbp());
|
||||||
if (i == 0) {
|
if (i == 0) {
|
||||||
if (add_extra_space(tk))
|
if (add_extra_space_first(tk))
|
||||||
curr = format(tk) + space() + arg_res.fmt() + curr;
|
curr = format(tk) + space() + arg_res.fmt() + curr;
|
||||||
else
|
else
|
||||||
curr = format(tk) + arg_res.fmt() + curr;
|
curr = format(tk) + arg_res.fmt() + curr;
|
||||||
|
|
|
@ -1,2 +0,0 @@
|
||||||
type: Pi (q : notation_info (no_info Prop)) (a : q), true
|
|
||||||
value: fun (q : notation_info (no_info Prop)), (by (begin_end (tactic.and_then (begin_end_element (tactic.intro r)) (begin_end_element (tactic.apply true.intro)))))
|
|
Loading…
Reference in a new issue