Changeset 18254

Timestamp:

07/17/14 08:17:58 (11 years ago)

Author:

Mathieu Morlighem

Message:

CHG: added check on allocation

File:

• issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscMat.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscMat.cpp

@@ -42 +42 @@
         MatSetSizes(this->matrix,m,n,M,N);
         MatSetFromOptions(this->matrix);
-        MatMPIAIJSetPreallocation(this->matrix,0,d_nnz,0,o_nnz);
+        PetscErrorCode ierr = MatMPIAIJSetPreallocation(this->matrix,0,d_nnz,0,o_nnz);
+        if(ierr) _error_("PETSc could not allocate matrix (probably not enough memory)");
 //      MatSetOption(this->matrix,MAT_NEW_NONZERO_ALLOCATION_ERR,PETSC_FALSE);
 
@@ -160 +161 @@
 void PetscMat::SetValues(int m,int* idxm,int n,int* idxn,IssmDouble* values,InsMode mode){/*{{{*/
 
-        PetscErrorCode ierr;
-        ierr = MatSetValues(this->matrix,m,idxm,n,idxn,values,ISSMToPetscInsertMode(mode));
-        if(ierr) _error_("PETSC's MatSetValues reported an error");
+        PetscErrorCode ierr = MatSetValues(this->matrix,m,idxm,n,idxn,values,ISSMToPetscInsertMode(mode));
+        if(ierr) _error_("PETSc's MatSetValues reported an error");
 
 }