On Wed, 12 May 2010 13:58:26 -0300, Lisandro Dalcin <dalcinl at gmail.com> wrote: > Likely Barry did not got this
@@ -73,9 +73,7 @@
} else if (size == 1) {
*a = A;
*iscopy = PETSC_FALSE;
- } else {
- SETERRQ(PETSC_COMM_SELF,PETSC_ERR_SUP,"Cannot get diagonal part for this
matrix");
- }
+ } SETERRQ(((PetscObject)A)->comm,PETSC_ERR_SUP,"Cannot get diagonal part for
this matrix");
PetscFunctionReturn(0);
}
Clearly, fix pushed.
Jed
