Choose integer size according to MPI_ADDRESS_SIZE.

[simgrid.git] / teshsuite / smpi / mpich3-test / f77 / datatype / typeaints.h.in

diff --git a/teshsuite/smpi/mpich3-test/f77/datatype/typeaints.h.in b/teshsuite/smpi/mpich3-test/f77/datatype/typeaints.h.in
new file mode 100644 (file)
index 0000000..5cfae7b
--- /dev/null
+++ b/teshsuite/smpi/mpich3-test/f77/datatype/typeaints.h.in
@@ -0,0 +1,6 @@
+C -*- Mode: Fortran; -*-
+C
+C  (C) 2003 by Argonne National Laboratory.
+C      See COPYRIGHT in top-level directory.
+C
+      integer*@MPI_ADDRESS_SIZE@ aint, aintv(max_asizev)