diff --git a/flang/include/flang/Semantics/runtime-type-info.h b/flang/include/flang/Semantics/runtime-type-info.h --- a/flang/include/flang/Semantics/runtime-type-info.h +++ b/flang/include/flang/Semantics/runtime-type-info.h @@ -16,6 +16,7 @@ #include #include +#include namespace llvm { class raw_ostream; @@ -37,5 +38,7 @@ /// to describe other derived types at runtime in flang descriptor. constexpr char typeInfoBuiltinModule[]{"__fortran_type_info"}; +std::vector CollectBindings(const Scope &dtScope); + } // namespace Fortran::semantics #endif // FORTRAN_SEMANTICS_RUNTIME_TYPE_INFO_H_ diff --git a/flang/lib/Semantics/runtime-type-info.cpp b/flang/lib/Semantics/runtime-type-info.cpp --- a/flang/lib/Semantics/runtime-type-info.cpp +++ b/flang/lib/Semantics/runtime-type-info.cpp @@ -65,7 +65,6 @@ evaluate::StructureConstructor PackageIntValue( const SomeExpr &genre, std::int64_t = 0) const; SomeExpr PackageIntValueExpr(const SomeExpr &genre, std::int64_t = 0) const; - std::vector CollectBindings(const Scope &dtScope) const; std::vector DescribeBindings( const Scope &dtScope, Scope &); void DescribeGeneric( @@ -941,8 +940,7 @@ return StructureExpr(PackageIntValue(genre, n)); } -std::vector RuntimeTableBuilder::CollectBindings( - const Scope &dtScope) const { +std::vector CollectBindings(const Scope &dtScope) { std::vector result; std::map localBindings; // Collect local bindings @@ -1148,4 +1146,5 @@ } return result; } + } // namespace Fortran::semantics