Implemented type encoding for Const

czgdp1807 · czgdp1807 · commit e653003867fe · 2022-10-19T10:28:52.000+05:30
diff --git a/src/libasr/asr_utils.h b/src/libasr/asr_utils.h
@@ -807,6 +807,13 @@ static inline std::string get_type_code(const ASR::ttype_t *t, bool use_undersco
             }
             return "Pointer[" + get_type_code(p->m_type, use_underscore_sep, encode_dimensions_) + "]";
         }
+        case ASR::ttypeType::Const: {
+            ASR::Const_t* p = ASR::down_cast<ASR::Const_t>(t);
+            if( use_underscore_sep ) {
+                return "Const_" + get_type_code(p->m_type, use_underscore_sep, encode_dimensions_) + "_";
+            }
+            return "Const[" + get_type_code(p->m_type, use_underscore_sep, encode_dimensions_) + "]";
+        }
         default: {
             throw LCompilersException("Type encoding not implemented for "
                                       + std::to_string(t->type));

Original file line number	Diff line number	Diff line change
`@@ -807,6 +807,13 @@ static inline std::string get_type_code(const ASR::ttype_t *t, bool use_undersco`
`807`	`807`	`}`
`808`	`808`	`return "Pointer[" + get_type_code(p->m_type, use_underscore_sep, encode_dimensions_) + "]";`
`809`	`809`	`}`
	`810`	`+ case ASR::ttypeType::Const: {`
	`811`	`+ ASR::Const_t* p = ASR::down_cast<ASR::Const_t>(t);`
	`812`	`+ if( use_underscore_sep ) {`
	`813`	`+ return "Const_" + get_type_code(p->m_type, use_underscore_sep, encode_dimensions_) + "_";`
	`814`	`+ }`
	`815`	`+ return "Const[" + get_type_code(p->m_type, use_underscore_sep, encode_dimensions_) + "]";`
	`816`	`+ }`
`810`	`817`	`default: {`
`811`	`818`	`throw LCompilersException("Type encoding not implemented for "`
`812`	`819`	`+ std::to_string(t->type));`