This patch is part of the upstreaming effort from fir-dev branch.
Reviewed By: jeanPerier
Differential Revision: https://reviews.llvm.org/D128976
Co-authored-by: V Donaldson <vdonaldson@nvidia.com>
return false;
const Fortran::semantics::Symbol *module =
symbol->GetUltimate().owner().GetSymbol();
- return module && module->attrs().test(Fortran::semantics::Attr::INTRINSIC);
+ return module && module->attrs().test(Fortran::semantics::Attr::INTRINSIC) &&
+ module->name().ToString().find("omp_lib") == std::string::npos;
}
namespace {