@@ -28,31 +28,31 @@ int main (int argc, char *argv[])
2828
2929 rc = MPI_Session_create_errhandler (my_session_errhandler , & errhandler );
3030 if (MPI_SUCCESS != rc ) {
31- print_error ("Error handler creation failed with rc = %d\n " , rc );
31+ print_error ("Error handler creation failed" , rc );
3232 return -1 ;
3333 }
3434
3535 rc = MPI_Info_create (& info );
3636 if (MPI_SUCCESS != rc ) {
37- print_error ("Info creation failed with rc = %d\n " , rc );
37+ print_error ("Info creation failed" , rc );
3838 return -1 ;
3939 }
4040
4141 rc = MPI_Info_set (info , "mpi_thread_support_level" , "MPI_THREAD_MULTIPLE" );
4242 if (MPI_SUCCESS != rc ) {
43- print_error ("Info key/val set failed with rc = %d\n " , rc );
43+ print_error ("Info key/val set failed" , rc );
4444 return -1 ;
4545 }
4646
4747 rc = MPI_Session_init (info , errhandler , & session );
4848 if (MPI_SUCCESS != rc ) {
49- print_error ("Session initialization failed with rc = %d\n " , rc );
49+ print_error ("Session initialization failed" , rc );
5050 return -1 ;
5151 }
5252
5353 rc = MPI_Session_init (info , errhandler , & session1 );
5454 if (MPI_SUCCESS != rc ) {
55- print_error ("Session1 initialization failed with rc = %d\n " , rc );
55+ print_error ("Session1 initialization failed" , rc );
5656 return -1 ;
5757 }
5858
@@ -74,13 +74,13 @@ int main (int argc, char *argv[])
7474
7575 rc = MPI_Group_from_session_pset (session , "mpi://WORLD" , & group );
7676 if (MPI_SUCCESS != rc ) {
77- print_error ("Could not get a group for mpi://WORLD. rc = %d\n " , rc );
77+ print_error ("Could not get a group for mpi://WORLD. " , rc );
7878 return -1 ;
7979 }
8080
8181 rc = MPI_Group_from_session_pset (session1 , "mpi://WORLD" , & group1 );
8282 if (MPI_SUCCESS != rc ) {
83- print_error ("Could not get a group1 for mpi://WORLD. rc = %d\n " , rc );
83+ print_error ("Could not get a group1 for mpi://WORLD. " , rc );
8484 return -1 ;
8585 }
8686
@@ -95,13 +95,13 @@ int main (int argc, char *argv[])
9595
9696 rc = MPI_Group_from_session_pset (session , "mpi://SELF" , & group );
9797 if (MPI_SUCCESS != rc ) {
98- print_error ("Could not get a group for mpi://SELF. rc = %d\n " , rc );
98+ print_error ("Could not get a group for mpi://SELF. " , rc );
9999 return -1 ;
100100 }
101101
102102 rc = MPI_Group_from_session_pset (session1 , "mpi://SELF" , & group1 );
103103 if (MPI_SUCCESS != rc ) {
104- print_error ("Could not get a group1 for mpi://SELF. rc = %d\n " , rc );
104+ print_error ("Could not get a group1 for mpi://SELF. " , rc );
105105 return -1 ;
106106 }
107107
0 commit comments