feat: parenthesize in the pretty printer

main
Henrik Böving 2021-12-04 22:31:10 +01:00
parent 8c30f29542
commit ac8d9e254e
1 changed files with 3 additions and 2 deletions

View File

@ -72,8 +72,9 @@ structure Module where
members : Array DocInfo
deriving Inhabited
def prettyPrintTerm (expr : Expr) : MetaM Syntax :=
delab Name.anonymous [] expr
def prettyPrintTerm (expr : Expr) : MetaM Syntax := do
let term ← delab Name.anonymous [] expr
parenthesizeTerm term
def Info.ofConstantVal (v : ConstantVal) : MetaM Info := do
let env ← getEnv