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

chore: remove unnecessary do

Browse source
This commit is contained in:
Leonardo de Moura 2021-01-26 09:45:26 -08:00
parent 11e55bf4af
commit 3d01327129
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/Lean/Meta/ForEachExpr.lean
View file

@ -41,7 +41,7 @@ partial def visit (fn : Expr → MetaM Bool) (e : Expr) : M Unit :=
| Expr.forallE _ _ _ _ => visitBinder fn #[] 0 e
| Expr.lam _ _ _ _ => visitBinder fn #[] 0 e
| Expr.letE _ _ _ _ _ => visitBinder fn #[] 0 e
| Expr.app f a _ => do visit fn f; visit fn a
| Expr.app f a _ => visit fn f; visit fn a
| Expr.mdata _ b _ => visit fn b
| Expr.proj _ _ b _ => visit fn b
| _ => pure ()