language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-11-02 22:01:20 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Fix PNC + ? suffix interaction

Browse source
This commit is contained in:
Sam Mohr 2025-01-25 05:41:59 -08:00
parent 36aa6f0883
commit 1aff18d47c
No known key found for this signature in database
GPG key ID: EA41D161A3C1BC99
2 changed files with 46 additions and 31 deletions
Download patch file Download diff file Expand all files Collapse all files

23
crates/compiler/can/tests/test_can.rs
View file

@ -971,6 +971,29 @@ mod test_can {
assert_str_value(&cond_args[0].1.value, "123");
}
#[test]
fn try_desugar_pipe_suffix_pnc() {
let src = indoc!(
r#"
"123" |> Str.to_u64()?
"#
);
let arena = Bump::new();
let out = can_expr_with(&arena, test_home(), src);
assert_eq!(out.problems, Vec::new());
// Assert that we desugar to:
//
// Try(Str.to_u64 "123")
let cond_expr = assert_try_expr(&out.loc_expr.value);
let cond_args = assert_func_call(cond_expr, "to_u64", CalledVia::Space, &out.interns);
assert_eq!(cond_args.len(), 1);
assert_str_value(&cond_args[0].1.value, "123");
}
#[test]
fn try_desugar_works_elsewhere() {
let src = indoc!(