File tree Expand file tree Collapse file tree 1 file changed +7
-2
lines changed Expand file tree Collapse file tree 1 file changed +7
-2
lines changed Original file line number Diff line number Diff line change @@ -1090,10 +1090,15 @@ class VerifyVisitor : public BaseWalkVisitor<VerifyVisitor>
1090
1090
if ( ASRUtils::get_asr_owner (x.m_derived_type ) ) {
1091
1091
symbol_owner = ASRUtils::symbol_name (ASRUtils::get_asr_owner (x.m_derived_type ));
1092
1092
}
1093
- // Check if x.m_derived_type is imported from another module as an external symbol.
1094
- if ( !ASR::is_a<ASR::ExternalSymbol_t>(*x.m_derived_type ) ) {
1093
+
1094
+ // Resolve the symbol in the current symbol table.
1095
+ ASR::symbol_t * symbol = current_symtab->resolve_symbol (ASRUtils::symbol_name (x.m_derived_type ));
1096
+
1097
+ // If the symbol is an ExternalSymbol, then omit the check.
1098
+ if (ASR::is_a<ASR::ExternalSymbol_t>(*symbol)) {
1095
1099
return ;
1096
1100
}
1101
+
1097
1102
require (symtab_in_scope (current_symtab, x.m_derived_type ),
1098
1103
" Struct::m_derived_type '" +
1099
1104
std::string (ASRUtils::symbol_name (x.m_derived_type )) +
You can’t perform that action at this time.
0 commit comments