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

extract duplicated logic

Browse source
This commit is contained in:
Folkert 2021-06-25 22:33:29 +02:00
parent fd9b826398
commit 32dcd96f80
1 changed files with 25 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1110,22 +1110,8 @@ pub fn build_exp_expr<'a, 'ctx, 'env>(
}
// Create the struct_type
let basic_type = block_of_memory_slices(env.context, fields, env.ptr_bytes);
let data_ptr = reserve_with_refcount_union_as_block_of_memory(env, fields);
let stack_size = fields
.iter()
.map(|tag| tag.iter().map(|l| l.stack_size(env.ptr_bytes)).sum())
.max()
.unwrap_or(0);
let alignment_bytes = fields
.iter()
.map(|tag| tag.iter().map(|l| l.alignment_bytes(env.ptr_bytes)))
.flatten()
.max()
.unwrap_or(0);
let data_ptr = reserve_with_refcount_help(env, basic_type, stack_size, alignment_bytes);
let struct_type = ctx.struct_type(field_types.into_bump_slice(), false);
let struct_ptr = env
.builder
@ -1197,13 +1183,7 @@ pub fn build_exp_expr<'a, 'ctx, 'env>(
}
// Create the struct_type
let basic_type = block_of_memory_slices(env.context, &[*fields], env.ptr_bytes);
// layout we abuse to get the right stack size and alignment
let false_layout = Layout::Struct(fields);
let stack_size = false_layout.stack_size(env.ptr_bytes);
let alignment_bytes = false_layout.alignment_bytes(env.ptr_bytes);
let data_ptr = reserve_with_refcount_help(env, basic_type, stack_size, alignment_bytes);
let data_ptr = reserve_with_refcount_union_as_block_of_memory(env, &[fields]);
let struct_type = ctx.struct_type(field_types.into_bump_slice(), false);
let struct_ptr = env
@ -1409,11 +1389,7 @@ pub fn build_exp_expr<'a, 'ctx, 'env>(
}
// Create the struct_type
let basic_type = block_of_memory_slices(env.context, &[other_fields], env.ptr_bytes);
let false_layout = Layout::Struct(other_fields);
let stack_size = false_layout.stack_size(env.ptr_bytes);
let alignment_bytes = false_layout.alignment_bytes(env.ptr_bytes);
let data_ptr = reserve_with_refcount_help(env, basic_type, stack_size, alignment_bytes);
let data_ptr = reserve_with_refcount_union_as_block_of_memory(env, &[other_fields]);
let struct_type = ctx.struct_type(field_types.into_bump_slice(), false);
let struct_ptr = env
@ -1754,6 +1730,28 @@ pub fn reserve_with_refcount<'a, 'ctx, 'env>(
reserve_with_refcount_help(env, basic_type, stack_size, alignment_bytes)
}
fn reserve_with_refcount_union_as_block_of_memory<'a, 'ctx, 'env>(
env: &Env<'a, 'ctx, 'env>,
fields: &[&[Layout<'a>]],
) -> PointerValue<'ctx> {
let basic_type = block_of_memory_slices(env.context, fields, env.ptr_bytes);
let stack_size = fields
.iter()
.map(|tag| tag.iter().map(|l| l.stack_size(env.ptr_bytes)).sum())
.max()
.unwrap_or(0);
let alignment_bytes = fields
.iter()
.map(|tag| tag.iter().map(|l| l.alignment_bytes(env.ptr_bytes)))
.flatten()
.max()
.unwrap_or(0);
reserve_with_refcount_help(env, basic_type, stack_size, alignment_bytes)
}
fn reserve_with_refcount_help<'a, 'ctx, 'env>(
env: &Env<'a, 'ctx, 'env>,
basic_type: impl BasicType<'ctx>,