From: Augustin Degomme Date: Mon, 16 Jun 2014 09:12:44 +0000 (+0200) Subject: change symbol name to match one declared in mpif.h X-Git-Tag: v3_12~973^2 X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/32461229e13b3f639761a4479de3825e556c5c83 change symbol name to match one declared in mpif.h --- diff --git a/src/smpi/smpi_f77.c b/src/smpi/smpi_f77.c index 1d8a6e493c..b83160f086 100644 --- a/src/smpi/smpi_f77.c +++ b/src/smpi/smpi_f77.c @@ -32,13 +32,13 @@ typedef unsigned long int uinteger; integer _MPI_BOTTOM; integer _MPI_STATUS_IGNORE; integer _MPI_STATUSES_IGNORE; - } smpi_f90; + } smpi_; /* Convert between Fortran and C */ #define FORT_ADDR(addr, val) \ - (((void *)(addr) == (void*) &(smpi_f90._ ## val)) \ + (((void *)(addr) == (void*) &(smpi_._ ## val)) \ ? (val) : (void *)(addr)) #define FORT_BOTTOM(addr) FORT_ADDR(addr, MPI_BOTTOM) #define FORT_IN_PLACE(addr) FORT_ADDR(addr, MPI_IN_PLACE)