]> AND Public Git Repository - simgrid.git/blobdiff - teshsuite/smpi/mpich3-test/f90/coll/nonblockingf90.f90
Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Fix a bug in concurrent modif of a collection that was revealed by GLIBCXX_DEBUG
[simgrid.git] / teshsuite / smpi / mpich3-test / f90 / coll / nonblockingf90.f90
index a07df71d8bb40948ed7ffb9b8a6e0a9930e9dd40..51dda009a35628b8b669a19dee0d6e58a8620d75 100644 (file)
@@ -1,5 +1,5 @@
 ! This file created from test/mpi/f77/coll/nonblockingf.f with f77tof90
-! -*- Mode: Fortran; -*- 
+! -*- Mode: Fortran; -*-
 !
 !  (C) 2012 by Argonne National Laboratory.
 !      See COPYRIGHT in top-level directory.
@@ -25,7 +25,7 @@
       comm = MPI_COMM_WORLD
       call MPI_Comm_size(comm, size, ierr)
       call MPI_Comm_rank(comm, rank, ierr)
-!      
+!
       do ii = 1, size
          sbuf(2*ii-1) = ii
          sbuf(2*ii)   = ii