[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