Changeset 374

Timestamp:

05/13/09 08:37:06 (16 years ago)

Author:

Eric.Larour

Message:

Empty matrix bug fix

File:

• issm/trunk/src/c/toolkits/petsc/patches/PetscMatrixToMatlabMatrix.cpp (modified) (2 diffs)

issm/trunk/src/c/toolkits/petsc/patches/PetscMatrixToMatlabMatrix.cpp

@@ -106 +106 @@
                 /*Ok, allocate arrays: */
                 dataref = mxCreateSparse((mwSize)0,(mwSize)0,(mwSize)0,mxREAL);
-                
+        
+                mxSetM(dataref,(mwSize)cols);
+                mxSetN(dataref,(mwSize)rows);
+                mxSetNzmax(dataref,(mwSize)nzmax);
+        
                 if(nnz){
                         /* free first to avoid mem leaks...: */
@@ -114 +118 @@
 
                         /* ...then set data: */
-                        mxSetM(dataref,(mwSize)cols);
-                        mxSetN(dataref,(mwSize)rows);
-                        mxSetNzmax(dataref,(mwSize)nzmax);
                         mxSetData( dataref, val);
                         mxSetIr(dataref,col_ind);