add some Scierror after printError to create an error in Scilab 62/5862/1
Allan CORNET [Tue, 10 Jan 2012 14:19:45 +0000 (15:19 +0100)]
Change-Id: I619620ba681eb8a8a7a48522a69e717d5b59ce33

96 files changed:
scilab/modules/action_binding/sci_gateway/cpp/sci_notify.cpp
scilab/modules/console/sci_gateway/c/sci_lines.c
scilab/modules/core/sci_gateway/c/sci_errclear.c
scilab/modules/core/sci_gateway/c/sci_exit.c
scilab/modules/core/sci_gateway/c/sci_format.c
scilab/modules/core/sci_gateway/c/sci_funcprot.c
scilab/modules/core/sci_gateway/c/sci_getversion.c
scilab/modules/core/sci_gateway/c/sci_lasterror.c
scilab/modules/core/sci_gateway/c/sci_newfun.c
scilab/modules/core/sci_gateway/c/sci_predef.c
scilab/modules/core/sci_gateway/c/sci_typename.c
scilab/modules/elementary_functions/sci_gateway/c/sci_base2dec.c
scilab/modules/elementary_functions/sci_gateway/c/sci_frexp.c
scilab/modules/elementary_functions/sci_gateway/c/sci_size.c
scilab/modules/fileio/sci_gateway/c/sci_basename.c
scilab/modules/fileio/sci_gateway/c/sci_chdir.c
scilab/modules/fileio/sci_gateway/c/sci_copyfile.c
scilab/modules/fileio/sci_gateway/c/sci_fileparts.c
scilab/modules/fileio/sci_gateway/c/sci_fprintfMat.c
scilab/modules/fileio/sci_gateway/c/sci_fscanfMat.c
scilab/modules/fileio/sci_gateway/c/sci_fullpath.c
scilab/modules/fileio/sci_gateway/c/sci_isdir.c
scilab/modules/fileio/sci_gateway/c/sci_isfile.c
scilab/modules/fileio/sci_gateway/c/sci_movefile.c
scilab/modules/fileio/sci_gateway/c/sci_mputl.c
scilab/modules/fileio/sci_gateway/c/sci_pathconvert.c
scilab/modules/fileio/sci_gateway/c/sci_tempname.c
scilab/modules/functions/sci_gateway/c/sci_exec.c
scilab/modules/functions/sci_gateway/c/sci_execstr.c
scilab/modules/functions/sci_gateway/c/sci_lib.c
scilab/modules/functions/sci_gateway/c/sci_libraryinfo.c
scilab/modules/functions/sci_gateway/c/sci_whereis.c
scilab/modules/gui/sci_gateway/cpp/sci_toprint.cpp
scilab/modules/helptools/sci_gateway/cpp/sci_buildDoc.cpp [new file with mode: 0644]
scilab/modules/helptools/sci_gateway/cpp/sci_buildDocv2.cpp
scilab/modules/history_manager/sci_gateway/c/sci_historysize.c
scilab/modules/io/sci_gateway/c/sci_file.c
scilab/modules/io/sci_gateway/c/sci_getenv.c
scilab/modules/io/sci_gateway/c/sci_setenv.c
scilab/modules/jvm/sci_gateway/c/sci_javaclasspath.c
scilab/modules/output_stream/sci_gateway/c/sci_msprintf.c
scilab/modules/output_stream/sci_gateway/cpp/sci_diary.cpp
scilab/modules/scinotes/sci_gateway/cpp/sci_scinotes.cpp
scilab/modules/signal_processing/sci_gateway/c/sci_conv2.c
scilab/modules/sound/sci_gateway/c/sci_PlaySound.c
scilab/modules/sound/sci_gateway/c/sci_beep.c
scilab/modules/special_functions/sci_gateway/c/sci_dlgamma.c
scilab/modules/special_functions/sci_gateway/c/sci_gamma.c
scilab/modules/special_functions/sci_gateway/c/sci_lgamma.c
scilab/modules/special_functions/src/c/special_functions.vcxproj
scilab/modules/string/sci_gateway/c/sci_isalphanum.c
scilab/modules/string/sci_gateway/c/sci_isascii.c
scilab/modules/string/sci_gateway/c/sci_isdigit.c
scilab/modules/string/sci_gateway/c/sci_length.c
scilab/modules/string/sci_gateway/c/sci_strchr.c
scilab/modules/string/sci_gateway/c/sci_strsplit.c
scilab/modules/string/sci_gateway/c/sci_strsubst.c
scilab/modules/ui_data/sci_gateway/cpp/sci_editvar.cpp
scilab/modules/windows_tools/sci_gateway/c/sci_dos.c
scilab/modules/windows_tools/sci_gateway/c/sci_winqueryreg.c
scilab/modules/xcos/sci_gateway/cpp/sci_Xcos.cpp
scilab/modules/xcos/sci_gateway/cpp/sci_xcosDiagramToHDF5.cpp
scilab/modules/xcos/src/cpp/xcosUtilities.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_XMLAttr_e.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_XMLAttr_length.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_XMLAttr_size.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_XMLList_e.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_XMLList_length.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_XMLList_size.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_c_i_XMLAttr.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_foo_i_XMLList.cpp
scilab/modules/xml/sci_gateway/cpp/sci_percent_s_i_XMLList.cpp
scilab/modules/xml/sci_gateway/cpp/sci_print.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlAddNs.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlAsNumber.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlAsText.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlDelete.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlDocument.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlDump.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlElement.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlGetNsByHref.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlGetNsByPrefix.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlGetOpenDocs.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlIsValidObject.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlNs.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlRead.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlReadStr.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlRemove.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlSetAttributes.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlValidate.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlValidationFile.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlWrite.cpp
scilab/modules/xml/sci_gateway/cpp/sci_xmlXPath.cpp
scilab/modules/xml/src/cpp/XMLList_insertion.hpp
scilab/modules/xml/src/cpp/extraction.hpp
scilab/modules/xml/src/cpp/insertion.hpp

