Avoid to build unused tests and save up to 25% on build time.

[simgrid.git] / teshsuite / smpi / mpich3-test / f90 / datatype / typecntsf90.f90

diff --git a/teshsuite/smpi/mpich3-test/f90/datatype/typecntsf90.f90 b/teshsuite/smpi/mpich3-test/f90/datatype/typecntsf90.f90
index cfe399371cf4c3535f4412b2681ecf1a7e6b6014..8eb870a89130c21e7f0d544c997c6a842b1e4fe6 100644 (file)
--- a/teshsuite/smpi/mpich3-test/f90/datatype/typecntsf90.f90
+++ b/teshsuite/smpi/mpich3-test/f90/datatype/typecntsf90.f90
@@ -40,7 +40,7 @@
        integer max_nints, max_dtypes, max_asizev
        parameter (max_nints = 10, max_dtypes = 10, max_asizev=10)
        integer intv(max_nints), dtypesv(max_dtypes)
-       integer (kind=MPI_ADDRESS_KIND) aint, aintv(max_asizev)
+       integer (kind=MPI_ADDRESS_KIND) aintv(max_asizev)
 
 !
        call mpi_type_get_envelope( dtype, nints, nadds, ntype, &