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

make llvm gen tests work

Browse source
This commit is contained in:
Folkert 2022-02-20 14:25:26 +01:00
parent 177529bfb6
commit 3e413764e2
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C
5 changed files with 72 additions and 80 deletions
Download patch file Download diff file Expand all files Collapse all files

36
compiler/gen_llvm/src/llvm/build.rs
View file

@ -12,7 +12,7 @@ use crate::llvm::build_list::{
list_contains, list_drop_at, list_find_unsafe, list_get_unsafe, list_join, list_keep_errs,
list_keep_if, list_keep_oks, list_len, list_map, list_map2, list_map3, list_map4,
list_map_with_index, list_prepend, list_range, list_repeat, list_reverse, list_set,
list_single, list_sort_with, list_sublist, list_swap,
list_single, list_sort_with, list_sublist, list_swap, list_to_c_abi,
};
use crate::llvm::build_str::{
str_concat, str_count_graphemes, str_ends_with, str_from_float, str_from_int, str_from_utf8,
@ -857,6 +857,16 @@ pub fn build_exp_literal<'a, 'ctx, 'env>(
)
.unwrap();
// Store the capacity
struct_val = builder
.build_insert_value(
struct_val,
number_of_elements,
Builtin::WRAPPER_CAPACITY,
"insert_capacity",
)
.unwrap();
builder.build_bitcast(struct_val.into_struct_value(), str_type, "cast_collection")
}
}
@ -5668,37 +5678,21 @@ fn run_low_level<'a, 'ctx, 'env>(
}
NumBytesToU16 => {
debug_assert_eq!(args.len(), 2);
let list = load_symbol(scope, &args[0]).into_struct_value();
let list = load_symbol(scope, &args[0]);
let position = load_symbol(scope, &args[1]);
call_bitcode_fn(
env,
&[
complex_bitcast(
env.builder,
list.into(),
env.str_list_c_abi().into(),
"to_i128",
),
position,
],
&[list_to_c_abi(env, list).into(), position],
bitcode::NUM_BYTES_TO_U16,
)
}
NumBytesToU32 => {
debug_assert_eq!(args.len(), 2);
let list = load_symbol(scope, &args[0]).into_struct_value();
let list = load_symbol(scope, &args[0]);
let position = load_symbol(scope, &args[1]);
call_bitcode_fn(
env,
&[
complex_bitcast(
env.builder,
list.into(),
env.str_list_c_abi().into(),
"to_i128",
),
position,
],
&[list_to_c_abi(env, list).into(), position],
bitcode::NUM_BYTES_TO_U32,
)
}