[cig-commits] r18336 - short/3D/PyLith/trunk/libsrc/problems
brad at geodynamics.org
brad at geodynamics.org
Mon May 9 15:50:51 PDT 2011
Author: brad
Date: 2011-05-09 15:50:51 -0700 (Mon, 09 May 2011)
New Revision: 18336
Modified:
short/3D/PyLith/trunk/libsrc/problems/Solver.cc
Log:
Trivial change.
Modified: short/3D/PyLith/trunk/libsrc/problems/Solver.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/problems/Solver.cc 2011-05-09 15:41:36 UTC (rev 18335)
+++ short/3D/PyLith/trunk/libsrc/problems/Solver.cc 2011-05-09 22:50:51 UTC (rev 18336)
@@ -44,6 +44,7 @@
PetscBool isFaultRow, isFaultCol;
PetscErrorCode ierr = 0;
+ PetscFunctionBegin;
ierr = MatShellGetContext(mat, (void **) &ctx);CHKERRQ(ierr);
ierr = PCFieldSplitGetIS(ctx->pc, ctx->faultFieldName, &faultIS);CHKERRQ(ierr);
ierr = ISEqual(isrow, faultIS, &isFaultRow);CHKERRQ(ierr);
@@ -57,7 +58,7 @@
ierr = MatGetSubMatrix(ctx->A, isrow, iscol, reuse, newmat);CHKERRQ(ierr);
} // if/else
- return 0;
+ PetscFunctionReturn(0);
} // MyMatGetSubMatrix
EXTERN_C_END
More information about the CIG-COMMITS
mailing list