** This is part of the CTSim program
** Copyright (C) 1983-2000 Kevin Rosenberg
**
-** $Id: mpiworld.cpp,v 1.2 2000/07/13 07:17:25 kevin Exp $
+** $Id$
**
** This program is free software; you can redistribute it and/or modify
** it under the terms of the GNU General Public License (version 2) as
#include <mpiworld.h>
-MPIWorld::MPIWorld (int& argc, char**& argv)
+MPIWorld::MPIWorld (int& argc, char* const *& argv)
{
- MPI::Init (argc, argv);
+ MPI::Init (argc, const_cast<char**&>(argv));
m_comm = MPI::COMM_WORLD.Dup();
m_nProcessors = m_comm.Get_size();
m_myRank = m_comm.Get_rank();
}
-void
+void
MPIWorld::setTotalWorkUnits(int totalWorkUnits)
{
if (m_nProcessors < 1)
currWorkUnits += m_vLocalWorkUnits[iProc];
}
-
+
}
void
if (m_myRank == 0)
strcpy (buf, str.c_str());
-
+
m_comm.Bcast (buf, len + 1, MPI::CHAR, 0);
if (m_myRank > 0)