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

Upgrade to List.set_in_place when appropriate

Browse source
This commit is contained in:
Richard Feldman 2020-03-07 12:43:03 -05:00
parent bca43a2564
commit db4ef45708
5 changed files with 63 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

18
compiler/gen/src/llvm/build.rs
View file

@ -631,6 +631,24 @@ fn call_with_args<'a, 'ctx, 'env>(
list_ptr.into()
}
Symbol::LIST_SET_IN_PLACE => {
debug_assert!(args.len() == 3);
let list_ptr = args[0].into_pointer_value();
let elem_index = args[1].into_int_value();
let elem = args[2];
let builder = env.builder;
let elem_bytes = 8; // TODO Look this up instead of hardcoding it!
let elem_size = env.context.i64_type().const_int(elem_bytes, false);
let offset = builder.build_int_mul(elem_index, elem_size, "MUL_OFFSET");
let elem_ptr = unsafe { builder.build_gep(list_ptr, &[offset], "elem") };
builder.build_store(elem_ptr, elem);
list_ptr.into()
}
_ => {
let fn_val = env
.module