C: Fix struct members deep copy

Author: Smit-create

src/libasr/codegen/asr_to_c.cpp

@@ -146,11 +146,12 @@ class ASRToCVisitor : public BaseCCPPVisitor<ASRToCVisitor>
     void allocate_array_members_of_struct(ASR::StructType_t* der_type_t, std::string& sub,
         std::string indent, std::string name) {
         for( auto itr: der_type_t->m_symtab->get_scope() ) {
-            if( ASR::is_a<ASR::UnionType_t>(*itr.second) ||
-                ASR::is_a<ASR::StructType_t>(*itr.second) ) {
+            ASR::symbol_t *sym = ASRUtils::symbol_get_past_external(itr.second);
+            if( ASR::is_a<ASR::UnionType_t>(*sym) ||
+                ASR::is_a<ASR::StructType_t>(*sym) ) {
                 continue ;
             }
-            ASR::ttype_t* mem_type = ASRUtils::symbol_type(itr.second);
+            ASR::ttype_t* mem_type = ASRUtils::symbol_type(sym);
             if( ASRUtils::is_character(*mem_type) ) {
                 sub += indent + name + "->" + itr.first + " = NULL;\n";
             } else if( ASRUtils::is_array(mem_type) &&

src/libasr/codegen/c_utils.h

@@ -843,26 +843,28 @@ class CCPPDSUtils {
                                 + struct_type_str + "* dest)";
             func_decls += "inline " + signature + ";\n";
             generated_code += indent + signature + " {\n";
-            for( auto item: struct_type_t->m_symtab->get_scope() ) {
-                ASR::ttype_t* member_type_asr = ASRUtils::symbol_type(item.second);
+            for(size_t i=0; i < struct_type_t->n_members; i++) {
+                std::string mem_name = std::string(struct_type_t->m_members[i]);
+                ASR::symbol_t* member = struct_type_t->m_symtab->get_symbol(mem_name);
+                ASR::ttype_t* member_type_asr = ASRUtils::symbol_type(member);
                 if( CUtils::is_non_primitive_DT(member_type_asr) ||
                     ASR::is_a<ASR::Character_t>(*member_type_asr) ) {
-                    generated_code += indent + tab + get_deepcopy(member_type_asr, "&(src->" + item.first + ")",
-                                 "&(dest->" + item.first + ")") + ";\n";
+                    generated_code += indent + tab + get_deepcopy(member_type_asr, "&(src->" + mem_name + ")",
+                                 "&(dest->" + mem_name + ")") + ";\n";
                 } else if( ASRUtils::is_array(member_type_asr) ) {
                     ASR::dimension_t* m_dims = nullptr;
                     size_t n_dims = ASRUtils::extract_dimensions_from_ttype(member_type_asr, m_dims);
                     if( ASRUtils::is_fixed_size_array(m_dims, n_dims) ) {
                         std::string array_size = std::to_string(ASRUtils::get_fixed_size_of_array(m_dims, n_dims));
                         array_size += "*sizeof(" + CUtils::get_c_type_from_ttype_t(member_type_asr) + ")";
-                        generated_code += indent + tab + "memcpy(dest->" + item.first + ", src->" + item.first +
+                        generated_code += indent + tab + "memcpy(dest->" + mem_name + ", src->" + mem_name +
                                             ", " + array_size + ");\n";
                     } else {
-                        generated_code += indent + tab + get_deepcopy(member_type_asr, "src->" + item.first,
-                                            "dest->" + item.first) + ";\n";
+                        generated_code += indent + tab + get_deepcopy(member_type_asr, "src->" + mem_name,
+                                            "dest->" + mem_name) + ";\n";
                     }
                 } else {
-                    generated_code += indent + tab + "dest->" + item.first + " = " + " src->" + item.first + ";\n";
+                    generated_code += indent + tab + "dest->" + mem_name + " = " + " src->" + mem_name + ";\n";
                 }
             }
             generated_code += indent + "}\n\n";