source: issm/oecreview/Archive/21724-22754/ISSM-22366-22367.diff@ 22755

../trunk-jpl/src/wrappers/matlab/io/FetchMatlabData.cpp

@@ -845 +845 @@
 }/*}}}*/
 GenericOption<char*>* OptionCharParse( char* name, const mxArray* prhs[]){ /*{{{*/
 
-        GenericOption<char*>  *ochar = NULL;
-
         /*check and parse the name  */
-        ochar=new GenericOption<char*>();
+        GenericOption<char*>* ochar=new GenericOption<char*>();
         ochar->name =xNew<char>(strlen(name)+1);
         memcpy(ochar->name,name,(strlen(name)+1)*sizeof(char));
 
@@ -856 +854 @@
         if (!mxIsClass(prhs[0],"char")){
                 _error_("Value of option \"" << ochar->name  << "\" must be class \"char\", not class \"" << mxGetClassName(prhs[0]) <<"\".");
         }
-        FetchData(&ochar->value,&ochar->numel,&ochar->ndims,&ochar->size,prhs[0]);
+        //FetchData(&ochar->value,&ochar->numel,&ochar->ndims,&ochar->size,prhs[0]);
+        FetchData(&ochar->value,prhs[0]);
+        ochar->numel = strlen(name);
+        ochar->ndims = 2;
+        ochar->size = xNew<int>(2);
+        ochar->size[0] = ochar->numel;
+        ochar->size[1] = 1;
 
         return(ochar);
 }/*}}}*/