Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'v3_8_x'
[simgrid.git] / include / smpi / mpif.h
index 77ea202..6c71f11 100644 (file)
@@ -32,7 +32,7 @@
 
       integer MPI_SUCCESS, MPI_ERR_COMM, MPI_ERR_ARG, MPI_ERR_TYPE,
      >        MPI_ERR_REQUEST, MPI_ERR_INTERN, MPI_ERR_COUNT,
-     >        MPI_ERR_RANK,
+     >        MPI_ERR_RANK, MPI_ERR_OTHER,
      >        MPI_ERR_TAG, MPI_ERR_TRUNCATE, MPI_ERR_GROUP, MPI_ERR_OP,
      >        MPI_IDENT, MPI_SIMILAR, MPI_UNEQUAL, MPI_CONGRUENT,
      >        MPI_WTIME_IS_GLOBAL
@@ -48,6 +48,7 @@
       parameter(MPI_ERR_TRUNCATE=9)
       parameter(MPI_ERR_GROUP=10)
       parameter(MPI_ERR_OP=11)
+      parameter(MPI_ERR_OTHER=12)
       parameter(MPI_IDENT=0)
       parameter(MPI_SIMILAR=1)
       parameter(MPI_UNEQUAL=2)
@@ -76,7 +77,7 @@
      >        MPI_INTEGER8, MPI_REAL, MPI_REAL4, MPI_REAL8,
      >        MPI_DOUBLE_PRECISION, MPI_COMPLEX, MPI_DOUBLE_COMPLEX,
      >        MPI_2INTEGER, MPI_LOGICAL1, MPI_LOGICAL2, MPI_LOGICAL4,
-     >        MPI_LOGICAL8
+     >        MPI_LOGICAL8, MPI_2REAL, MPI_2DOUBLE_PRECISION
       parameter(MPI_DATATYPE_NULL=-1)
       parameter(MPI_BYTE=0)
       parameter(MPI_CHARACTER=1)
@@ -97,6 +98,8 @@
       parameter(MPI_LOGICAL2=16)
       parameter(MPI_LOGICAL4=17)
       parameter(MPI_LOGICAL8=18)
+      parameter(MPI_2REAL=19)
+      parameter(MPI_2DOUBLE_PRECISION=19)
 
 ! These should be ordered as in smpi_f77.c
       integer MPI_OP_NULL,MPI_MAX, MPI_MIN, MPI_MAXLOC, MPI_MINLOC,
      >         MPI_ALLTOALL
 
       external MPI_WTIME
+      external MPI_WTICK
+
       double precision MPI_WTIME
+      double precision MPI_WTICK