DEV: Fix result type of ComplexCompare node

lcompilers · Mar 12, 2024 · 8428d48 · 8428d48
1 parent f30265e
commit 8428d48
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/lc/clang_ast_to_asr.cpp b/src/lc/clang_ast_to_asr.cpp
@@ -1835,7 +1835,7 @@ class ClangASTtoASRVisitor: public clang::RecursiveASTVisitor<ClangASTtoASRVisit
         } else if( ASRUtils::is_logical(*left_type) && ASRUtils::is_logical(*right_type) ) {
             tmp = ASR::make_LogicalCompare_t(al, loc, lhs, cmpop_type, rhs, result_type, nullptr);
         } else if( ASRUtils::is_complex(*left_type) && ASRUtils::is_complex(*right_type) ) {
-            tmp = ASR::make_ComplexCompare_t(al, loc, lhs, cmpop_type, rhs, left_type, nullptr);
+            tmp = ASR::make_ComplexCompare_t(al, loc, lhs, cmpop_type, rhs, result_type, nullptr);
         } else {
             throw std::runtime_error("Only integer, real and complex types are supported so "
                 "far for comparison operator, found: " + ASRUtils::type_to_str(left_type)