[cig-commits] r19222 - short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/problems

[brad at geodynamics.org]

Author: brad
Date: 2011-11-21 10:01:59 -0800 (Mon, 21 Nov 2011)
New Revision: 19222

Modified:
   short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/problems/Solver.cc
Log:
Added consistency check for faultIS when getting submatrix.

Modified: short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/problems/Solver.cc
===================================================================
--- short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/problems/Solver.cc	2011-11-21 17:50:42 UTC (rev 19221)
+++ short/3D/PyLith/branches/v1.6-stable/libsrc/pylith/problems/Solver.cc	2011-11-21 18:01:59 UTC (rev 19222)
@@ -49,6 +49,7 @@
   PetscFunctionBegin;
   ierr = MatShellGetContext(mat, (void **) &ctx);CHKERRQ(ierr);
   ierr = PCFieldSplitGetIS(ctx->pc, ctx->faultFieldName, &faultIS);CHKERRQ(ierr);
+  assert(faultIS);
   ierr = ISEqual(isrow, faultIS, &isFaultRow);CHKERRQ(ierr);
   ierr = ISEqual(iscol, faultIS, &isFaultCol);CHKERRQ(ierr);
   if (isFaultRow && isFaultCol) {