A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
these can now be activated
[simgrid.git]
/
teshsuite
/
smpi
/
mpich3-test
/
f77
/
pt2pt
/
allpairf.f
diff --git
a/teshsuite/smpi/mpich3-test/f77/pt2pt/allpairf.f
b/teshsuite/smpi/mpich3-test/f77/pt2pt/allpairf.f
index
ddc5164
..
f3ef158
100644
(file)
--- a/
teshsuite/smpi/mpich3-test/f77/pt2pt/allpairf.f
+++ b/
teshsuite/smpi/mpich3-test/f77/pt2pt/allpairf.f
@@
-23,13
+23,13
@@
C verbose = .true.
do while ( mtestGetIntraComm( comm, 2, .false. ) )
call test_pair_send( comm, errs )
call test_pair_ssend( comm, errs )
do while ( mtestGetIntraComm( comm, 2, .false. ) )
call test_pair_send( comm, errs )
call test_pair_ssend( comm, errs )
-
!
call test_pair_rsend( comm, errs )
+ call test_pair_rsend( comm, errs )
call test_pair_isend( comm, errs )
call test_pair_isend( comm, errs )
-
!
call test_pair_irsend( comm, errs )
+ call test_pair_irsend( comm, errs )
call test_pair_issend( comm, errs )
call test_pair_issend( comm, errs )
-
!
call test_pair_psend( comm, errs )
+ call test_pair_psend( comm, errs )
!call test_pair_prsend( 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 )
call test_pair_sendrecv( comm, errs )
call test_pair_sendrecvrepl( comm, errs )
call mtestFreeComm( comm )