Lines Matching refs:comm

4 static PetscErrorCode GarbageGetHMap_Private(MPI_Comm comm, PetscGarbage *garbage)  in GarbageGetHMap_Private()  argument
10 PetscCallMPI(MPI_Comm_get_attr(comm, Petsc_Garbage_HMap_keyval, garbage, &iflg)); in GarbageGetHMap_Private()
15 PetscCallMPI(MPI_Comm_set_attr(comm, Petsc_Garbage_HMap_keyval, garbage->ptr)); in GarbageGetHMap_Private()
54 MPI_Comm comm; in PetscObjectDelayedDestroy() local
74 PetscCall(PetscObjectGetComm(*obj, &comm)); in PetscObjectDelayedDestroy()
75 PetscCallMPI(MPI_Comm_size(comm, &size)); in PetscObjectDelayedDestroy()
80 PetscCall(GarbageGetHMap_Private(comm, &garbage)); in PetscObjectDelayedDestroy()
135 PetscErrorCode GarbageKeyAllReduceIntersect_Private(MPI_Comm comm, PetscInt64 *set, PetscInt *entri… in GarbageKeyAllReduceIntersect_Private() argument
147 PetscCallMPI(MPIU_Allreduce(entries, &max_entries, 1, MPIU_INT, MPI_MAX, comm)); in GarbageKeyAllReduceIntersect_Private()
160 …PetscCallMPI(MPIU_Allreduce(sendset, recvset, 1, keyset_type, Petsc_Garbage_SetIntersectOp, comm)); in GarbageKeyAllReduceIntersect_Private()
206 PetscErrorCode PetscGarbageCleanup(MPI_Comm comm) in PetscGarbageCleanup() argument
215 PetscCall(PetscCommDuplicate(comm, &comm, NULL)); in PetscGarbageCleanup()
219 PetscCall(GarbageGetHMap_Private(comm, &garbage)); in PetscGarbageCleanup()
220 PetscCallMPI(MPI_Comm_delete_attr(comm, Petsc_Garbage_HMap_keyval)); in PetscGarbageCleanup()
229 PetscCall(GarbageKeyAllReduceIntersect_Private(comm, keys, &entries)); in PetscGarbageCleanup()
242 PetscCallMPI(MPI_Comm_set_attr(comm, Petsc_Garbage_HMap_keyval, garbage.ptr)); in PetscGarbageCleanup()
243 PetscCall(PetscCommDestroy(&comm)); in PetscGarbageCleanup()
248 PetscErrorCode PetscGarbageView(MPI_Comm comm, PetscViewer viewer) in PetscGarbageView() argument
258 PetscCall(PetscPrintf(comm, "PETSc garbage on ")); in PetscGarbageView()
259 if (comm == PETSC_COMM_WORLD) { in PetscGarbageView()
260 PetscCall(PetscPrintf(comm, "PETSC_COMM_WORLD\n")); in PetscGarbageView()
261 } else if (comm == PETSC_COMM_SELF) { in PetscGarbageView()
262 PetscCall(PetscPrintf(comm, "PETSC_COMM_SELF\n")); in PetscGarbageView()
264 PetscCall(PetscPrintf(comm, "UNKNOWN_COMM\n")); in PetscGarbageView()
266 PetscCall(PetscCommDuplicate(comm, &comm, NULL)); in PetscGarbageView()
267 PetscCall(GarbageGetHMap_Private(comm, &garbage)); in PetscGarbageView()
276 PetscCallMPI(MPI_Comm_rank(comm, &rank)); in PetscGarbageView()
277 PetscCall(PetscSynchronizedPrintf(comm, "Rank %i:: ", rank)); in PetscGarbageView()
279 PetscCall(PetscSynchronizedPrintf(comm, text, entries)); in PetscGarbageView()
281 …PetscCall(PetscSynchronizedPrintf(comm, "| Key | Type | Name … in PetscGarbageView()
282 …PetscCall(PetscSynchronizedPrintf(comm, "|-------|------------------------|-----------------------… in PetscGarbageView()
287 …PetscCall(PetscSynchronizedPrintf(comm, text, keys[ii], obj->class_name, obj->description, obj->id… in PetscGarbageView()
289 PetscCall(PetscSynchronizedFlush(comm, PETSC_STDOUT)); in PetscGarbageView()
292 PetscCall(PetscCommDestroy(&comm)); in PetscGarbageView()