24 static void moduleNames(const Fortran::semantics::Scope &scope,  in moduleNames()
29   if (scope.kind() == Fortran::semantics::Scope::Kind::Module)  in moduleNames()
30     if (const Fortran::semantics::Symbol *symbol = scope.symbol())  in moduleNames()
35 moduleNames(const Fortran::semantics::Symbol &symbol) {  in moduleNames()
36   const Fortran::semantics::Scope &scope = symbol.owner();  in moduleNames()
43 hostName(const Fortran::semantics::Symbol &symbol) {  in hostName()
44   const Fortran::semantics::Scope &scope = symbol.owner();  in hostName()
45   if (scope.kind() == Fortran::semantics::Scope::Kind::Subprogram) {  in hostName()
49   if (scope.kind() == Fortran::semantics::Scope::Kind::MainProgram)  in hostName()
58 static const Fortran::semantics::Symbol *
59 findInterfaceIfSeperateMP(const Fortran::semantics::Symbol &symbol) {  in findInterfaceIfSeperateMP()
60   const Fortran::semantics::Scope &scope = symbol.owner();  in findInterfaceIfSeperateMP()
61   if (symbol.attrs().test(Fortran::semantics::Attr::MODULE) &&  in findInterfaceIfSeperateMP()
65     const Fortran::semantics::Symbol *iface =  in findInterfaceIfSeperateMP()
76 Fortran::lower::mangle::mangleName(const Fortran::semantics::Symbol &symbol,  in mangleName()
92   if (!Fortran::semantics::IsPointer(ultimateSymbol) &&  in mangleName()
93       Fortran::semantics::IsBindCProcedure(ultimateSymbol) &&  in mangleName()
94       Fortran::semantics::ClassifyProcedure(symbol) !=  in mangleName()
95           Fortran::semantics::ProcedureDefinitionClass::Internal)  in mangleName()
100           [&](const Fortran::semantics::MainProgramDetails &) {  in mangleName()
103           [&](const Fortran::semantics::SubprogramDetails &) {  in mangleName()
106                 Fortran::semantics::IsExternal(ultimateSymbol))  in mangleName()
112             const Fortran::semantics::Symbol *interface = &ultimateSymbol;  in mangleName()
120           [&](const Fortran::semantics::ProcEntityDetails &) {  in mangleName()
122             if (Fortran::semantics::IsPointer(ultimateSymbol) ||  in mangleName()
123                 Fortran::semantics::IsDummy(ultimateSymbol))  in mangleName()
133           [&](const Fortran::semantics::ObjectEntityDetails &) {  in mangleName()
137             if (Fortran::semantics::IsNamedConstant(ultimateSymbol))  in mangleName()
142           [&](const Fortran::semantics::NamelistDetails &) {  in mangleName()
149           [&](const Fortran::semantics::CommonBlockDetails &) {  in mangleName()
152           [&](const Fortran::semantics::DerivedTypeDetails &) -> std::string {  in mangleName()
164     const Fortran::semantics::DerivedTypeSpec &derivedType) {  in mangleName()
166   const Fortran::semantics::Symbol &ultimateSymbol =  in mangleName()
173        Fortran::semantics::OrderParameterDeclarations(ultimateSymbol)) {  in mangleName()
175         param->get<Fortran::semantics::TypeParamDetails>();  in mangleName()
177       const Fortran::semantics::ParamValue *paramValue =  in mangleName()
180       const Fortran::semantics::MaybeIntExpr paramExpr =  in mangleName()