From: suter <frederic.suter@cc.in2p3.fr>
Date: Mon, 7 Jul 2014 13:45:17 +0000 (+0200)
Subject: temporary hack to be able to replay traces of fortran codes through the
X-Git-Tag: v3_12~926
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/ad176c187bf59511e419f34ad53a0fd114f81cf9

temporary hack to be able to replay traces of fortran codes through the
simulation of a C code
---

diff --git a/include/smpi/smpi.h b/include/smpi/smpi.h
index 788e00189c..c148943c62 100644
--- a/include/smpi/smpi.h
+++ b/include/smpi/smpi.h
@@ -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