Changeset 818

Timestamp:

06/05/09 14:46:58 (15 years ago)

Author:

Eric.Larour

Message:

Transpose missing

File:

• issm/trunk/src/c/io/SerialWriteData.cpp (modified) (2 diffs)

issm/trunk/src/c/io/SerialWriteData.cpp

@@ -51 +51 @@
         /*Matlab arrays: */
         mxArray* dataref=NULL;
+        mxArray* tdataref=NULL;
 
         /*Branch on the type of data:*/
@@ -80 +81 @@
                                 
                                 /*data is a double* pointer. Copy into a matrix: */
-                                dataref = mxCreateDoubleMatrix(0,0,mxREAL);
-                                mxSetM(dataref,(mwSize)M);
-                                mxSetN(dataref,(mwSize)N);
-                                mxSetPr(dataref,(double*)data);
+                                tdataref = mxCreateDoubleMatrix(0,0,mxREAL);
+                                mxSetM(tdataref,(mwSize)N);
+                                mxSetN(tdataref,(mwSize)M);
+                                mxSetPr(tdataref,(double*)data);
+
+                                //transpose
+                                mexCallMATLAB(1,&dataref,1,&tdataref, "'");
                         }
                         else{