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

Fix dec ref for empty list

Browse source
This commit is contained in:
tarjei 2021-05-22 00:54:03 +02:00
parent 85e5b0ff82
commit e062bdaad8
1 changed files with 20 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

32
compiler/builtins/bitcode/src/list.zig
View file

@ -665,24 +665,32 @@ pub fn listAppend(list: RocList, alignment: usize, element: Opaque, element_widt
return output;
}
pub fn listDrop(list: RocList, alignment: usize, element_width: usize, drop_count: usize, dec: Dec) callconv(.C) RocList {
const size = list.len();
const keep_count = size - drop_count;
if (size <= drop_count) {
return RocList.empty();
}
pub fn listDrop(
list: RocList,
alignment: usize,
element_width: usize,
drop_count: usize,
dec: Dec,
) callconv(.C) RocList {
if (list.bytes) |source_ptr| {
const size = list.len();
const keep_count = size - drop_count;
var i: usize = 0;
while (i < std.math.min(drop_count, size)) : (i += 1) {
const element = source_ptr + i * element_width;
dec(element);
}
if (drop_count >= size) {
return RocList.empty();
}
const output = RocList.allocate(std.heap.c_allocator, alignment, keep_count, element_width);
const target_ptr = output.bytes orelse unreachable;
@memcpy(target_ptr, source_ptr + drop_count * element_width, keep_count * element_width);
var i: usize = 0;
while (i < drop_count) : (i += 1) {
const element = source_ptr + i * element_width;
dec(element);
}
utils.decref(std.heap.c_allocator, alignment, list.bytes, size * element_width);
return output;