45 lines
1.2 KiB
C++
45 lines
1.2 KiB
C++
//============================================================================
|
|
// Copyright (c) Kitware, Inc.
|
|
// All rights reserved.
|
|
// See LICENSE.txt for details.
|
|
//
|
|
// This software is distributed WITHOUT ANY WARRANTY; without even
|
|
// the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
// PURPOSE. See the above copyright notice for more information.
|
|
//============================================================================
|
|
#include <vtkm/cont/EnvironmentTracker.h>
|
|
|
|
#include <vtkm/thirdparty/diy/diy.h>
|
|
|
|
namespace vtkm
|
|
{
|
|
namespace cont
|
|
{
|
|
namespace internal
|
|
{
|
|
static vtkmdiy::mpi::communicator GlobalCommuncator(MPI_COMM_NULL);
|
|
}
|
|
|
|
void EnvironmentTracker::SetCommunicator(const vtkmdiy::mpi::communicator& comm)
|
|
{
|
|
vtkm::cont::internal::GlobalCommuncator = comm;
|
|
}
|
|
|
|
const vtkmdiy::mpi::communicator& EnvironmentTracker::GetCommunicator()
|
|
{
|
|
#ifndef VTKM_DIY_NO_MPI
|
|
int flag;
|
|
MPI_Initialized(&flag);
|
|
if (!flag)
|
|
{
|
|
int argc = 0;
|
|
char** argv = nullptr;
|
|
MPI_Init(&argc, &argv);
|
|
internal::GlobalCommuncator = vtkmdiy::mpi::communicator(MPI_COMM_WORLD);
|
|
}
|
|
#endif
|
|
return vtkm::cont::internal::GlobalCommuncator;
|
|
}
|
|
} // namespace vtkm::cont
|
|
} // namespace vtkm
|