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

appease the paperclip

Browse source
This commit is contained in:
Brendan Hansknecht 2022-02-27 15:50:19 -08:00
parent 457ba524aa
commit 2ca1ebdd2d
2 changed files with 3 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
compiler/builtins/src/std.rs
View file

@ -1034,7 +1034,7 @@ pub fn types() -> MutMap<Symbol, (SolvedType, Region)> {
add_top_level_function_type!( add_top_level_function_type!(
Symbol::LIST_GET, Symbol::LIST_GET,
vec![list_type(flex(TVAR1)), nat_type()], vec![list_type(flex(TVAR1)), nat_type()],
Box::new(result_type(flex(TVAR1), index_out_of_bounds.clone())), Box::new(result_type(flex(TVAR1), index_out_of_bounds)),
); );
// first : List elem -> Result elem [ ListWasEmpty ]* // first : List elem -> Result elem [ ListWasEmpty ]*

7
compiler/gen_llvm/src/llvm/build_list.rs
View file

@ -301,7 +301,7 @@ pub fn list_replace_unsafe<'a, 'ctx, 'env>(
element_layout: &Layout<'a>, element_layout: &Layout<'a>,
update_mode: UpdateMode, update_mode: UpdateMode,
) -> BasicValueEnum<'ctx> { ) -> BasicValueEnum<'ctx> {
let element_type = basic_type_from_layout(env, &element_layout); let element_type = basic_type_from_layout(env, element_layout);
let element_ptr = env let element_ptr = env
.builder .builder
.build_alloca(element_type, "output_element_as_opaque"); .build_alloca(element_type, "output_element_as_opaque");
@ -340,10 +340,7 @@ pub fn list_replace_unsafe<'a, 'ctx, 'env>(
let result = env let result = env
.context .context
.struct_type( .struct_type(
&[ &[super::convert::zig_list_type(env).into(), element_type],
super::convert::zig_list_type(env).into(),
element_type.into(),
],
false, false,
) )
.const_zero(); .const_zero();