remove warnings

[simgrid.git] / teshsuite / smpi / mpich3-test / f90 / coll / vw_inplacef90.f90

diff --git a/teshsuite/smpi/mpich3-test/f90/coll/vw_inplacef90.f90 b/teshsuite/smpi/mpich3-test/f90/coll/vw_inplacef90.f90
index 1ed0bf7..192cb02 100644 (file)
--- a/teshsuite/smpi/mpich3-test/f90/coll/vw_inplacef90.f90
+++ b/teshsuite/smpi/mpich3-test/f90/coll/vw_inplacef90.f90
@@ -14,7 +14,7 @@
        integer rbuf(MAX_SIZE)
        integer rdispls(MAX_SIZE), rcounts(MAX_SIZE), rtypes(MAX_SIZE)
        integer ierr, errs
-       integer comm, root
+       integer comm
        integer rank, size
        integer iexpected, igot
        integer i, j