Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
temporary hack to be able to replay traces of fortran codes through the
authorsuter <frederic.suter@cc.in2p3.fr>
Mon, 7 Jul 2014 13:45:17 +0000 (15:45 +0200)
committersuter <frederic.suter@cc.in2p3.fr>
Mon, 7 Jul 2014 13:46:07 +0000 (15:46 +0200)
simulation of a C code

include/smpi/smpi.h

index 788e001..c148943 100644 (file)
@@ -115,8 +115,12 @@ SG_BEGIN_DECL()
 #define MPI_2DOUBLE_PRECISION MPI_DATATYPE_NULL
 #define MPI_REAL MPI_DATATYPE_NULL
 #define MPI_LOGICAL MPI_DATATYPE_NULL
-#define MPI_DOUBLE_PRECISION MPI_DATATYPE_NULL
-#define MPI_INTEGER MPI_DATATYPE_NULL
+#define MPI_DOUBLE_PRECISION MPI_DOUBLE
+#if defined(__alpha__) || defined(__sparc64__) || defined(__x86_64__) || defined(__ia64__)
+#define MPI_INTEGER MPI_INT
+#else
+#define MPI_INTEGER MPI_LONG
+#endif
 
 #define MPI_DISTRIBUTE_BLOCK 0
 #define MPI_DISTRIBUTE_NONE 1