A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add support for MPI Errhandlers in Comm, File, Win.
[simgrid.git]
/
src
/
smpi
/
mpi
/
smpi_win.cpp
diff --git
a/src/smpi/mpi/smpi_win.cpp
b/src/smpi/mpi/smpi_win.cpp
index
095f870
..
6ba1b1c
100644
(file)
--- a/
src/smpi/mpi/smpi_win.cpp
+++ b/
src/smpi/mpi/smpi_win.cpp
@@
-42,7
+42,7
@@
Win::Win(void *base, MPI_Aint size, int disp_unit, MPI_Info info, MPI_Comm comm,
bar_ = new s4u::Barrier(comm_size);
}
mode_=0;
bar_ = new s4u::Barrier(comm_size);
}
mode_=0;
-
+ errhandler_=MPI_ERRORS_RETURN;
comm->add_rma_win(this);
comm->ref();
comm->add_rma_win(this);
comm->ref();
@@
-737,5
+737,16
@@
int Win::shared_query(int rank, MPI_Aint* size, int* disp_unit, void* baseptr)
}
return MPI_SUCCESS;
}
}
return MPI_SUCCESS;
}
+
+MPI_Errhandler Win::errhandler(){
+ return errhandler_;
+}
+
+void Win::set_errhandler(MPI_Errhandler errhandler){
+ errhandler_=errhandler;
+ if(errhandler_!= MPI_ERRHANDLER_NULL)
+ errhandler->ref();
+}
+
}
}
}
}