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
Move check for MPI_BOTTOM one level up.
[simgrid.git]
/
src
/
smpi
/
bindings
/
smpi_pmpi_type.cpp
diff --git
a/src/smpi/bindings/smpi_pmpi_type.cpp
b/src/smpi/bindings/smpi_pmpi_type.cpp
index
e150b2b
..
69b7eaa
100644
(file)
--- a/
src/smpi/bindings/smpi_pmpi_type.cpp
+++ b/
src/smpi/bindings/smpi_pmpi_type.cpp
@@
-3,7
+3,7
@@
/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
-#include "private.h"
+#include "private.h
pp
"
#include "smpi_datatype_derived.hpp"
XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(smpi_pmpi);
#include "smpi_datatype_derived.hpp"
XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(smpi_pmpi);
@@
-338,7
+338,7
@@
int PMPI_Pack(void* inbuf, int incount, MPI_Datatype type, void* outbuf, int out
return MPI_ERR_TYPE;
if(comm==MPI_COMM_NULL)
return MPI_ERR_COMM;
return MPI_ERR_TYPE;
if(comm==MPI_COMM_NULL)
return MPI_ERR_COMM;
- return type->pack(inbuf
, incount, outbuf,outcount,
position, comm);
+ return type->pack(inbuf
== MPI_BOTTOM ? nullptr : inbuf, incount, outbuf, outcount,
position, comm);
}
int PMPI_Pack_size(int incount, MPI_Datatype datatype, MPI_Comm comm, int* size) {
}
int PMPI_Pack_size(int incount, MPI_Datatype datatype, MPI_Comm comm, int* size) {