mirror of
https://github.com/roc-lang/roc.git
synced 2025-09-30 15:21:12 +00:00
Fix set_shared_int_list for LLVM
This commit is contained in:
parent
8a26cac3f2
commit
d0a1adfef9
2 changed files with 5 additions and 3 deletions
|
@ -1088,6 +1088,7 @@ fn call_with_args<'a, 'ctx, 'env>(
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
Symbol::LIST_SET => {
|
Symbol::LIST_SET => {
|
||||||
|
// List.set : List elem, Int, elem -> List elem
|
||||||
let builder = env.builder;
|
let builder = env.builder;
|
||||||
|
|
||||||
debug_assert!(args.len() == 3);
|
debug_assert!(args.len() == 3);
|
||||||
|
|
|
@ -574,7 +574,7 @@ mod test_gen {
|
||||||
|
|
||||||
#[test]
|
#[test]
|
||||||
fn set_shared_int_list() {
|
fn set_shared_int_list() {
|
||||||
assert_evals_to!(
|
assert_llvm_evals_to!(
|
||||||
indoc!(
|
indoc!(
|
||||||
r#"
|
r#"
|
||||||
shared = [ 2, 4 ]
|
shared = [ 2, 4 ]
|
||||||
|
@ -585,8 +585,9 @@ mod test_gen {
|
||||||
{ x, y: List.getUnsafe shared 1 }
|
{ x, y: List.getUnsafe shared 1 }
|
||||||
"#
|
"#
|
||||||
),
|
),
|
||||||
(4, 77),
|
(77, 4),
|
||||||
(i64, i64)
|
(i64, i64),
|
||||||
|
|x| x
|
||||||
);
|
);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue