Unverified Commit 175a6c26 authored by Richard Berger's avatar Richard Berger
Browse files

Add Info::get_mpi_vendor() function

parent 7d8dcb0f
Loading
Loading
Loading
Loading
+20 −0
Original line number Diff line number Diff line
@@ -1243,6 +1243,26 @@ string Info::get_openmp_info()
#endif
}

string Info::get_mpi_vendor() {
  #if defined(MPI_STUBS)
  return "MPI STUBS";
  #elif defined(OPEN_MPI)
  return "Open MPI";
  #elif define(MPICH_NAME)
  return "MPICH";
  #elif define(I_MPI_VERSION)
  return "Intel MPI";
  #elif define(PLATFORM_MPI)
  return "Platform MPI";
  #elif define(HP_MPI)
  return "HP MPI";
  #elif define(MSMPI_VER)
  return "Microsoft MPI";
  #else
  return "Unknown";
  #endif
}

string Info::get_mpi_info(int &major, int &minor)
{
  int len;
+1 −0
Original line number Diff line number Diff line
@@ -48,6 +48,7 @@ class Info : protected Pointers {
  static std::string get_os_info();
  static std::string get_compiler_info();
  static std::string get_openmp_info();
  static std::string get_mpi_vendor();
  static std::string get_mpi_info(int &, int &);
  static std::string get_cxx_info();