Skip to content

[C] Simd changes from LFortran #2425

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
ubaidsk merged 6 commits into from
Nov 16, 2023
Merged

[C] Simd changes from LFortran #2425

Changes from 1 commit
Commits
Show all changes
6 commits
Select commit Hold shift + click to select a range
9e317a4
Bug: [C] Fix a missing indent in C code
Thirumalai-Shaktivel Nov 11, 2023
12de86f
Bug: Fix the accessing of m_values
Thirumalai-Shaktivel Nov 11, 2023
0f7badc
Fix extra spaces
Thirumalai-Shaktivel Nov 11, 2023
8d8fb52
[ASR Pass] Use the utils function to check for SIMDArray
Thirumalai-Shaktivel Nov 13, 2023
d29a80a
Refactor: [C] Handle ArrayBroadcast for variable initialization
Thirumalai-Shaktivel Nov 14, 2023
25ca1c8
[C] Use memcpy for initializing SIMDArray's
Thirumalai-Shaktivel Nov 15, 2023
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
Next Next commit
Refactor: [C] Handle ArrayBroadcast for variable initialization
  • Loading branch information
@Thirumalai-Shaktivel
Thirumalai-Shaktivel committed Nov 14, 2023
commit d29a80ae4d046b625bcc770e7de5b1f4c4f9cf6e
26 changes: 9 additions & 17 deletions src/libasr/codegen/asr_to_c.cpp
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1204,32 +1204,24 @@ R"( // Initialise Numpy
src = this->check_tmp_buffer() + out;
}

void visit_ArrayBroadcast(const ASR::ArrayBroadcast_t& x) {
void visit_ArrayBroadcast(const ASR::ArrayBroadcast_t &x) {
/*
!LF$ attributes simd :: A
real :: A(8)
A = 1
We need to generate:
a = {1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0};
*/

CHECK_FAST_C(compiler_options, x)
if (x.m_value) {
ASR::expr_t* value = x.m_value;
LCOMPILERS_ASSERT(ASR::is_a<ASR::ArrayConstant_t>(*value));
ASR::ArrayConstant_t* array_const = ASR::down_cast<ASR::ArrayConstant_t>(value);
std::string array_const_str = "{";
for( size_t i = 0; i < array_const->n_args; i++ ) {
ASR::expr_t* array_const_arg = array_const->m_args[i];
this->visit_expr(*array_const_arg);
array_const_str += src + ", ";
}
array_const_str.pop_back();
array_const_str.pop_back();
array_const_str += "}";

src = array_const_str;
size_t size = ASRUtils::get_fixed_size_of_array(x.m_type);
std::string array_const_str = "{";
for( size_t i = 0; i < size; i++ ) {
this->visit_expr(*x.m_array);
array_const_str += src;
if (i < size - 1) array_const_str += ", ";
}
array_const_str += "}";
src = array_const_str;
}

void visit_ArraySize(const ASR::ArraySize_t& x) {
Expand Down