12 #define IndexSpaceGet(buf, nrow, ncol, irowm, icolm) \  argument
15       PetscCall(PetscMalloc2(nrow, &irowm, ncol, &icolm)); \
18       icolm = &buf[nrow]; \
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()
44   PetscCall(ISLocalToGlobalMappingApplyBlock(A->cmap->mapping, ncol, icol, icolm));  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()
59   BlockIndicesExpand(ncol, icol, cbs, icolm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
61   PetscCall(ISLocalToGlobalMappingApplyBlock(A->cmap->mapping, ncol * cbs, icolm, icolm));  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()
83     PetscCall(ISLocalToGlobalMappingApply(A->cmap->mapping, ncol, icol, icolm));  in MatSetValuesLocal_LocalRef_Scalar()
85     PetscCall(ISLocalToGlobalMappingApplyBlock(A->cmap->mapping, ncol, icol, icolm));  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()