remove warnings

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

diff --git a/teshsuite/smpi/mpich3-test/f90/datatype/hindexed_blockf90.f90 b/teshsuite/smpi/mpich3-test/f90/datatype/hindexed_blockf90.f90
index 32a59e7..f2977fa 100644 (file)
--- a/teshsuite/smpi/mpich3-test/f90/datatype/hindexed_blockf90.f90
+++ b/teshsuite/smpi/mpich3-test/f90/datatype/hindexed_blockf90.f90
@@ -13,7 +13,6 @@
       integer (kind=MPI_ADDRESS_KIND) aint, aintv(max_asizev)
 
       integer blocklens(max_asizev), dtypes(max_asizev)
-      integer displs(max_asizev)
       integer recvbuf(6*max_asizev)
       integer sendbuf(max_asizev), status(MPI_STATUS_SIZE)
       integer rank, size