12 #define IndexSpaceGet(buf, nrow, ncol, irowm, icolm) \  argument
15       PetscCall(PetscMalloc2(nrow, &irowm, ncol, &icolm)); \
17       irowm = &buf[0]; \
22 #define IndexSpaceRestore(buf, nrow, ncol, irowm, icolm) \  argument
24 … if (nrow + ncol > (PetscInt)PETSC_STATIC_ARRAY_LENGTH(buf)) PetscCall(PetscFree2(irowm, icolm)); \
38   PetscInt      buf[4096], *irowm = NULL, *icolm; /* suppress maybe-uninitialized warning */  in MatSetValuesBlockedLocal_LocalRef_Block()  local
42   IndexSpaceGet(buf, nrow, ncol, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Block()
43   PetscCall(ISLocalToGlobalMappingApplyBlock(A->rmap->mapping, nrow, irow, irowm));  in MatSetValuesBlockedLocal_LocalRef_Block()
45   PetscCall((*lr->SetValuesBlocked)(lr->Top, nrow, irowm, ncol, icolm, y, addv));  in MatSetValuesBlockedLocal_LocalRef_Block()
46   IndexSpaceRestore(buf, nrow, ncol, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Block()
53   PetscInt      rbs, cbs, buf[4096], *irowm, *icolm;  in MatSetValuesBlockedLocal_LocalRef_Scalar()  local
57   IndexSpaceGet(buf, nrow * rbs, ncol * cbs, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
58   BlockIndicesExpand(nrow, irow, rbs, irowm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
60   PetscCall(ISLocalToGlobalMappingApplyBlock(A->rmap->mapping, nrow * rbs, irowm, irowm));  in MatSetValuesBlockedLocal_LocalRef_Scalar()
62   PetscCall((*lr->SetValues)(lr->Top, nrow * rbs, irowm, ncol * cbs, icolm, y, addv));  in MatSetValuesBlockedLocal_LocalRef_Scalar()
63   IndexSpaceRestore(buf, nrow * rbs, ncol * cbs, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
70   PetscInt      buf[4096], *irowm, *icolm;  in MatSetValuesLocal_LocalRef_Scalar()  local
73   IndexSpaceGet(buf, nrow, ncol, irowm, icolm);  in MatSetValuesLocal_LocalRef_Scalar()
77     PetscCall(ISLocalToGlobalMappingApply(A->rmap->mapping, nrow, irow, irowm));  in MatSetValuesLocal_LocalRef_Scalar()
79     PetscCall(ISLocalToGlobalMappingApplyBlock(A->rmap->mapping, nrow, irow, irowm));  in MatSetValuesLocal_LocalRef_Scalar()
87   PetscCall((*lr->SetValues)(lr->Top, nrow, irowm, ncol, icolm, y, addv));  in MatSetValuesLocal_LocalRef_Scalar()
88   IndexSpaceRestore(buf, nrow, ncol, irowm, icolm);  in MatSetValuesLocal_LocalRef_Scalar()