410   } icomm;  in Petsc_InnerComm_Attr_DeleteFn()  local
414   icomm.ptr = attr_val;  in Petsc_InnerComm_Attr_DeleteFn()
423     PetscCallMPIReturnMPI(MPI_Comm_get_attr(icomm.comm, Petsc_OuterComm_keyval, &ocomm, &flg));  in Petsc_InnerComm_Attr_DeleteFn()
427   PetscCallMPIReturnMPI(MPI_Comm_delete_attr(icomm.comm, Petsc_OuterComm_keyval));  in Petsc_InnerComm_Attr_DeleteFn()
428 … "User MPI_Comm %ld is being unlinked from inner PETSc comm %ld\n", (long)comm, (long)icomm.comm));  in Petsc_InnerComm_Attr_DeleteFn()
1727     MPI_Comm          icomm;  in PetscFinalize()  local
1735       icomm = ucomm.comm;  in PetscFinalize()
1736       PetscCallMPI(MPI_Comm_get_attr(icomm, Petsc_Counter_keyval, &counter, &flg));  in PetscFinalize()
1740       PetscCallMPI(MPI_Comm_delete_attr(icomm, Petsc_Counter_keyval));  in PetscFinalize()
1741       PetscCallMPI(MPI_Comm_free(&icomm));  in PetscFinalize()
1745       icomm = ucomm.comm;  in PetscFinalize()
1746       PetscCallMPI(MPI_Comm_get_attr(icomm, Petsc_Counter_keyval, &counter, &flg));  in PetscFinalize()
1750       PetscCallMPI(MPI_Comm_delete_attr(icomm, Petsc_Counter_keyval));  in PetscFinalize()
1751       PetscCallMPI(MPI_Comm_free(&icomm));  in PetscFinalize()