fix bug from previous version in matfile_open that use undocumented/unused option... 96/11496/2
Antoine ELIAS [Tue, 14 May 2013 15:22:21 +0000 (17:22 +0200)]
Change-Id: Ibd9a9826f1ca1eecbad46994e50f4a25822c977b

scilab/modules/matio/sci_gateway/c/sci_matfile_open.c

index c86a4df..3535a01 100644 (file)
@@ -140,19 +140,21 @@ int sci_matfile_open(char *fname, unsigned long fname_len)
         option = MAT_ACC_RDONLY;
     }
 
-    /* Try to open the file (as a Matlab 5 file) */
-    matfile = Mat_Open(filename, option);
+    if (option == MAT_ACC_RDWR)
+    {
+        /* create a Matlab 5 file */
+        matfile = Mat_CreateVer(filename, NULL, 0);
+    }
+    else
+    {
+        /* Try to open the file (as a Matlab 5 file) */
+        matfile = Mat_Open(filename, option);
+    }
 
     if (matfile == NULL) /* Opening failed */
     {
-        /* Try to open the file (as a Matlab 4 file) */
-        matfile = Mat_Open(filename, option | MAT_FT_MAT4);
-
-        if (matfile == NULL) /* Opening failed */
-        {
-            /* Function returns -1 */
-            fileIndex = -1;
-        }
+        /* Function returns -1 */
+        fileIndex = -1;
     }
 
     if (matfile != NULL) /* Opening succeed */