remove warnings

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

diff --git a/teshsuite/smpi/mpich3-test/f90/datatype/allctypesf90.f90 b/teshsuite/smpi/mpich3-test/f90/datatype/allctypesf90.f90
index 1e1841f..a150618 100644 (file)
--- a/teshsuite/smpi/mpich3-test/f90/datatype/allctypesf90.f90
+++ b/teshsuite/smpi/mpich3-test/f90/datatype/allctypesf90.f90
@@ -6,7 +6,7 @@
 !
       program main
       use mpi
-      integer atype, ierr
+      integer ierr
 !
       call mtest_init(ierr)
       call mpi_comm_set_errhandler( MPI_COMM_WORLD, MPI_ERRORS_RETURN,  &