index dfa4bf0..fc16294 100644 (file)
@@ -45,6 +45,7 @@ int sci_notify(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -52,6 +53,7 @@ int sci_notify(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -66,6 +68,7 @@ int sci_notify(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -87,6 +90,7 @@ int sci_notify(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -104,6 +108,7 @@ int sci_notify(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 75ae2ea..2fab57c 100644 (file)
@@ -64,6 +64,7 @@ static int sci_lines_no_rhs(char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
@@ -87,6 +88,7 @@ static int sci_lines_one_rhs(char *fname)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -160,6 +162,7 @@ static int sci_lines_two_rhs(char *fname)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -167,6 +170,7 @@ static int sci_lines_two_rhs(char *fname)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 6d4c106..6cd68e2 100644 (file)
@@ -33,6 +33,7 @@ int C2F(sci_errclear)(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index c71c4d9..095e3ea 100644 (file)
@@ -44,6 +44,7 @@ int C2F(sci_exit)(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -51,6 +52,7 @@ int C2F(sci_exit)(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -65,6 +67,7 @@ int C2F(sci_exit)(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
             return 0;
         }
 
index 924ec23..d39adbc 100644 (file)
@@ -65,6 +65,7 @@ static int sci_format_norhs(char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
     LhsVar(1) = Rhs + 1;
@@ -81,6 +82,7 @@ static int sci_format_onerhs(char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -188,6 +190,7 @@ static int sci_format_onerhs(char *fname)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                     return 0;
                 }
 
@@ -248,6 +251,7 @@ static int sci_format_tworhs(char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -255,6 +259,7 @@ static int sci_format_tworhs(char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index ef1c31e..739ea67 100644 (file)
@@ -35,6 +35,7 @@ int C2F(sci_funcprot)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -54,6 +55,7 @@ int C2F(sci_funcprot)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -61,6 +63,7 @@ int C2F(sci_funcprot)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -75,6 +78,7 @@ int C2F(sci_funcprot)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
index add704f..cdde8be 100644 (file)
@@ -85,6 +85,7 @@ int getversion_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -111,6 +112,7 @@ int getversion_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -158,6 +160,7 @@ int getversion_one_rhs(char *fname)
                                                        if(sciErr.iErr)
                                                        {
                                                                printError(&sciErr, 0);
+                                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                                                return 0;
                                                        }
 
@@ -222,6 +225,7 @@ int getversion_two_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -229,6 +233,7 @@ int getversion_two_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
index 1c46b01..aee12bc 100644 (file)
@@ -39,6 +39,7 @@ int C2F(sci_lasterror)(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -71,6 +72,7 @@ int C2F(sci_lasterror)(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
             return 0;
         }
     }
index c8fb7eb..577d98e 100644 (file)
@@ -49,6 +49,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -56,6 +57,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -63,6 +65,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -70,6 +73,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -89,6 +93,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -102,6 +107,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -125,6 +131,7 @@ int C2F(sci_newfun) (char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
     }
index 4a54214..bdb54d4 100644 (file)
@@ -100,6 +100,7 @@ int C2F(sci_predef)(char *fname,unsigned long fname_len)
                         if(sciErr.iErr)
                         {
                             printError(&sciErr, 0);
+                            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                         }
                         else
                         {
index 0678601..4eab529 100644 (file)
@@ -59,6 +59,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -67,6 +68,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
@@ -75,6 +77,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -82,6 +85,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
@@ -101,6 +105,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
@@ -114,6 +119,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -128,6 +134,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -139,6 +146,7 @@ int sci_typename_two_rhs(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -194,6 +202,7 @@ int sci_typename_no_rhs(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
@@ -213,6 +222,7 @@ int sci_typename_no_rhs(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
index 0cc3760..cd3b93d 100644 (file)
@@ -39,6 +39,7 @@ int sci_base2dec(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -51,6 +52,7 @@ int sci_base2dec(char *fname,unsigned long fname_len)
     sciErr = getVarAddressFromPosition(pvApiCtx, 2, &piAddressVarTwo);
     if(sciErr.iErr)
     {
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         printError(&sciErr, 0);
         return 0;
     }
@@ -131,6 +133,7 @@ int sci_base2dec(char *fname,unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index 91f4f26..dfcea5e 100644 (file)
@@ -29,6 +29,7 @@ int sci_frexp(char *fname,unsigned long fname_len)
     CheckLhs(2, 2);
 
     sciErr = getVarAddressFromPosition(pvApiCtx, 1, &piAddressVarOne);
+    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
index a2718de..b4df44c 100644 (file)
@@ -51,6 +51,7 @@ int sci_size(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -58,6 +59,7 @@ int sci_size(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -65,6 +67,7 @@ int sci_size(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index dd6269a..2e8884b 100644 (file)
@@ -48,6 +48,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -55,6 +56,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -68,6 +70,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -75,6 +78,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -98,6 +102,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -105,6 +110,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -115,6 +121,12 @@ int sci_basename(char *fname,unsigned long fname_len)
                }
 
                sciErr = getVarDimension(pvApiCtx, piAddressVarTwo, &m2, &n2);
+        if(sciErr.iErr)
+        {
+            printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
+            return 0;
+        }
 
                if ( (m2 != n2) && (n2 != 1) ) 
                {
@@ -126,6 +138,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -136,6 +149,7 @@ int sci_basename(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -143,6 +157,7 @@ int sci_basename(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -152,6 +167,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -161,6 +177,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -180,6 +197,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -197,6 +215,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                        freeArrayOfWideString(pStVarOne, m1 * n1);
                        if (lenStVarOne) {FREE(lenStVarOne); lenStVarOne = NULL;}
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -227,6 +246,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                        freeArrayOfWideString(pStVarOne, m1 * n1);
                        if (lenStVarOne) {FREE(lenStVarOne); lenStVarOne = NULL;}
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -248,6 +268,7 @@ int sci_basename(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
index c5084fb..cef5e5b 100644 (file)
@@ -51,6 +51,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -58,6 +59,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -72,6 +74,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -92,6 +95,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
        }
@@ -108,6 +112,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read named argument %s.\n"), fname, "PWD");
                                return 0;
                        }
 
@@ -120,6 +125,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read named argument %s.\n"), fname, "PWD");
                                        return 0;
                                }
 
@@ -149,6 +155,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -177,6 +184,7 @@ int sci_chdir(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                        return 0;
                                }
 
index c846315..3ef7f71 100644 (file)
@@ -47,6 +47,7 @@ int sci_copyfile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -66,6 +67,7 @@ int sci_copyfile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index 963af04..c30ef59 100644 (file)
@@ -51,6 +51,7 @@ int sci_fileparts(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -85,6 +86,7 @@ int sci_fileparts(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
index 6844a7f..c55819d 100644 (file)
@@ -61,6 +61,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -68,6 +69,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -108,6 +110,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         {
             if (Format) {FREE(Format); Format = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -116,6 +119,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         {
             if (Format) {FREE(Format); Format = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -131,6 +135,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         {
             if (Format) {FREE(Format); Format = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -156,6 +161,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
             if (Format) {FREE(Format); Format = NULL;}
             if (lengthStrings) {FREE(lengthStrings); lengthStrings = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -189,6 +195,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
             freeArrayOfString(textAdded, m4 * n4);
             if (Format) {FREE(Format); Format = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -205,6 +212,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 5);
             return 0;
         }
 
@@ -212,6 +220,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 5);
             return 0;
         }
 
@@ -222,6 +231,12 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         }
 
         sciErr = getVarDimension(pvApiCtx, piAddressVarFive, &m5, &n5);
+        if(sciErr.iErr)
+        {
+            printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 5);
+            return 0;
+        }
 
         if ( (m5 != n5) && (n5 != 1) ) 
         {
@@ -247,6 +262,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if (Format) {FREE(Format); Format = NULL;}
         if (separator){FREE(separator); separator = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -257,6 +273,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if (Format) {FREE(Format); Format = NULL;}
         if (separator){FREE(separator); separator = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -285,6 +302,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if (Format) {FREE(Format); Format = NULL;}
         if (separator){FREE(separator); separator = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -295,6 +313,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if (Format) {FREE(Format); Format = NULL;}
         if (separator){FREE(separator); separator = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -305,6 +324,7 @@ int sci_fprintfMat(char *fname,unsigned long fname_len)
         if (Format) {FREE(Format); Format = NULL;}
         if (separator){FREE(separator); separator = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index c7509d1..3c55295 100644 (file)
@@ -55,6 +55,7 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -62,6 +63,7 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -72,6 +74,12 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         }
 
         sciErr = getVarDimension(pvApiCtx, piAddressVarThree, &m3, &n3);
+        if(sciErr.iErr)
+        {
+            printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
+            return 0;
+        }
 
         if ( (m3 != n3) && (n3 != 1) ) 
         {
@@ -102,6 +110,7 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         {
             if (separator) {FREE(separator); separator = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -110,6 +119,7 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         {
             if (separator) {FREE(separator); separator = NULL;}
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -121,6 +131,13 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         }
 
         sciErr = getVarDimension(pvApiCtx, piAddressVarTwo, &m2, &n2);
+        if(sciErr.iErr)
+        {
+            if (separator) {FREE(separator); separator = NULL;}
+            printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
+            return 0;
+        }
 
         if ( (m2 != n2) && (n2 != 1) ) 
         {
@@ -147,6 +164,7 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         if (separator) {FREE(separator); separator = NULL;}
         if (Format) {FREE(Format); Format = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -156,6 +174,7 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
         if (separator) {FREE(separator); separator = NULL;}
         if (Format) {FREE(Format); Format = NULL;}
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -168,6 +187,14 @@ int sci_fscanfMat(char *fname,unsigned long fname_len)
     }
 
     sciErr = getVarDimension(pvApiCtx, piAddressVarOne, &m1, &n1);
+    if(sciErr.iErr)
+    {
+        if (separator) {FREE(separator); separator = NULL;}
+        if (Format) {FREE(Format); Format = NULL;}
+        printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
+        return 0;
+    }
 
     if ( (m1 != n1) && (n1 != 1) ) 
     {
index c9ed2b4..c7cbfd1 100644 (file)
@@ -45,6 +45,7 @@ int sci_fullpath(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -102,6 +103,7 @@ int sci_fullpath(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index ad92d78..0d30e43 100644 (file)
@@ -47,6 +47,7 @@ int sci_isdir(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -54,6 +55,7 @@ int sci_isdir(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -67,6 +69,7 @@ int sci_isdir(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -90,6 +93,7 @@ int sci_isdir(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -119,6 +123,7 @@ int sci_isdir(char *fname,unsigned long fname_len)
                freeArrayOfWideString(pStVarOne, m1 * n1);
                if (lenStVarOne) {FREE(lenStVarOne); lenStVarOne = NULL;}
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -144,6 +149,7 @@ int sci_isdir(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
index fbc544f..8060fd7 100644 (file)
@@ -42,6 +42,7 @@ int sci_isfile(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -49,6 +50,7 @@ int sci_isfile(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -62,10 +64,10 @@ int sci_isfile(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
-
        lenStVarOne = (int*)MALLOC(sizeof(int) * (m1 * n1));
        if (lenStVarOne == NULL)
        {
@@ -86,6 +88,7 @@ int sci_isfile(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -113,6 +116,7 @@ int sci_isfile(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -137,6 +141,7 @@ int sci_isfile(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
index 8336bef..b933fa3 100644 (file)
@@ -53,6 +53,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -60,6 +61,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -73,6 +75,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -87,6 +90,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -102,6 +106,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -109,6 +114,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -116,6 +122,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -134,6 +141,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -152,6 +160,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -172,6 +181,7 @@ int sci_movefile(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index d08c745..d642450 100644 (file)
@@ -58,6 +58,7 @@ int sci_mputl(char *fname, unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -166,6 +167,7 @@ int sci_mputl(char *fname, unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -201,6 +203,7 @@ int sci_mputl(char *fname, unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -230,6 +233,7 @@ int sci_mputl(char *fname, unsigned long fname_len)
     {
         freeArrayOfString(pStVarOne, mnOne);
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index debc5c3..d58ca7b 100644 (file)
@@ -52,6 +52,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -59,6 +60,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -72,6 +74,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -85,6 +88,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -99,6 +103,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -141,6 +146,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -148,6 +154,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -161,6 +168,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -174,6 +182,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -191,6 +200,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -198,6 +208,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -211,6 +222,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -224,6 +236,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -234,6 +247,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -241,6 +255,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -250,6 +265,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -259,6 +275,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -276,6 +293,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -301,6 +319,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -336,6 +355,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -348,6 +368,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index 679cb88..90f6cf3 100644 (file)
@@ -44,6 +44,7 @@ int sci_tempname(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index 12cddd9..e788add 100644 (file)
@@ -49,6 +49,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -56,6 +57,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -65,6 +67,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -72,6 +75,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
                }
@@ -82,6 +86,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                return 0;
                        }
 
@@ -89,6 +94,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                return 0;
                        }
                }
@@ -104,6 +110,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                        return 0;
                                }
 
@@ -133,6 +140,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                                if(sciErr.iErr)
                                                {
                                                        printError(&sciErr, 0);
+                            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                                        return 0;
                                                }
 
@@ -159,6 +167,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                                if(sciErr.iErr)
                                                {
                                                        printError(&sciErr, 0);
+                            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                                        return 0;
                                                }
 
@@ -169,6 +178,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                                        if(sciErr.iErr)
                                                        {
                                                                printError(&sciErr, 0);
+                                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                                                return 0;
                                                        }
 
@@ -212,6 +222,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                                if(sciErr.iErr)
                                                {
                                                        printError(&sciErr, 0);
+                            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                                        return 0;
                                                }
 
@@ -238,6 +249,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                                if(sciErr.iErr)
                                                {
                                                        printError(&sciErr, 0);
+                            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                                        return 0;
                                                }
 
@@ -248,6 +260,7 @@ int C2F(sci_exec)(char *fname,unsigned long fname_len)
                                                        if(sciErr.iErr)
                                                        {
                                                                printError(&sciErr, 0);
+                                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                                                return 0;
                                                        }
 
index f831899..aace1ea 100644 (file)
@@ -46,6 +46,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -53,6 +54,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -65,6 +67,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -74,6 +77,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                        return 0;
                                }
 
@@ -107,6 +111,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -114,6 +119,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -127,6 +133,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -143,6 +150,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                        return 0;
                                }
 
@@ -176,6 +184,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                return 0;
                        }
 
@@ -183,6 +192,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                return 0;
                        }
 
@@ -196,6 +206,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                return 0;
                        }
 
@@ -212,6 +223,7 @@ int C2F(sci_execstr)(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                        return 0;
                                }
 
index 1d5d24d..1faeb99 100644 (file)
@@ -51,6 +51,7 @@ int C2F(sci_lib)(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -58,6 +59,7 @@ int C2F(sci_lib)(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -71,6 +73,7 @@ int C2F(sci_lib)(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -94,6 +97,7 @@ int C2F(sci_lib)(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
index f804755..b74c439 100644 (file)
@@ -31,6 +31,7 @@ int sci_libraryinfo(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -74,6 +75,7 @@ int sci_libraryinfo(char *fname,unsigned long fname_len)
                                 libraryname = NULL;
                             }
                             printError(&sciErr, 0);
+                            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                             return 0;
                         }
                     }
index 307ab13..fc1578a 100644 (file)
@@ -37,6 +37,7 @@ int sci_whereis(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -44,6 +45,7 @@ int sci_whereis(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -86,6 +88,7 @@ int sci_whereis(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -106,6 +109,7 @@ int sci_whereis(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -118,6 +122,7 @@ int sci_whereis(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
                }
@@ -130,6 +135,7 @@ int sci_whereis(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
                }
index 9424b36..48dddf9 100644 (file)
@@ -76,6 +76,7 @@ static int sci_toprint_one_rhs(const char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -192,6 +193,8 @@ static int sci_toprint_two_rhs(const char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
+
         return 0;
     }
 
@@ -199,6 +202,7 @@ static int sci_toprint_two_rhs(const char *fname)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -221,6 +225,7 @@ static int sci_toprint_two_rhs(const char *fname)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                     return 0;
                 }
 
@@ -243,6 +248,7 @@ static int sci_toprint_two_rhs(const char *fname)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                     return 0;
                 }
 
@@ -286,6 +292,7 @@ static int sci_toprint_two_rhs(const char *fname)
                 {
                     freeArrayOfString(pStVarOne, mnOne);
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                     return 0;
                 }
 
diff --git a/scilab/modules/helptools/sci_gateway/cpp/sci_buildDoc.cpp b/scilab/modules/helptools/sci_gateway/cpp/sci_buildDoc.cpp
new file mode 100644 (file)
index 0000000..b120af2
--- /dev/null
@@ -0,0 +1,260 @@
+/*
+ *  Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ *  Copyright (C) 2008 - INRIA - Sylvestre LEDRU
+ *
+ *  This file must be used under the terms of the CeCILL.
+ *  This source file is licensed as described in the file COPYING, which
+ *  you should have received as part of this distribution.  The terms
+ *  are also available at
+ *  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+ *
+ */
+/*--------------------------------------------------------------------------*/
+#include "BuildDocObject.hxx"
+#include "GiwsException.hxx"
+
+extern "C"
+{
+    /*--------------------------------------------------------------------------*/
+#include <string.h>
+#include "api_scilab.h"
+#include "stack-c.h"
+#include "gw_helptools.h"
+#include "Scierror.h"
+#include "setgetSCIpath.h"
+#include "localization.h"
+#include "setgetlanguage.h"
+#include "getScilabJavaVM.h"
+#include "MALLOC.h"
+#ifdef _MSC_VER
+#include "ConvertSlash.h"
+#endif
+    /*--------------------------------------------------------------------------*/
+#define PATHTOCSS "/modules/helptools/css/javahelp.css"
+#define PATHTOBUILDDOC "/modules/helptools/build/doc/scilab_%s_help/"
+#define PATHTOMASTERXML "/modules/helptools/master_%s_help.xml"
+#define DEFAULTEXPORT "JH"
+#ifdef _MSC_VER
+    static void __slashToAntislash(std::string *in)
+    {
+        size_t found = in->rfind("/");
+
+        while (found != std::string::npos)
+        {
+            in->replace (found, 1, "\\");
+            found = in->rfind("/");
+        }
+    }
+#endif
+    /*--------------------------------------------------------------------------*/
+    int sci_buildDoc(char *fname,unsigned long l)
+    {
+        //     static int Row_Output = 0, Col_Output = 0;
+        std::string exportFormat;
+        std::string SciPath = getSCIpath(); /* Scilab path */
+        std::string masterXML; /* Which file contains all the doc stuff */
+        std::string masterXMLTMP;
+        std::string outputDirectory; /* Working directory */
+        std::string outputDirectoryTMP;
+        std::string language;
+        std::string styleSheet; /* the CSS */
+        //     std::string pathToGenerated;
+        org_scilab_modules_helptools::BuildDocObject *doc = NULL;
+        SciErr sciErr;
+        int* piAddr = NULL;
+        int iRet    = 0;
+
+        CheckRhs(0,4);
+        CheckLhs(1,1);
+
+        styleSheet = SciPath+PATHTOCSS;
+
+        if (Rhs < 1)
+        {
+            exportFormat = DEFAULTEXPORT;
+        }
+        else
+        {
+            char* pstData = NULL;
+            sciErr = getVarAddressFromPosition(pvApiCtx, 1, &piAddr);
+            if(sciErr.iErr)
+            {
+                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
+                return 0;
+            }
+
+            if(!isStringType(pvApiCtx, piAddr))
+            {
+                Scierror(999,_("%s: Wrong type for input argument #%d: Single string expected.\n"),fname,1);
+                return 0;
+                // Wrong type string
+            }
+
+            iRet = getAllocatedSingleString(pvApiCtx, piAddr, &pstData);
+            if(iRet)
+            {
+                freeAllocatedSingleString(pstData);
+                return iRet;
+            }
+            exportFormat = std::string(pstData);
+            freeAllocatedSingleString(pstData);
+
+        }
+
+        if ( Rhs < 3) /* Language not provided */
+        {
+            language = getlanguage();
+        }
+        else
+        {
+            char* pstData = NULL;
+            sciErr = getVarAddressFromPosition(pvApiCtx, 3, &piAddr);
+            if(sciErr.iErr)
+            {
+                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
+                return 0;
+            }
+
+            if(!isStringType(pvApiCtx, piAddr))
+            {
+                Scierror(999,_("%s: Wrong type for input argument #%d: Single string expected.\n"),fname,3);
+                return 0;
+                // Wrong type string
+            }
+
+            if(!isScalar(pvApiCtx, piAddr))
+            {
+                language = getlanguage();
+            }
+            else
+            {
+                iRet = getAllocatedSingleString(pvApiCtx, piAddr, &pstData);
+                if(iRet)
+                {
+                    freeAllocatedSingleString(pstData);
+                    return iRet;
+                }
+                language = std::string(pstData);
+                freeAllocatedSingleString(pstData);
+            }
+
+        }
+
+        if (Rhs < 2)
+        {
+            /* Update the path with the localization */
+            masterXMLTMP = std::string("/modules/helptools/master_")+language+std::string("_help.xml");
+            masterXML = SciPath + masterXMLTMP;
+        }
+        else
+        {
+            char* pstData = NULL;
+            sciErr = getVarAddressFromPosition(pvApiCtx, 2, &piAddr);
+            if(sciErr.iErr)
+            {
+                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
+                return 0;
+            }
+            if(!isStringType(pvApiCtx, piAddr))
+            {
+                Scierror(999,_("%s: Wrong type for input argument #%d: Single string expected.\n"),fname,2);
+                return 0;
+                // Wrong type string
+            }
+
+
+            iRet = getAllocatedSingleString(pvApiCtx, piAddr, &pstData);
+            if(iRet)
+            {
+                freeAllocatedSingleString(pstData);
+                return iRet;
+            }
+            masterXML = std::string(pstData);
+            freeAllocatedSingleString(pstData);
+        }
+
+        if (Rhs == 4)
+        {
+            char* pstData = NULL;
+            sciErr = getVarAddressFromPosition(pvApiCtx, 4, &piAddr);
+            if(sciErr.iErr)
+            {
+                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
+                return 0;
+            }
+            if(!isStringType(pvApiCtx, piAddr))
+            {
+                Scierror(999,_("%s: Wrong type for input argument #%d: Single string expected.\n"),fname,4);
+                return 0;
+                // Wrong type string
+            }
+
+            iRet = getAllocatedSingleString(pvApiCtx, piAddr, &pstData);
+            if(iRet)
+            {
+                freeAllocatedSingleString(pstData);
+                return iRet;
+            }
+            outputDirectory = std::string(pstData)+std::string("/scilab_")+language+std::string("_help/");
+            freeAllocatedSingleString(pstData);
+
+        }
+        else /* Scilab help */
+        {
+            /* Update the path with the localization */
+            outputDirectoryTMP = std::string("/modules/helptools/")+std::string(exportFormat)+std::string("/scilab_")+language+std::string("_help/");
+
+            outputDirectory = SciPath+outputDirectoryTMP;
+        }
+
+        try
+        {
+            doc = new org_scilab_modules_helptools::BuildDocObject(getScilabJavaVM());
+
+#ifdef _MSC_VER
+            __slashToAntislash(&outputDirectory);
+            __slashToAntislash(&styleSheet);
+            __slashToAntislash(&masterXML);
+#endif
+
+
+            if (doc->setOutputDirectory((char *) outputDirectory.c_str()))
+            {
+                doc->setWorkingLanguage((char *) language.c_str());
+                doc->setExportFormat((char *) exportFormat.c_str());
+
+                doc->process((char *) masterXML.c_str(), (char *) styleSheet.c_str());
+                /*             Row_Output = 1;
+                Col_Output = 1;
+                CreateVarFromPtr( Rhs+1,MATRIX_OF_STRING_DATATYPE, &Row_Output, &Col_Output, &pathToGenerated.c_str() );
+                */
+
+            }
+            else
+            {
+                Scierror(999,_("%s: Could find or create the working directory %s.\n"), fname, outputDirectory.c_str());
+                return FALSE;
+            }
+        }
+        catch(GiwsException::JniException ex)
+        {
+            Scierror(999,_("%s: Error while building documentation: %s.\n"), fname, ex.getJavaDescription().c_str());
+            Scierror(999,_("%s: Execution Java stack %s.\n"), fname, ex.getJavaStackTrace().c_str());
+            Scierror(999,_("If Scilab is started in a chroot, you might want to try to set the two environment variables: SCI_DISABLE_TK=1 SCI_JAVA_ENABLE_HEADLESS=1\n"));
+            return FALSE;
+        }
+
+        if (doc != NULL)
+        {
+            delete doc;
+        }
+        LhsVar(1) = 0 ;
+        PutLhsVar();
+        return 0;
+    }
+    /*--------------------------------------------------------------------------*/
+}
index b50ffea..6f8ca05 100644 (file)
@@ -80,6 +80,7 @@ extern "C"
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -113,6 +114,7 @@ extern "C"
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                 return 0;
             }
 
@@ -155,6 +157,7 @@ extern "C"
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
             if (!isStringType(pvApiCtx, piAddr))
@@ -182,6 +185,7 @@ extern "C"
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
                 return 0;
             }
             if (!isStringType(pvApiCtx, piAddr))
index 4dd7bd6..dde30be 100644 (file)
@@ -34,6 +34,7 @@ int sci_historysize(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index c21e797..742d04b 100644 (file)
@@ -63,6 +63,7 @@ int sci_file(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -70,6 +71,7 @@ int sci_file(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -77,6 +79,7 @@ int sci_file(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -84,6 +87,7 @@ int sci_file(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -91,6 +95,7 @@ int sci_file(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -98,6 +103,7 @@ int sci_file(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -120,6 +126,7 @@ int sci_file(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -133,6 +140,7 @@ int sci_file(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -146,6 +154,7 @@ int sci_file(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                return 0;
                        }
 
@@ -160,6 +169,7 @@ int sci_file(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -176,6 +186,7 @@ int sci_file(char *fname,unsigned long fname_len)
                        {
                                FREE(pStVarOne); pStVarOne = NULL;
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -188,6 +199,7 @@ int sci_file(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                        return 0;
                                }
 
@@ -204,6 +216,7 @@ int sci_file(char *fname,unsigned long fname_len)
                                {
                                        FREE(pStVarThree); pStVarThree = NULL; 
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                        return 0;
                                }
 
@@ -216,6 +229,7 @@ int sci_file(char *fname,unsigned long fname_len)
                                        if(sciErr.iErr)
                                        {
                                                printError(&sciErr, 0);
+                        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                                return 0;
                                        }
 
@@ -232,6 +246,7 @@ int sci_file(char *fname,unsigned long fname_len)
                                        {
                                                FREE(pStVarTwo); pStVarTwo = NULL;
                                                printError(&sciErr, 0);
+                        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                                return 0;
                                        }
 
@@ -246,6 +261,7 @@ int sci_file(char *fname,unsigned long fname_len)
                                                        if(sciErr.iErr)
                                                        {
                                                                printError(&sciErr, 0);
+                                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                                                return 0;
                                                        }
 
@@ -253,6 +269,7 @@ int sci_file(char *fname,unsigned long fname_len)
                                                        if(sciErr.iErr)
                                                        {
                                                                printError(&sciErr, 0);
+                                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                                                return 0;
                                                        }
 
@@ -315,6 +332,7 @@ static int sci_file_no_rhs(char *fname)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -334,6 +352,7 @@ static int sci_file_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -354,6 +373,7 @@ static int sci_file_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -374,6 +394,7 @@ static int sci_file_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -395,6 +416,7 @@ static int sci_file_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -424,6 +446,7 @@ static int sci_file_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -431,6 +454,7 @@ static int sci_file_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -445,6 +469,7 @@ static int sci_file_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -480,6 +505,7 @@ static int sci_file_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
@@ -507,6 +533,7 @@ static int sci_file_one_rhs(char *fname)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -544,6 +571,7 @@ static int sci_file_one_rhs(char *fname)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -570,6 +598,7 @@ static int sci_file_one_rhs(char *fname)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -596,6 +625,7 @@ static int sci_file_one_rhs(char *fname)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
                LhsVar(5) = Rhs + 5; 
index 1bd5086..7e85431 100644 (file)
@@ -53,6 +53,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -60,6 +61,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -73,6 +75,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -89,6 +92,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
                }
@@ -103,6 +107,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -110,6 +115,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -124,6 +130,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -141,6 +148,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
        }
@@ -183,6 +191,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -197,6 +206,7 @@ int sci_getenv(char *fname,unsigned long fname_len)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                        return 0;
                                }
 
index 11ed60f..9572793 100644 (file)
@@ -48,6 +48,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -55,6 +56,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
@@ -62,6 +64,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -75,6 +78,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
@@ -88,6 +92,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -101,6 +106,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                return 0;
        }
 
@@ -117,6 +123,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -134,6 +141,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -155,6 +163,7 @@ int sci_setenv(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
index 99702c5..19bd34a 100644 (file)
@@ -51,6 +51,7 @@ int sci_javaclasspath(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -58,6 +59,7 @@ int sci_javaclasspath(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -74,6 +76,7 @@ int sci_javaclasspath(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -90,6 +93,7 @@ int sci_javaclasspath(char *fname,unsigned long fname_len)
             {
                 if (lenStVarOne) { FREE(lenStVarOne); lenStVarOne = NULL;}
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -112,6 +116,7 @@ int sci_javaclasspath(char *fname,unsigned long fname_len)
                 freeArrayOfString(pStVarOne, m1 * n1);
                 if (lenStVarOne) { FREE(lenStVarOne); lenStVarOne = NULL;}
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
index 89e52f6..732e76a 100644 (file)
@@ -65,6 +65,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -72,6 +73,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -86,6 +88,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -93,6 +96,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -166,6 +170,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, i);
                 return 0;
             }
 
@@ -173,6 +178,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, i);
                 return 0;
             }
             NumberCols += iCols;
@@ -399,6 +405,7 @@ int sci_msprintf(char *fname, unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
     }
     else
     {
index 612f158..c1fb0d9 100644 (file)
@@ -102,6 +102,7 @@ static int sci_diary_no_rhs(char *fname)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -119,6 +120,7 @@ static int sci_diary_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
                        LhsVar(1) = Rhs + 1;
@@ -148,6 +150,7 @@ static int sci_diary_no_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -164,6 +167,7 @@ static int sci_diary_no_rhs(char *fname)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                        return 0;
                                }
 
@@ -197,6 +201,7 @@ static int sci_diary_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
        }
 
@@ -204,6 +209,7 @@ static int sci_diary_one_rhs(char *fname)
        if(sciErr.iErr)
        {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
        }
 
@@ -259,6 +265,7 @@ static int sci_diary_one_rhs(char *fname)
                                if(sciErr.iErr)
                                {
                                                printError(&sciErr, 0);
+                        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                                return 0;
                                }
 
@@ -272,6 +279,7 @@ static int sci_diary_one_rhs(char *fname)
                                        if(sciErr.iErr)
                                        {
                                                        printError(&sciErr, 0);
+                            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                                        return 0;
                                        }
 
@@ -321,6 +329,7 @@ static int sci_diary_two_rhs(char *fname)
        if(sciErr.iErr)
        {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
        }
 
@@ -335,6 +344,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -355,6 +365,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -380,6 +391,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -405,6 +417,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -429,6 +442,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -451,6 +465,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -473,6 +488,7 @@ static int sci_diary_two_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -568,6 +584,7 @@ static int sci_diary_three_rhs(char *fname)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -578,6 +595,7 @@ static int sci_diary_three_rhs(char *fname)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                        return 0;
                                }
 
@@ -599,6 +617,7 @@ static int sci_diary_three_rhs(char *fname)
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                        return 0;
                                }
 
@@ -645,6 +664,7 @@ static double *getInputArgumentOneIDs(char *fname,int *sizeReturnedArray, int *i
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -653,6 +673,7 @@ static double *getInputArgumentOneIDs(char *fname,int *sizeReturnedArray, int *i
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -662,6 +683,7 @@ static double *getInputArgumentOneIDs(char *fname,int *sizeReturnedArray, int *i
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -703,6 +725,7 @@ static wchar_t **getInputArgumentOneFilenames(char *fname,int *sizeReturnedArray
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -711,6 +734,7 @@ static wchar_t **getInputArgumentOneFilenames(char *fname,int *sizeReturnedArray
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -722,6 +746,7 @@ static wchar_t **getInputArgumentOneFilenames(char *fname,int *sizeReturnedArray
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -744,6 +769,7 @@ static wchar_t **getInputArgumentOneFilenames(char *fname,int *sizeReturnedArray
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                        return 0;
                                }
 
@@ -769,6 +795,7 @@ static wchar_t **getInputArgumentOneFilenames(char *fname,int *sizeReturnedArray
                                        if(sciErr.iErr)
                                        {
                                                printError(&sciErr, 0);
+                        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                                return 0;
                                        }
 
@@ -802,6 +829,7 @@ static wchar_t *getInputArgumentTwo(char *fname, int *ierror)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -810,6 +838,7 @@ static wchar_t *getInputArgumentTwo(char *fname, int *ierror)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -836,6 +865,7 @@ static wchar_t *getInputArgumentTwo(char *fname, int *ierror)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -851,6 +881,7 @@ static wchar_t *getInputArgumentTwo(char *fname, int *ierror)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
                }
@@ -876,6 +907,7 @@ static wchar_t** getInputArgumentThree(char *fname,int *sizeReturnedArray, int *
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                return 0;
        }
 
@@ -884,6 +916,7 @@ static wchar_t** getInputArgumentThree(char *fname,int *sizeReturnedArray, int *
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                return 0;
        }
 
@@ -895,6 +928,7 @@ static wchar_t** getInputArgumentThree(char *fname,int *sizeReturnedArray, int *
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                        return 0;
                }
 
@@ -917,6 +951,7 @@ static wchar_t** getInputArgumentThree(char *fname,int *sizeReturnedArray, int *
                                if(sciErr.iErr)
                                {
                                        printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                        return 0;
                                }
 
@@ -937,6 +972,7 @@ static wchar_t** getInputArgumentThree(char *fname,int *sizeReturnedArray, int *
                                        if(sciErr.iErr)
                                        {
                                                printError(&sciErr, 0);
+                        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                                                return 0;
                                        }
 
@@ -1205,6 +1241,7 @@ static int ExistByFilenames(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
@@ -1247,6 +1284,7 @@ static int ExistByIds(char *fname)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
@@ -1300,6 +1338,7 @@ static int AppendByFilenames(char *fname,
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -1313,6 +1352,7 @@ static int AppendByFilenames(char *fname,
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -1380,6 +1420,7 @@ static int NewByFilenames(char *fname,
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
index b6a838c..39bad65 100644 (file)
@@ -66,6 +66,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -73,6 +74,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -87,6 +89,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -102,6 +105,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             FREE(lenStVarOne);
             return 0;
         }
@@ -134,6 +138,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             freeArrayOfWideString(pStVarOne, m1 * n1);
             FREE(lenStVarOne);
             return 0;
@@ -150,6 +155,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 freeArrayOfWideString(pStVarOne, m1 * n1);
                 FREE(lenStVarOne);
                 return 0;
@@ -159,6 +165,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 freeArrayOfWideString(pStVarOne, m1 * n1);
                 FREE(lenStVarOne);
                 return 0;
@@ -182,6 +189,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                     freeArrayOfWideString(pStVarOne, m1 * n1);
                     FREE(lenStVarOne);
                     return 0;
@@ -209,6 +217,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                     FREE(lenStVarTwo);
                     freeArrayOfWideString(pStVarOne, m1 * n1);
                     FREE(lenStVarOne);
@@ -241,6 +250,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                     FREE(pStVarTwo);
                     FREE(lenStVarTwo);
                     freeArrayOfWideString(pStVarOne, m1 * n1);
@@ -287,6 +297,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                     freeArrayOfWideString(pStVarOne, m1 * n1);
                     FREE(lenStVarOne);
                     return 0;
@@ -308,6 +319,7 @@ int sci_scinotes(char *fname, unsigned long fname_len)
                     if (sciErr.iErr)
                     {
                         printError(&sciErr, 0);
+                        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                         return 0;
                     }
 
index 743632e..d67f24a 100644 (file)
@@ -36,6 +36,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, Rhs);
         return 0;
     }
 
@@ -96,6 +97,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -104,6 +106,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -121,6 +124,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -131,6 +135,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -149,6 +154,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -157,6 +163,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -174,6 +181,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -184,6 +192,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -203,6 +212,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -211,6 +221,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -228,6 +239,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                 return 0;
             }
 
@@ -238,6 +250,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                 return 0;
             }
 
@@ -297,6 +310,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -310,6 +324,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -317,6 +332,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -335,6 +351,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -343,6 +360,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -360,6 +378,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -370,6 +389,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -380,6 +400,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -388,6 +409,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -405,6 +427,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -415,6 +438,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -470,6 +494,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -482,6 +507,7 @@ int sci_conv2(char *fname,unsigned long fname_len)
             if(sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
index 01f5670..67e524c 100644 (file)
@@ -46,6 +46,7 @@ int sci_Playsound (char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -53,6 +54,7 @@ int sci_Playsound (char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -72,6 +74,7 @@ int sci_Playsound (char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -86,6 +89,7 @@ int sci_Playsound (char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
index 307cd72..1ca0760 100644 (file)
@@ -57,6 +57,7 @@ int sci_beep(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -64,6 +65,7 @@ int sci_beep(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -77,6 +79,7 @@ int sci_beep(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -97,6 +100,7 @@ int sci_beep(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -134,6 +138,7 @@ int sci_beep(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                return 0;
        }
 
index a38ff32..b591dd1 100644 (file)
@@ -15,6 +15,8 @@
 #include "machine.h"
 #include "api_scilab.h"
 #include "stack-c.h"
+#include "Scierror.h"
+#include "localization.h"
 /*--------------------------------------------------------------------------*/
 extern int C2F(intsdlgamma)(char *id,unsigned long fname_len); /* fortran subroutine */
 /*--------------------------------------------------------------------------*/
@@ -28,6 +30,7 @@ int sci_dlgamma(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -35,6 +38,7 @@ int sci_dlgamma(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index 4728157..5fc8ccd 100644 (file)
@@ -15,6 +15,8 @@
 #include "machine.h"
 #include "api_scilab.h"
 #include "stack-c.h"
+#include "Scierror.h"
+#include "localization.h"
 /*--------------------------------------------------------------------------*/
 extern int C2F(intsgamma)(char *id,unsigned long fname_len); /* fortran subroutine */
 /*--------------------------------------------------------------------------*/
@@ -28,6 +30,7 @@ int sci_gamma(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -35,6 +38,7 @@ int sci_gamma(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index b1c3f16..e73a4a8 100644 (file)
@@ -16,6 +16,8 @@
 #include "machine.h"
 #include "api_scilab.h"
 #include "stack-c.h"
+#include "Scierror.h"
+#include "localization.h"
 /*--------------------------------------------------------------------------*/
 extern int C2F(intslgamma)(char *id,unsigned long fname_len); /* fortran subroutine */
 /*--------------------------------------------------------------------------*/
@@ -29,6 +31,7 @@ int sci_lgamma(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -36,6 +39,7 @@ int sci_lgamma(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
index c637f6b..6c5118b 100644 (file)
@@ -244,6 +244,9 @@ lib /DEF:"$(ProjectDir)special_functions_f_Import.def" /SUBSYSTEM:WINDOWS /MACHI
       <Project>{5b110267-7c18-437c-b87d-dba2b50729e9}</Project>
       <ReferenceOutputAssembly>false</ReferenceOutputAssembly>
     </ProjectReference>
+    <ProjectReference Include="..\..\..\localization\src\localization.vcxproj">
+      <Project>{ecffeb0c-1eda-45ee-9a10-b18143852e17}</Project>
+    </ProjectReference>
     <ProjectReference Include="..\..\..\output_stream\src\c\output_stream.vcxproj">
       <Project>{a5911cd7-f8e8-440c-a23e-4843a0636f3a}</Project>
       <ReferenceOutputAssembly>false</ReferenceOutputAssembly>
index 11a80b6..d38b354 100644 (file)
@@ -35,6 +35,7 @@ int sci_isalphanum(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -77,6 +78,7 @@ int sci_isalphanum(char *fname,unsigned long fname_len)
                 if(sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                     return 0;
                 }
             }
index 3c8738b..bb6c0fc 100644 (file)
@@ -43,6 +43,7 @@ int sci_isascii(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -50,6 +51,7 @@ int sci_isascii(char *fname,unsigned long fname_len)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -78,6 +80,7 @@ static int isasciiMatrix(char *fname,int *piAddressVarOne)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -88,6 +91,7 @@ static int isasciiMatrix(char *fname,int *piAddressVarOne)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -108,6 +112,7 @@ static int isasciiMatrix(char *fname,int *piAddressVarOne)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -136,6 +141,7 @@ static int isasciiMatrix(char *fname,int *piAddressVarOne)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                        return 0;
                }
 
@@ -156,6 +162,7 @@ static int isasciiStrings(char *fname,int *piAddressVarOne)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -177,6 +184,7 @@ static int isasciiStrings(char *fname,int *piAddressVarOne)
                        }
 
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -212,6 +220,7 @@ static int isasciiStrings(char *fname,int *piAddressVarOne)
 
                        freeArrayOfWideString(pwcStVarOne, m1 * n1);
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -249,6 +258,7 @@ static int isasciiStrings(char *fname,int *piAddressVarOne)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
index 33b8c18..a84100f 100644 (file)
@@ -35,6 +35,7 @@ int sci_isdigit(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -77,6 +78,7 @@ int sci_isdigit(char *fname,unsigned long fname_len)
                 if(sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999,_("%s: Memory allocation error.\n"), fname);
                     return 0;
                 }
             }
index 45affbe..314f5b5 100644 (file)
@@ -57,6 +57,7 @@ int sci_length(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -64,6 +65,7 @@ int sci_length(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -116,6 +118,7 @@ static int lengthStrings(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument.\n"), "length");
         return 0;
     }
 
@@ -258,6 +261,7 @@ static int lengthStrings(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), "length");
         return 0;
     }
 
@@ -289,6 +293,7 @@ static int lengthSparse(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument.\n"), "length");
         return 0;
     }
 
@@ -306,6 +311,7 @@ static int lengthSparse(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), "length");
         return 0;
     }
 
@@ -383,6 +389,7 @@ static int lengthList(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument.\n"), "length");
         return 0;
     }
 
@@ -400,6 +407,7 @@ static int lengthList(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), "length");
         return 0;
     }
 
@@ -421,6 +429,7 @@ static int lengthDefault(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument.\n"), "length");
         return 0;
     }
 
@@ -438,6 +447,7 @@ static int lengthDefault(int *piAddressVar)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), "length");
         return 0;
     }
 
index f13f7ce..4d7c513 100644 (file)
@@ -75,6 +75,7 @@ int sci_strchr(char *fname, unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999,_("%s: Memory allocation error.\n"), fname);
             return 0;
         }
 
@@ -103,6 +104,7 @@ static wchar_t **getInputArgumentAsMatrixOfWideString(void* _pvCtx, int _iVar,
     {
         *iErr = sciErr.iErr;
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, _iVar);
         return NULL;
     }
 
@@ -111,6 +113,7 @@ static wchar_t **getInputArgumentAsMatrixOfWideString(void* _pvCtx, int _iVar,
     {
         *iErr = sciErr.iErr;
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, _iVar);
         return NULL;
     }
 
@@ -127,6 +130,7 @@ static wchar_t **getInputArgumentAsMatrixOfWideString(void* _pvCtx, int _iVar,
         if (pStringValues) {freeAllocatedMatrixOfWideString(m_, n_, pStringValues); pStringValues = NULL;}
         *m = 0;
         *n = 0;
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
     }
     else
     {
index 1332f8a..460274c 100644 (file)
@@ -38,6 +38,7 @@ int sci_strsplit(char *fname,unsigned long fname_len)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -80,6 +81,7 @@ int sci_strsplit(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -124,6 +126,7 @@ int sci_strsplit(char *fname,unsigned long fname_len)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -153,6 +156,7 @@ int sci_strsplit(char *fname,unsigned long fname_len)
                 if(sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                     return 0;
                 }
 
@@ -188,6 +192,7 @@ int sci_strsplit(char *fname,unsigned long fname_len)
                             if(sciErr.iErr)
                             {
                                 printError(&sciErr, 0);
+                                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                 return 0;
                             }
                             LhsVar(1) = Rhs + 1;
index 9fb9e18..4cc02a1 100644 (file)
@@ -41,12 +41,14 @@ int sci_strsubst(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
     sciErr = getVarType(pvApiCtx, piAddressVarOne, &iType);
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -81,6 +83,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
                 return 0;
             }
 
@@ -88,6 +91,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
                 return 0;
             }
 
@@ -101,6 +105,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
                 return 0;
             }
 
@@ -117,6 +122,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
                     return 0;
                 }
 
@@ -152,6 +158,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -160,6 +167,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -174,6 +182,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -187,6 +196,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -195,6 +205,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -209,6 +220,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -222,6 +234,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -238,6 +251,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -249,6 +263,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                 return 0;
             }
 
@@ -257,6 +272,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -268,6 +284,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                     return 0;
                 }
 
@@ -275,6 +292,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
                 if (sciErr.iErr)
                 {
                     printError(&sciErr, 0);
+                    Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                     return 0;
                 }
 
@@ -285,6 +303,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
                     if (sciErr.iErr)
                     {
                         printError(&sciErr, 0);
+                        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                         return 0;
                     }
 
@@ -316,6 +335,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
                         if (sciErr.iErr)
                         {
                             printError(&sciErr, 0);
+                            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                             return 0;
                         }
 
@@ -353,6 +373,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
                         if (sciErr.iErr)
                         {
                             printError(&sciErr, 0);
+                            Scierror(999,_("%s: Memory allocation error.\n"), fname);
                             return 0;
                         }
 
@@ -402,6 +423,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -411,6 +433,7 @@ int sci_strsubst(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
index 1c9173d..40415c8 100644 (file)
@@ -169,6 +169,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -176,6 +177,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -190,6 +192,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -205,6 +208,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -216,6 +220,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
     {
         FREE(pStVarOne);
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -253,6 +258,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
     }
@@ -263,6 +269,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             FREE(pStVarOne);
             return 0;
         }
@@ -279,6 +286,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -288,6 +296,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             FREE(pStVarOne);
             return 0;
         }
@@ -304,6 +313,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 4);
             return 0;
         }
 
@@ -318,6 +328,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
     {
         FREE(pStVarOne);
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -337,6 +348,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             {
                 FREE(pStVarOne);
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -390,6 +402,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             {
                 FREE(pStVarOne);
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
             /*
@@ -427,6 +440,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -439,6 +453,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             FREE(pStVarOne);
             FREE(piLen);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -455,6 +470,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             FREE(piLen);
             freeArrayOfString(pstData, iRows * iCols);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -495,6 +511,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -533,6 +550,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -543,6 +561,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return -1;
             }
 
@@ -574,6 +593,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return -1;
             }
 
@@ -605,6 +625,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return -1;
             }
 
@@ -636,6 +657,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return -1;
             }
 
@@ -667,6 +689,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return -1;
             }
 
@@ -698,6 +721,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return -1;
             }
 
@@ -738,6 +762,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
         {
             FREE(pStVarOne);
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
             return 0;
         }
 
@@ -770,6 +795,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             {
                 FREE(pStVarOne);
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
@@ -803,6 +829,7 @@ int sci_editvar(char * fname, unsigned long fname_len)
             {
                 FREE(pStVarOne);
                 printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                 return 0;
             }
 
index 054e85b..c3d2774 100644 (file)
@@ -58,6 +58,7 @@ int sci_dos(char *fname,unsigned long l)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -65,6 +66,7 @@ int sci_dos(char *fname,unsigned long l)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -78,6 +80,7 @@ int sci_dos(char *fname,unsigned long l)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                        return 0;
                }
 
@@ -94,6 +97,7 @@ int sci_dos(char *fname,unsigned long l)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                                return 0;
                        }
 
@@ -119,6 +123,7 @@ int sci_dos(char *fname,unsigned long l)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -126,6 +131,7 @@ int sci_dos(char *fname,unsigned long l)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -139,6 +145,7 @@ int sci_dos(char *fname,unsigned long l)
        if(sciErr.iErr)
        {
                printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                return 0;
        }
 
@@ -159,6 +166,7 @@ int sci_dos(char *fname,unsigned long l)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -223,6 +231,7 @@ int sci_dos(char *fname,unsigned long l)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -250,6 +259,7 @@ int sci_dos(char *fname,unsigned long l)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -259,6 +269,7 @@ int sci_dos(char *fname,unsigned long l)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
@@ -272,6 +283,7 @@ int sci_dos(char *fname,unsigned long l)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                                return 0;
                        }
 
index 1d93343..40dd559 100644 (file)
@@ -45,6 +45,7 @@ int sci_winqueryreg(char *fname,unsigned long l)
         if(sciErr.iErr)
         {
             printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
             return 0;
         }
 
@@ -71,6 +72,7 @@ int sci_winqueryreg(char *fname,unsigned long l)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -90,6 +92,7 @@ int sci_winqueryreg(char *fname,unsigned long l)
     if(sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -160,6 +163,7 @@ int sci_winqueryreg(char *fname,unsigned long l)
                     if (sciErr.iErr)
                     {
                         printError(&sciErr, 0);
+                        Scierror(999,_("%s: Memory allocation error.\n"), fname);
                     }
                     else
                     {
index f9d3e3d..a7746e2 100644 (file)
@@ -48,6 +48,7 @@ int sci_Xcos(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -55,6 +56,7 @@ int sci_Xcos(char *fname,unsigned long fname_len)
                if(sciErr.iErr)
                {
                        printError(&sciErr, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                        return 0;
                }
 
@@ -69,6 +71,7 @@ int sci_Xcos(char *fname,unsigned long fname_len)
                        if(sciErr.iErr)
                        {
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -85,6 +88,7 @@ int sci_Xcos(char *fname,unsigned long fname_len)
                        {
                                if (lenStVarOne) { FREE(lenStVarOne); lenStVarOne = NULL;}
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
@@ -118,6 +122,7 @@ int sci_Xcos(char *fname,unsigned long fname_len)
                                freeArrayOfString(pStVarOne, m1 * n1);
                                if (lenStVarOne) { FREE(lenStVarOne); lenStVarOne = NULL;}
                                printError(&sciErr, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
                                return 0;
                        }
 
index 41b6bdc..ad97b97 100644 (file)
@@ -61,6 +61,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -69,6 +70,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -82,6 +84,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -91,6 +94,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -99,6 +103,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -107,6 +112,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -120,6 +126,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -129,6 +136,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -138,6 +146,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
         return 0;
     }
 
@@ -145,6 +154,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
         return 0;
     }
 
@@ -152,6 +162,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
         return 0;
     }
 
@@ -194,6 +205,7 @@ int sci_xcosDiagramToHDF5(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index a3f6444..d1426e6 100644 (file)
@@ -41,6 +41,7 @@ int readSingleBoolean(void* _pvCtx, int rhsPosition, bool* out, const char* fnam
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -49,6 +50,7 @@ int readSingleBoolean(void* _pvCtx, int rhsPosition, bool* out, const char* fnam
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -63,6 +65,7 @@ int readSingleBoolean(void* _pvCtx, int rhsPosition, bool* out, const char* fnam
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -94,6 +97,7 @@ int readSingleString(void* _pvCtx, int rhsPosition, char** out, const char* fnam
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -102,6 +106,7 @@ int readSingleString(void* _pvCtx, int rhsPosition, char** out, const char* fnam
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -116,6 +121,7 @@ int readSingleString(void* _pvCtx, int rhsPosition, char** out, const char* fnam
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -127,6 +133,7 @@ int readSingleString(void* _pvCtx, int rhsPosition, char** out, const char* fnam
     {
         FREE(value);
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -160,6 +167,7 @@ int readVectorString(void* _pvCtx, int rhsPosition, char*** out, int* vectorLeng
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -168,6 +176,7 @@ int readVectorString(void* _pvCtx, int rhsPosition, char*** out, int* vectorLeng
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -183,6 +192,7 @@ int readVectorString(void* _pvCtx, int rhsPosition, char*** out, int* vectorLeng
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
@@ -204,6 +214,7 @@ int readVectorString(void* _pvCtx, int rhsPosition, char*** out, int* vectorLeng
         }
         FREE(value);
         printError(&sciErr, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, rhsPosition);
         return -1;
     }
 
index 8c86fb5..06e68d3 100644 (file)
@@ -51,6 +51,7 @@ int sci_percent_XMLAttr_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -80,6 +81,7 @@ int sci_percent_XMLAttr_e(char * fname, unsigned long fname_len)
             {
                 freeAllocatedSingleString(prefix);
                 printError(&err, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -106,6 +108,7 @@ int sci_percent_XMLAttr_e(char * fname, unsigned long fname_len)
             freeAllocatedSingleString(name);
         }
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, Rhs);
         return 0;
     }
 
@@ -163,6 +166,7 @@ int sci_percent_XMLAttr_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index 2740940..05b2484 100644 (file)
@@ -41,6 +41,7 @@ int sci_percent_XMLAttr_length(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index b123de5..8b324af 100644 (file)
@@ -41,6 +41,7 @@ int sci_percent_XMLAttr_size(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -64,6 +65,7 @@ int sci_percent_XMLAttr_size(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index 107fb68..5b9253d 100644 (file)
@@ -50,6 +50,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -57,6 +58,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -64,6 +66,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -81,6 +84,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
         {
             freeAllocatedSingleString(field);
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -110,6 +114,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
             if (err.iErr)
             {
                 printError(&err, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -125,6 +130,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
             if (err.iErr)
             {
                 printError(&err, 0);
+                Scierror(999,_("%s: Memory allocation error.\n"), fname);
                 return 0;
             }
 
@@ -156,6 +162,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -163,6 +170,7 @@ int sci_percent_XMLList_e(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index 152c223..c7c7377 100644 (file)
@@ -41,6 +41,7 @@ int sci_percent_XMLList_length(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 25408be..6edf873 100644 (file)
@@ -41,6 +41,7 @@ int sci_percent_XMLList_size(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -64,6 +65,7 @@ int sci_percent_XMLList_size(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index 2ada90d..0820fac 100644 (file)
@@ -55,6 +55,7 @@ int sci_percent_c_i_XMLAttr(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -84,6 +85,7 @@ int sci_percent_c_i_XMLAttr(char * fname, unsigned long fname_len)
             {
                 freeAllocatedSingleString(prefix);
                 printError(&err, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
                 return 0;
             }
 
@@ -110,6 +112,7 @@ int sci_percent_c_i_XMLAttr(char * fname, unsigned long fname_len)
             freeAllocatedSingleString(name);
         }
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -125,6 +128,7 @@ int sci_percent_c_i_XMLAttr(char * fname, unsigned long fname_len)
             freeAllocatedSingleString(name);
         }
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, Rhs);
         return 0;
     }
 
index 4876aa1..5c9e4c3 100644 (file)
@@ -59,6 +59,7 @@ int sci_percent_foo_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -74,6 +75,7 @@ int sci_percent_foo_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -81,6 +83,7 @@ int sci_percent_foo_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
         return 0;
     }
 
@@ -107,6 +110,7 @@ int sci_percent_foo_i_XMLList(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, iBegin);
             return 0;
         }
 
index 662fba4..6795574 100644 (file)
@@ -51,6 +51,7 @@ int sci_percent_s_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -66,6 +67,7 @@ int sci_percent_s_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -73,6 +75,7 @@ int sci_percent_s_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
         return 0;
     }
 
@@ -88,6 +91,7 @@ int sci_percent_s_i_XMLList(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
@@ -107,6 +111,7 @@ int sci_percent_s_i_XMLList(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, iBegin);
             return 0;
         }
 
index 72a58af..773ed20 100644 (file)
@@ -44,6 +44,7 @@ int sci_print(char * fname, void* pvApiCtx)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 96170e7..6c14a8a 100644 (file)
@@ -46,6 +46,7 @@ int sci_xmlAddNs(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -68,6 +69,7 @@ int sci_xmlAddNs(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, i);
             return 0;
         }
 
index 4ddf4c6..d341ec3 100644 (file)
@@ -42,6 +42,7 @@ int sci_xmlAsNumber(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 31f856c..6904637 100644 (file)
@@ -41,6 +41,7 @@ int sci_xmlAsText(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -65,6 +66,7 @@ int sci_xmlAsText(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index 0ebeec7..d12eab5 100644 (file)
@@ -48,6 +48,7 @@ int sci_xmlDelete(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -69,6 +70,7 @@ int sci_xmlDelete(char * fname, unsigned long fname_len)
             if (err.iErr)
             {
                 printError(&err, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, pos);
                 return 0;
             }
 
index a2d0f29..1ca4f48 100644 (file)
@@ -45,6 +45,7 @@ int sci_xmlDocument(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, i+1);
             return 0;
         }
 
index b4c3383..ecf2ced 100644 (file)
@@ -51,6 +51,7 @@ int sci_xmlDump(char *fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -75,6 +76,7 @@ int sci_xmlDump(char *fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -113,6 +115,7 @@ int sci_xmlDump(char *fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index da76430..e5f60e8 100644 (file)
@@ -43,6 +43,7 @@ int sci_xmlElement(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -63,6 +64,7 @@ int sci_xmlElement(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index f7606b8..d575ded 100644 (file)
@@ -42,6 +42,7 @@ int sci_xmlGetNsByHref(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -62,6 +63,7 @@ int sci_xmlGetNsByHref(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index 702dcca..32ea6ed 100644 (file)
@@ -42,6 +42,7 @@ int sci_xmlGetNsByPrefix(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -62,6 +63,7 @@ int sci_xmlGetNsByPrefix(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index 010fdb1..4b0ec3d 100644 (file)
@@ -21,6 +21,7 @@ extern "C"
 #include "Scierror.h"
 #include "api_scilab.h"
 #include "xml_mlist.h"
+#include "localization.h"
 }
 
 using namespace org_modules_xml;
@@ -42,6 +43,7 @@ int sci_xmlGetOpenDocs(char *fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index c372bd1..e088e33 100644 (file)
@@ -49,6 +49,7 @@ int sci_xmlIsValidObject(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -64,6 +65,7 @@ int sci_xmlIsValidObject(char * fname, unsigned long fname_len)
                 delete[] exists;
                 freeAllocatedMatrixOfString(row, col, vars);
                 printError(&err, 0);
+                Scierror(999, _("%s: Can not read named argument %s.\n"), fname, const_cast<const char *>(vars[i]));
                 return 0;
             }
 
@@ -85,6 +87,7 @@ int sci_xmlIsValidObject(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index d16f04c..42984ce 100644 (file)
@@ -45,6 +45,7 @@ int sci_xmlNs(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -67,6 +68,7 @@ int sci_xmlNs(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, i + 2);
             return 0;
         }
 
index dfd91b3..117e5da 100644 (file)
@@ -47,6 +47,7 @@ int sci_xmlRead(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -64,6 +65,7 @@ int sci_xmlRead(char * fname, unsigned long fname_len)
         {
             freeAllocatedSingleString(path);
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
index 9036ee8..3610ccb 100644 (file)
@@ -44,6 +44,7 @@ int sci_xmlReadStr(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -65,6 +66,7 @@ int sci_xmlReadStr(char * fname, unsigned long fname_len)
         {
             delete code;
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
index 0443191..9245628 100644 (file)
@@ -41,6 +41,7 @@ int sci_xmlRemove(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 600bc57..1075e9a 100644 (file)
@@ -44,6 +44,7 @@ int sci_xmlSetAttributes(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -65,6 +66,7 @@ int sci_xmlSetAttributes(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
         return 0;
     }
 
index 0d475e0..1b6d9e1 100644 (file)
@@ -51,6 +51,7 @@ int sci_xmlValidate(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -80,6 +81,7 @@ int sci_xmlValidate(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -154,6 +156,7 @@ int sci_xmlValidate(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999,_("%s: Memory allocation error.\n"), fname);
         return 0;
     }
 
index 88d1a2d..fd935bc 100644 (file)
@@ -49,6 +49,7 @@ int sci_xmlValidationFile(char * fname, void* pvApiCtx)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
index 447d69a..0183af9 100644 (file)
@@ -52,6 +52,7 @@ int sci_xmlWrite(char * fname, unsigned long fname_len)
     if (err.iErr)
     {
         printError(&err, 0);
+        Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
         return 0;
     }
 
@@ -75,6 +76,7 @@ int sci_xmlWrite(char * fname, unsigned long fname_len)
         if (err.iErr)
         {
             printError(&err, 0);
+            Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 2);
             return 0;
         }
 
@@ -122,6 +124,7 @@ int sci_xmlWrite(char * fname, unsigned long fname_len)
             if (err.iErr)
             {
                 printError(&err, 0);
+                Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 3);
                 return 0;
             }