#include <cstdio>
-simgrid::smpi::Errhandler mpi_MPI_ERRORS_RETURN;
-MPI_Errhandler MPI_ERRORS_RETURN=&mpi_MPI_ERRORS_RETURN;
-simgrid::smpi::Errhandler mpi_MPI_ERRORS_ARE_FATAL;
-MPI_Errhandler MPI_ERRORS_ARE_FATAL=&mpi_MPI_ERRORS_ARE_FATAL;
+simgrid::smpi::Errhandler smpi_MPI_ERRORS_RETURN;
+simgrid::smpi::Errhandler smpi_MPI_ERRORS_ARE_FATAL;
namespace simgrid{
namespace smpi{
return;
errhandler->refcount_--;
if(errhandler->refcount_==0){
- F2C::free_f(errhandler->c2f());
+ F2C::free_f(errhandler->f2c_id());
delete errhandler;
}
}