@@ -489,8 +489,8 @@ int ompi_comm_ishrink_internal(ompi_communicator_t* comm, ompi_communicator_t**
489
489
subreq ,
490
490
comm -> c_coll -> coll_iagree_module );
491
491
if ( OMPI_SUCCESS != rc ) {
492
- ompi_comm_request_return (request );
493
492
OBJ_RELEASE (context -> failed_group );
493
+ ompi_comm_request_return (request );
494
494
return rc ;
495
495
}
496
496
@@ -523,8 +523,8 @@ static int ompi_comm_ishrink_check_agree(ompi_comm_request_t *request) {
523
523
rc = request -> super .req_status .MPI_ERROR ;
524
524
if ( (OMPI_SUCCESS != rc ) && (MPI_ERR_PROC_FAILED != rc ) ) {
525
525
opal_output (0 , "%s:%d Agreement failure: %d\n" , __FILE__ , __LINE__ , rc );
526
- ompi_comm_request_return (request );
527
526
OBJ_RELEASE (context -> failed_group );
527
+ ompi_comm_request_return (request );
528
528
return rc ;
529
529
}
530
530
@@ -542,8 +542,8 @@ static int ompi_comm_ishrink_check_agree(ompi_comm_request_t *request) {
542
542
subreq ,
543
543
comm -> c_coll -> coll_iagree_module );
544
544
if ( OMPI_SUCCESS != rc ) {
545
- ompi_comm_request_return (request );
546
545
OBJ_RELEASE (context -> failed_group );
546
+ ompi_comm_request_return (request );
547
547
return rc ;
548
548
}
549
549
ompi_comm_request_schedule_append (request , ompi_comm_ishrink_check_agree , subreq , 1 );
@@ -565,17 +565,17 @@ static int ompi_comm_ishrink_check_agree(ompi_comm_request_t *request) {
565
565
comm_group = comm -> c_local_group ;
566
566
rc = ompi_group_difference (comm_group , context -> failed_group , & context -> alive_group );
567
567
if ( OMPI_SUCCESS != rc ) {
568
- ompi_comm_request_return (request );
569
568
OBJ_RELEASE (context -> failed_group );
569
+ ompi_comm_request_return (request );
570
570
return rc ;
571
571
}
572
572
if ( OMPI_COMM_IS_INTER (comm ) ) {
573
573
comm_group = comm -> c_remote_group ;
574
574
rc = ompi_group_difference (comm_group , context -> failed_group , & context -> alive_rgroup );
575
575
if ( OMPI_SUCCESS != rc ) {
576
- ompi_comm_request_return (request );
577
576
OBJ_RELEASE (context -> alive_group );
578
577
OBJ_RELEASE (context -> failed_group );
578
+ ompi_comm_request_return (request );
579
579
return rc ;
580
580
}
581
581
}
@@ -595,11 +595,11 @@ static int ompi_comm_ishrink_check_agree(ompi_comm_request_t *request) {
595
595
subreq
596
596
);
597
597
if ( OMPI_SUCCESS != rc ) {
598
- ompi_comm_request_return (request );
599
598
OBJ_RELEASE (context -> alive_group );
600
599
if ( NULL != context -> alive_rgroup ) {
601
600
OBJ_RELEASE (context -> alive_rgroup );
602
601
}
602
+ ompi_comm_request_return (request );
603
603
return rc ;
604
604
}
605
605
@@ -628,8 +628,8 @@ static int ompi_comm_ishrink_check_setrank(ompi_comm_request_t *request) {
628
628
opal_output_verbose (1 , ompi_ftmpi_output_handle ,
629
629
"%s ompi: comm_ishrink: Construction failed with error %d" ,
630
630
OMPI_NAME_PRINT (OMPI_PROC_MY_NAME ), rc );
631
- ompi_comm_request_return (request );
632
631
OBJ_RELEASE (* context -> newcomm );
632
+ ompi_comm_request_return (request );
633
633
return rc ;
634
634
}
635
635
@@ -663,8 +663,8 @@ static int ompi_comm_ishrink_check_setrank(ompi_comm_request_t *request) {
663
663
mode , /* mode */
664
664
subreq );
665
665
if ( OMPI_SUCCESS != rc ) {
666
- ompi_comm_request_return (request );
667
666
OBJ_RELEASE (* context -> newcomm );
667
+ ompi_comm_request_return (request );
668
668
return rc ;
669
669
}
670
670
@@ -687,8 +687,8 @@ static int ompi_comm_ishrink_check_cid(ompi_comm_request_t *request) {
687
687
opal_output_verbose (1 , ompi_ftmpi_output_handle ,
688
688
"%s ompi: comm_ishrink: Determine context id failed with error %d" ,
689
689
OMPI_NAME_PRINT (OMPI_PROC_MY_NAME ), rc );
690
- ompi_comm_request_return (request );
691
690
OBJ_RELEASE (* context -> newcomm );
691
+ ompi_comm_request_return (request );
692
692
return rc ;
693
693
}
694
694
#if OPAL_ENABLE_DEBUG
@@ -724,8 +724,8 @@ static int ompi_comm_ishrink_check_cid(ompi_comm_request_t *request) {
724
724
mode ,
725
725
subreq );
726
726
if ( OMPI_SUCCESS != rc ) {
727
- ompi_comm_request_return (request );
728
727
OBJ_RELEASE (* context -> newcomm );
728
+ ompi_comm_request_return (request );
729
729
return rc ;
730
730
}
731
731
@@ -747,8 +747,8 @@ static int ompi_comm_ishrink_check_activate(ompi_comm_request_t *request) {
747
747
opal_output_verbose (1 , ompi_ftmpi_output_handle ,
748
748
"%s ompi: comm_ishrink: Activation failed with error %d" ,
749
749
OMPI_NAME_PRINT (OMPI_PROC_MY_NAME ), rc );
750
- ompi_comm_request_return (request );
751
750
OBJ_RELEASE (* context -> newcomm );
751
+ ompi_comm_request_return (request );
752
752
return rc ;
753
753
}
754
754
#if OPAL_ENABLE_DEBUG
0 commit comments