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
leaks --
[simgrid.git]
/
src
/
smpi
/
smpi_base.cpp
diff --git
a/src/smpi/smpi_base.cpp
b/src/smpi/smpi_base.cpp
index
cd003cd
..
687a6d8
100644
(file)
--- a/
src/smpi/smpi_base.cpp
+++ b/
src/smpi/smpi_base.cpp
@@
-693,9
+693,9
@@
static void finish_wait(MPI_Request * request, MPI_Status * status)
}
}
smpi_comm_unuse(req->comm);
}
}
smpi_comm_unuse(req->comm);
+ smpi_datatype_unuse(req->old_type);
}
}
- smpi_datatype_unuse(req->old_type);
if (TRACE_smpi_view_internals()) {
if(req->flags & RECV){
int rank = smpi_process_index();
if (TRACE_smpi_view_internals()) {
if(req->flags & RECV){
int rank = smpi_process_index();
@@
-705,6
+705,8
@@
static void finish_wait(MPI_Request * request, MPI_Status * status)
}
if(req->detached_sender!=NULL){
}
if(req->detached_sender!=NULL){
+ smpi_datatype_unuse(req->detached_sender->old_type);
+ smpi_comm_unuse(req->detached_sender->comm);
smpi_mpi_request_free(&(req->detached_sender));
}
if(req->flags & PERSISTENT)
smpi_mpi_request_free(&(req->detached_sender));
}
if(req->flags & PERSISTENT)