mirror of
https://gitlab.kitware.com/vtk/vtk-m
synced 2024-09-20 11:05:44 +00:00
55 lines
1.6 KiB
C++
55 lines
1.6 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.
|
|
//
|
|
// Copyright 2014 National Technology & Engineering Solutions of Sandia, LLC (NTESS).
|
|
// Copyright 2014 UT-Battelle, LLC.
|
|
// Copyright 2014 Los Alamos National Security.
|
|
//
|
|
// Under the terms of Contract DE-NA0003525 with NTESS,
|
|
// the U.S. Government retains certain rights in this software.
|
|
//
|
|
// Under the terms of Contract DE-AC52-06NA25396 with Los Alamos National
|
|
// Laboratory (LANL), the U.S. Government retains certain rights in
|
|
// this software.
|
|
//============================================================================
|
|
#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
|