tclsci fixed after 33ce445f981d
[scilab.git] / scilab / modules / tclsci / src / c / TCL_ArrayDim.c
index de4ae88..54503a1 100644 (file)
@@ -49,8 +49,7 @@ char **TCL_ArrayDim(Tcl_Interp *TCLinterpreter, char *VarName, int *nb_lines, in
 {
     char **index_list = NULL;
 
-
-    if (strcmp(VarName, TCL_ALL_INDEXES) == 0 || strcmp(VarName, TCL_NUMERICAL_INDEXES) == 0)
+    if (strcmp(VarName, TCL_ALL_INDEXES) && strcmp(VarName, TCL_NUMERICAL_INDEXES))
     {
         char MyTclCommand[2048];
         char *StrArrayIndexes = NULL;