language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-27 05:49:08 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Fix expr_lift_spaces of Closure

Browse source
This commit is contained in:
Joshua Warner 2024-12-02 18:24:54 -08:00
parent 19f8cc532a
commit cae47cf2a6
No known key found for this signature in database
GPG key ID: 89AD497003F93FDD
5 changed files with 49 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

25
crates/compiler/fmt/src/expr.rs
View file

@ -999,10 +999,24 @@ pub fn expr_lift_spaces<'a, 'b: 'a>(
after: final_expr_lifted.after,
}
}
Expr::If { .. } | Expr::When(_, _) | Expr::Return(_, _) | Expr::Closure(..) => {
let res = if parens == Parens::InApply
|| (parens == Parens::InApplyLastArg && !matches!(expr, Expr::Closure(..)))
{
Expr::Closure(pats, body) => {
if parens == Parens::InApply {
return Spaces {
before: &[],
item: Expr::ParensAround(arena.alloc(*expr)),
after: &[],
};
}
let body_lifted = expr_lift_spaces_after(Parens::NotNeeded, arena, &body.value);
Spaces {
before: &[],
item: Expr::Closure(pats, arena.alloc(Loc::at(body.region, body_lifted.item))),
after: body_lifted.after,
}
}
Expr::If { .. } | Expr::When(_, _) | Expr::Return(_, _) => {
if parens == Parens::InApply || parens == Parens::InApplyLastArg {
Spaces {
before: &[],
item: Expr::ParensAround(arena.alloc(*expr)),
@ -1014,8 +1028,7 @@ pub fn expr_lift_spaces<'a, 'b: 'a>(
item: *expr,
after: &[],
}
};
dbg!(res)
}
}
Expr::Backpassing(pats, call, continuation) => {
let pats = arena.alloc_slice_copy(pats);