Use the Block symbol from the current scope.

Author: Thirumalai-Shaktivel

src/libasr/pass/inline_function_calls.cpp

@@ -339,6 +339,12 @@ class InlineFunctionCallVisitor : public PassUtils::PassVisitor<InlineFunctionCa
         for( size_t i = 0; i < func->n_body && success; i++ ) {
             node_duplicator.success = true;
             ASR::stmt_t* m_body_copy = node_duplicator.duplicate_stmt(func->m_body[i]);
+            if (ASR::is_a<ASR::BlockCall_t>(*m_body_copy)){
+                ASR::BlockCall_t *bc = ASR::down_cast<ASR::BlockCall_t>(m_body_copy);
+                std::string block_name = ASRUtils::symbol_name(bc->m_m);
+                LCOMPILERS_ASSERT(current_scope->get_symbol(block_name))
+                bc->m_m = current_scope->get_symbol(block_name);
+            }
             if( node_duplicator.success ) {
                 func_copy.push_back(al, m_body_copy);
             } else {