Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'S4U'
[simgrid.git] / teshsuite / smpi / mpich3-test / f90 / pt2pt / allpairf90.f90
index 70f5c51..a0cfd21 100644 (file)
@@ -21,6 +21,7 @@
       call MTest_Init( ierr )
 
       do while ( mtestGetIntraComm( comm, 2, .false. ) )
+
          call test_pair_send( comm, errs )
          call test_pair_ssend( comm, errs )
          !call test_pair_rsend( comm, errs )
@@ -29,7 +30,7 @@
          call test_pair_issend( comm, errs )
          call test_pair_psend( comm, errs )
          !call test_pair_prsend( comm, errs )
-         call test_pair_pssend( comm, errs )
+         !call test_pair_pssend( comm, errs )
          call test_pair_sendrecv( comm, errs )
          call test_pair_sendrecvrepl( comm, errs )
          call mtestFreeComm( comm )