Skip to content
Merged
Show file tree
Hide file tree
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Prev Previous commit
Fix bugs and refactor code
  • Loading branch information
advikkabra committed Jun 26, 2024
commit 6db1860d12fc9f6a5894c58de368ead73e6885bc
12 changes: 6 additions & 6 deletions integration_tests/test_set_clear.py
Original file line number Diff line number Diff line change
Expand Up @@ -2,20 +2,20 @@ def test_clear():
a: set[i32] = {1, 2}

a.clear()
# a.add(3)
a.add(3)

assert len(a) == 1
a.remove(3)
assert len(a) == 0
# a.remove(3)
# assert len(a) == 0

b: set[str] = {'a', 'b'}

b.clear()
# b.add('c')
b.add('c')

assert len(b) == 1
b.remove('c')
assert len(b) == 0
# b.remove('c')
# assert len(b) == 0


test_clear()
23 changes: 2 additions & 21 deletions src/libasr/codegen/llvm_utils.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -6902,32 +6902,13 @@ namespace LCompilers {
}

void LLVMSetLinearProbing::set_clear(llvm::Value* set, llvm::Module* module, ASR::ttype_t* el_asr_type) {
get_builder0();
llvm::Value* occupancy_ptr = get_pointer_to_occupancy(set);
llvm::Value* capacity_ptr = get_pointer_to_capacity(set);
llvm::Value* llvm_zero = llvm::ConstantInt::get(llvm::Type::getInt32Ty(context), llvm::APInt(32, 0));
LLVM::CreateStore(*builder, llvm_zero, occupancy_ptr);
LLVM::CreateStore(*builder, llvm_zero, capacity_ptr);

llvm::Value* el_list = get_el_list(set);
llvm::DataLayout data_layout(module);
size_t mask_size = data_layout.getTypeAllocSize(llvm::Type::getInt8Ty(context));
llvm::Value* llvm_mask_size = llvm::ConstantInt::get(llvm::Type::getInt32Ty(context),
llvm::APInt(32, mask_size));
llvm::Value* new_el_mask = LLVM::lfortran_calloc(context, *module, *builder, llvm_zero,
llvm_mask_size);
std::string el_type_code = ASRUtils::get_type_code(el_asr_type);
llvm::Type* el_llvm_type = std::get<2>(typecode2settype[el_type_code]);
int32_t el_type_size = std::get<1>(typecode2settype[el_type_code]);

llvm::Value* new_el_list = builder0.CreateAlloca(llvm_utils->list_api->get_list_type(el_llvm_type,
el_type_code, el_type_size), nullptr);
llvm_utils->list_api->list_init(el_type_code, el_list, *module, llvm_zero, llvm_zero);

llvm_utils->list_api->free_data(el_list, *module);
LLVM::lfortran_free(context, *module, *builder, LLVM::CreateLoad(*builder, get_pointer_to_mask(set)));
LLVM::CreateStore(*builder, LLVM::CreateLoad(*builder, new_el_list), el_list);
LLVM::CreateStore(*builder, new_el_mask, get_pointer_to_mask(set));

set_init(ASRUtils::get_type_code(el_asr_type), set, module, 0);
}

void LLVMSetSeparateChaining::set_clear(llvm::Value* set, llvm::Module* module, ASR::ttype_t* el_asr_type) {
Expand Down