Fix for #2816

Author: swamishiju

src/libasr/codegen/asr_to_c.cpp

@@ -387,8 +387,8 @@ class ASRToCVisitor : public BaseCCPPVisitor<ASRToCVisitor>
             } else if(ASR::is_a<ASR::CPtr_t>(*t2)) {
                 sub = format_type_c("", "void**", v.m_name, false, false);
             } else {
-                diag.codegen_error_label("Type number '"
-                    + std::to_string(t2->type)
+                diag.codegen_error_label("Type '"
+                    + ASRUtils::type_to_str(t2)
                     + "' not supported", {v.base.base.loc}, "");
                 throw Abort();
             }
@@ -551,8 +551,8 @@ class ASRToCVisitor : public BaseCCPPVisitor<ASRToCVisitor>
                 // Ignore type variables
                 return "";
             } else {
-                diag.codegen_error_label("Type number '"
-                    + std::to_string(v_m_type->type)
+                diag.codegen_error_label("Type '"
+                    + ASRUtils::type_to_str(v_m_type)
                     + "' not supported", {v.base.base.loc}, "");
                 throw Abort();
             }

src/libasr/codegen/asr_to_cpp.cpp

@@ -259,8 +259,8 @@ class ASRToCPPVisitor : public BaseCCPPVisitor<ASRToCPPVisitor>
                 std::string encoded_type_name = "i" + std::to_string(t->m_kind * 8);
                 handle_array(t2, type_name, true)
             } else {
-                diag.codegen_error_label("Type number '"
-                    + std::to_string(v.m_type->type)
+                diag.codegen_error_label("Type '"
+                    + ASRUtils::type_to_str(v.m_type)
                     + "' not supported", {v.base.base.loc}, "");
                 throw Abort();
             }
@@ -306,8 +306,8 @@ class ASRToCPPVisitor : public BaseCCPPVisitor<ASRToCPPVisitor>
                 sub = format_type_c("", list_type_c, v.m_name,
                                     false, false);
             } else {
-                diag.codegen_error_label("Type number '"
-                    + std::to_string(v.m_type->type)
+                diag.codegen_error_label("Type '"
+                    + ASRUtils::type_to_str(v.m_type)
                     + "' not supported", {v.base.base.loc}, "");
                 throw Abort();
             }

src/libasr/codegen/asr_to_julia.cpp

@@ -307,7 +307,7 @@ class ASRToJuliaVisitor : public ASR::BaseVisitor<ASRToJuliaVisitor>
                     sub = format_type(type_name, v.m_name, use_ref);
                 }
             } else {
-                diag.codegen_error_label("Type number '" + std::to_string(v.m_type->type)
+                diag.codegen_error_label("Type '" + ASRUtils::type_to_str(v.m_type)
                                              + "' not supported",
                                          { v.base.base.loc },
                                          "");
@@ -404,7 +404,7 @@ class ASRToJuliaVisitor : public ASR::BaseVisitor<ASRToJuliaVisitor>
                     sub = format_type(der_type_name, v.m_name, use_ref);
                 }
             } else {
-                diag.codegen_error_label("Type number '" + std::to_string(v_m_type->type)
+                diag.codegen_error_label("Type '" + ASRUtils::type_to_str(v_m_type)
                                              + "' not supported",
                                          { v.base.base.loc },
                                          "");
@@ -984,7 +984,7 @@ class ASRToJuliaVisitor : public ASR::BaseVisitor<ASRToJuliaVisitor>
                 generate_array_decl(
                     out, std::string(v->m_name), der_type_name, _dims, nullptr, n_dims, true, true);
             } else {
-                diag.codegen_error_label("Type number '" + std::to_string(v->m_type->type)
+                diag.codegen_error_label("Type '" + ASRUtils::type_to_str(v->m_type)
                                              + "' not supported",
                                          { v->base.base.loc },
                                          "");

src/libasr/codegen/asr_to_wasm.cpp

@@ -872,8 +872,8 @@ class ASRToWASMVisitor : public ASR::BaseVisitor<ASRToWASMVisitor> {
                         "Integers of kind 4 and 8 only supported");
                 }
             } else {
-                diag.codegen_error_label("Type number '" +
-                                             std::to_string(v->m_type->type) +
+                diag.codegen_error_label("Type '" +
+                                             ASRUtils::type_to_str(v->m_type) +
                                              "' not supported",
                                          {v->base.base.loc}, "");
                 throw CodeGenAbort();