X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/445f440089c72923074f05abf972f1b55d7bb701..ace2703b2647ad734e061d15919b0083119e902b:/teshsuite/smpi/mpich3-test/f77/rma/addsize.h diff --git a/teshsuite/smpi/mpich3-test/f77/rma/addsize.h b/teshsuite/smpi/mpich3-test/f77/rma/addsize.h index f5010a404f..300e81f0bd 100644 --- a/teshsuite/smpi/mpich3-test/f77/rma/addsize.h +++ b/teshsuite/smpi/mpich3-test/f77/rma/addsize.h @@ -3,4 +3,9 @@ C C (C) 2003 by Argonne National Laboratory. C See COPYRIGHT in top-level directory. C +C SimGrid comment : +C This file holds a value which should have the same size as an MPI_Aint +C that can hold any pointer. In f90 it's a integer (kind=MPI_ADDRESS_KIND) +C Original mpich testsuite uses autconf to configure the right size to use +C Integer is not right on some systems, we set it to integer*8 by default integer*8 asize