Use the deep copy function and fix errors

Author: Smit-create

src/libasr/codegen/asr_to_c_cpp.h

@@ -690,11 +690,13 @@ R"(#include <stdio.h>
                 src += indent + list_dc_func + "(&" + value + ", &" + target + ");\n\n";
             }
         } else if ( is_target_tup && is_value_tup ) {
+            ASR::Tuple_t* tup_target = ASR::down_cast<ASR::Tuple_t>(ASRUtils::expr_type(x.m_target));
+            std::string dc_func = c_ds_api->get_tuple_deepcopy_func(tup_target);
             if( ASR::is_a<ASR::TupleConstant_t>(*x.m_value) ) {
                 src += value;
-                src += indent + target +  " = " + const_name + ";\n";
+                src += indent + dc_func + "(" + const_name + ", &" + target + ");\n";
             } else {
-                src += indent + target +  " = " + value + ";\n";
+                src += indent + dc_func + "(" + value + ", &" + target + ");\n";
             }
         } else {
             if( is_c ) {

src/libasr/codegen/c_utils.h

@@ -186,8 +186,9 @@ class CCPPDSUtils {
                 return func + "(" + value + ", &" + target + ");";
             } else if (ASR::is_a<ASR::Character_t>(*t)) {
                 return "strcpy(" + target + ", " + value + ");";
+            } else {
+                return target + " = " + value  + ";";
             }
-            LFORTRAN_ASSERT(false);
         }
 
         bool is_non_primitive_DT(ASR::ttype_t *t) {
@@ -486,7 +487,7 @@ class CCPPDSUtils {
             if( ASR::is_a<ASR::Character_t>(*m_type) ) {
                 generated_code += indent + tab + "x->data[x->current_end_point] = (char*) malloc(40 * sizeof(char));\n";
             }
-            generated_code += indent + generated_code += indent + tab + \
+            generated_code += indent + tab + \
                         get_deepcopy(m_type, "element", "x->data[x->current_end_point]") + "\n";
             generated_code += indent + tab + "x->current_end_point += 1;\n";
             generated_code += indent + "}\n\n";
@@ -620,11 +621,11 @@ class CCPPDSUtils {
             for (size_t i=0; i<t->n_type; i++) {
                 std::string n = std::to_string(i);
                 if (ASR::is_a<ASR::Character_t>(*t->m_type[i])) {
-                    tmp_gen += indent + tab + "data->element_" + n + " = " + \
+                    tmp_gen += indent + tab + "dest->element_" + n + " = " + \
                                 "(char *) malloc(40*sizeof(char));\n";
                 }
                 tmp_gen += indent + tab + get_deepcopy(t->m_type[i], "src.element_" + n,
-                                "data->element_" + n) + "\n";
+                                "dest->element_" + n) + "\n";
             }
             tmp_gen += indent + "}\n\n";
             func_decls += tmp_def;