X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/bc909139fb953cc74d0e63a7f61ec85d2675e3e6..5cc4d9c9201ee45e999635c1d3ae41ba6a844d56:/include/smpi/mpif.h.in diff --git a/include/smpi/mpif.h.in b/include/smpi/mpif.h.in index 573221714d..fbd61612c5 100644 --- a/include/smpi/mpif.h.in +++ b/include/smpi/mpif.h.in @@ -69,7 +69,7 @@ parameter(MPI_ERR_OTHER=12) parameter(MPI_ERR_UNKNOWN=13) parameter(MPI_LASTUSEDCODE=0) - parameter(MPI_ERR_LASTCODE=0) + parameter(MPI_ERR_LASTCODE=74) parameter(MPI_IDENT=0) parameter(MPI_SIMILAR=1) parameter(MPI_UNEQUAL=2) @@ -91,7 +91,7 @@ parameter(MPI_IO=0) integer MPI_ROOT, MPI_INFO_NULL,MPI_COMM_TYPE_SHARED parameter(MPI_ROOT=0) - parameter(MPI_INFO_NULL=-1) + parameter(MPI_INFO_NULL=0) parameter(MPI_COMM_TYPE_SHARED=1) ! These should be ordered as in smpi_f77.c @@ -137,6 +137,7 @@ integer MPI_LOGICAL8, MPI_2REAL, MPI_2DOUBLE_PRECISION integer MPI_AINT, MPI_OFFSET, MPI_COUNT integer MPI_REAL16, MPI_COMPLEX8,MPI_COMPLEX16,MPI_COMPLEX32 + integer MPI_PACKED parameter(MPI_DATATYPE_NULL=-1) parameter(MPI_BYTE=0) parameter(MPI_CHARACTER=1) @@ -166,6 +167,7 @@ parameter(MPI_COMPLEX8=24) parameter(MPI_COMPLEX16=25) parameter(MPI_COMPLEX32=26) + parameter(MPI_PACKED=27)