Fix localization issues 30/12130/1
Vincent COUVERT [Thu, 25 Jul 2013 13:24:44 +0000 (15:24 +0200)]
Change-Id: I4a4971467833d30a2d80bff8e67084fd4a3ef978

44 files changed:
scilab/modules/cacsd/macros/csim.sci
scilab/modules/cacsd/sci_gateway/c/sci_linmeq.c
scilab/modules/core/help/en_US/error_handling/error_table.xml
scilab/modules/core/help/ja_JP/error_handling/error_table.xml
scilab/modules/core/help/pt_BR/error_handling/error_table.xml
scilab/modules/core/macros/ver.sci
scilab/modules/core/src/c/signal_mgmt.c
scilab/modules/core/src/c/stack1.c
scilab/modules/data_structures/src/c/hmops.c
scilab/modules/dynamic_link/demos/call_c.sce
scilab/modules/dynamic_link/demos/call_fortran.sce
scilab/modules/dynamic_link/macros/detectmsvc64tools.sci
scilab/modules/elementary_functions/macros/nthroot.sci
scilab/modules/elementary_functions/sci_gateway/c/sci_gsort.c
scilab/modules/elementary_functions/tests/unit_tests/nthroot.dia.ref
scilab/modules/fileio/sci_gateway/c/sci_getrelativefilename.c
scilab/modules/fileio/src/c/dlManager.c
scilab/modules/graphics/macros/getColorIndex.sci
scilab/modules/graphics/macros/sca.sci
scilab/modules/graphics/sci_gateway/c/sci_xset.c
scilab/modules/graphics/tests/nonreg_tests/bug_3390.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3390.tst
scilab/modules/gui/sci_gateway/cpp/sci_displaytree.cpp
scilab/modules/hdf5/sci_gateway/cpp/sci_h5dataset.cpp
scilab/modules/hdf5/src/cpp/H5Exception.hxx
scilab/modules/hdf5/src/cpp/HDF5Scilab.cpp
scilab/modules/linear_algebra/macros/gschur.sci
scilab/modules/linear_algebra/macros/pinv.sci
scilab/modules/linear_algebra/macros/rank.sci
scilab/modules/linear_algebra/macros/rowshuff.sci
scilab/modules/linear_algebra/macros/rref.sci
scilab/modules/optimization/macros/lmitool.sci
scilab/modules/output_stream/src/c/msgs.c
scilab/modules/overloading/macros/%hm_g_hm.sci
scilab/modules/overloading/macros/%s_b_s.sci
scilab/modules/overloading/macros/%s_pow.sci
scilab/modules/overloading/macros/%sp_i_sp.sci
scilab/modules/randlib/demos/poisson.dem.sce
scilab/modules/randlib/src/c/clcg4.c
scilab/modules/randlib/tests/nonreg_tests/bug_8597.dia.ref
scilab/modules/scicos_blocks/macros/PDE/translate.sci
scilab/modules/sound/macros/auread.sci
scilab/modules/sparse/macros/chfact.sci
scilab/modules/statistics/sci_gateway/c/sci_cdfpoi.c

index 14928c6..6ee7092 100644 (file)
@@ -54,7 +54,7 @@ function [y,x]=csim(u,dt,sl,x0,tol)
     //
     [a,b,c,d]=sl(2:5);
     if degree(d)>0 then
-        error(msprintf(gettext("%s: Wrong type for argument %d: a proper system expected\n"),"csim",1));
+        error(msprintf(gettext("%s: Wrong type for input argument #%d: A proper system expected\n"),"csim",1));
     end
     [ma,mb]=size(b);
     //
@@ -63,17 +63,17 @@ function [y,x]=csim(u,dt,sl,x0,tol)
     //
     select type(u)
     case 10 then //input given by its type (step or impuls)
-        if mb<>1 then 
-          error(msprintf(gettext("Wrong type for argument %d: SIMO expected.\n"),"csim",1));
+        if mb<>1 then
+            error(msprintf(gettext("%s: Wrong type for input argument #%d: A SIMO expected.\n"),"csim",1));
         end;
         if part(u,1)=="i" then
             //impulse response
             imp=1;
-            dt(dt==0)=%eps^2; 
+            dt(dt==0)=%eps^2;
         elseif part(u,1)=="s" then
             step=1
             if norm(d,1)<>0 then
-              dt(dt==0)=%eps^2; 
+                dt(dt==0)=%eps^2;
             end;
         else
             error(msprintf(gettext("%s: Wrong value for input argument #%d: Must be in the set {%s}.\n"),"csim",1,"""step"",""impuls"""))
index 32e04fc..c96884b 100644 (file)
@@ -224,20 +224,20 @@ int sci_linmeq(char *fname, unsigned long fname_len)
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
-        Scierror(202, _("%s: Wrong type for argument %d: A real expected.\n"), fname, IP);
+        Scierror(202, _("%s: Wrong type for input argument #%d: A real expected.\n"), fname, IP);
         return 1;
     }
 
     if (Mt != 1 || Nt != 1)
     {
-        Scierror(999, _("%s: TASK must be a scalar.\n"), fname);
+        Scierror(999, _("%s: %s must be a scalar.\n"), fname, "TASK");
         return 1;
     }
 
     TASK = *ilTASK;
     if (TASK < 1 || TASK > 3)
     {
-        Scierror(999, _("%s: TASK has 1, 2 or 3 the only admissible values.\n"), fname);
+        Scierror(999, _("%s: Wrong value for %s: %d, %d or %d expected.\n"), fname, "TRANS", 1, 2, 3);
         return 1;
     }
 
@@ -270,14 +270,14 @@ int sci_linmeq(char *fname, unsigned long fname_len)
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
-            Scierror(202, _("%s: Wrong type for argument %d: A real expected.\n"), fname, IP);
+            Scierror(202, _("%s: Wrong type for input argument #%d: A real expected.\n"), fname, IP);
             return 1;
         }
 
 
         if (Mt != 1 || Nt != 1)
         {
-            Scierror(999, _("%s: TRANS must be a scalar.\n"), fname);
+            Scierror(999, _("%s: %s must be a scalar.\n"), fname, "TRANS");
             return 1;
         }
 
@@ -286,12 +286,12 @@ int sci_linmeq(char *fname, unsigned long fname_len)
 
     if (TASK == 1 && (TRANS < 0 || TRANS > 3))
     {
-        Scierror(999, _("%s: TRANS has 0, 1, 2 or 3 the only admissible values.\n"), fname);
+        Scierror(999, _("%s: Wrong value for %s: %d, %d, %d or %d expected.\n"), fname, "TRANS", 0, 1, 2, 3);
         return 1;
     }
     else if (TASK != 1 && (TRANS < 0 || TRANS > 1))
     {
-        Scierror(999, _("%s: TRANS has 0 or 1 the only admissible values.\n"), fname);
+        Scierror(999, _("%s: Wrong value for %s: %d, or %d expected.\n"), fname, "TRANS", 0, 1);
         return 1;
     }
 
@@ -313,13 +313,13 @@ int sci_linmeq(char *fname, unsigned long fname_len)
             if (sciErr.iErr)
             {
                 printError(&sciErr, 0);
-                Scierror(202, _("%s: Wrong type for argument %d: A real expected.\n"), fname, IP + 1);
+                Scierror(202, _("%s: Wrong type for input argument #%d: A real expected.\n"), fname, IP + 1);
                 return 1;
             }
 
             if (Mt != 1 || Nt != 1)
             {
-                Scierror(999, _("%s: SCHUR must be a scalar.\n"), fname);
+                Scierror(999, _("%s: %s must be a scalar.\n"), fname, "SCHUR");
                 return 1;
             }
 
@@ -327,7 +327,7 @@ int sci_linmeq(char *fname, unsigned long fname_len)
 
             if (NSCHUR < 1 || NSCHUR > 2)
             {
-                Scierror(999, _("%s: SCHUR has 1 or 2 the only admissible values.\n"), fname);
+                Scierror(999, _("%s: Wrong value for %s: %d or %d expected.\n"), fname, "SCHUR", 1, 2);
                 return 1;
             }
         }
@@ -1217,17 +1217,17 @@ int sci_linmeq(char *fname, unsigned long fname_len)
 
     if (INFO != 0 && PERTRB == FALSE)
     {
-        Scierror(999, _("%s: Warning: the right hand sides were scaled by %lf to avoid overflow."), fname, TEMP);
+        Scierror(999, _("%s: Warning: input arguments were scaled by %lf to avoid overflow.\n"), fname, TEMP);
         return 1;
     }
     else if (SCALE != ONE)
     {
-        sciprint(_("%s: Warning: the right hand sides were scaled by %lf to avoid overflow."), fname, TEMP);
+        sciprint(_("%s: Warning: input arguments were scaled by %lf to avoid overflow.\n"), fname, TEMP);
     }
 
     if (PERTRB)
     {
-        sciprint(_("%s: Warning: the equation is (almost) singular. Perturbed values have been used."), fname);
+        sciprint(_("%s: Warning: the equation is (almost) singular. Perturbed values have been used.\n"), fname);
     }
 
     return 0;
index 4a35904..ef169a1 100644 (file)
@@ -32,7 +32,7 @@
         <para>17 "stack size exceeded! Use stacksize function to increase
             it."
         </para>
-        <para>18 "Too many variables!"</para>
+        <para>18 "Too many variables."</para>
         <para>19 "Problem is singular."</para>
         <para>* 20 "Wrong type for argument #%d: Square matrix expected."</para>
         <para>21 "Invalid index."</para>
@@ -66,7 +66,7 @@
         <para>47 " end or else is missing..."</para>
         <para>* 48 " input line longer than buffer size: %d"</para>
         <para>49 "Incorrect file or format."</para>
-        <para>50 "subroutine not found: %s"</para>
+        <para>50 "Subroutine '%s' not found."</para>
         <para>* 52 "Wrong type for argument #%d: Real matrix expected."</para>
         <para>* 53 "Wrong type for input argument %d: Real or complex matrix
             expected."
index 5ba61f1..09dc82a 100644 (file)
@@ -35,7 +35,7 @@
         <para>17 "stack size exceeded! Use stacksize function to increase
             it."
         </para>
-        <para>18 "Too many variables!"</para>
+        <para>18 "Too many variables."</para>
         <para>19 "Problem is singular."</para>
         <para>* 20 "Wrong type for argument #%d: Square matrix expected."</para>
         <para>21 "Invalid index."</para>
@@ -69,7 +69,7 @@
         <para>47 " end or else is missing..."</para>
         <para>* 48 " input line longer than buffer size: %d"</para>
         <para>49 "Incorrect file or format."</para>
-        <para>50 "subroutine not found: %s"</para>
+        <para>50 "Subroutine '%s' not found."</para>
         <para>* 52 "Wrong type for argument #%d: Real matrix expected."</para>
         <para>* 53 "Wrong type for input argument %d: Real or complex matrix
             expected."
index 090eb90..37a94b4 100644 (file)
@@ -53,7 +53,7 @@
             (tamanho de pilha excedido! (Use a função stacksize para
             aumentá-lo))
         </para>
-        <para>18 "Too many variables!" (muitas variáveis!)</para>
+        <para>18 "Too many variables." (muitas variáveis!)</para>
         <para>19 "Problem is singular" (o problema é singular)</para>
         <para>* 20 "Wrong type for argument #%d: Square matrix expected." (tipo
             errado para o argumento %d: esperava matriz quadrada)
index f3c7490..0fc4b95 100644 (file)
@@ -21,14 +21,14 @@ function res = ver()
         res(2,2) = sprintf("%s %s",system_getproperty("os.name"), ..
         system_getproperty("os.version"));
 
-        res(3,1) = gettext("Java version :");
+        res(3,1) = gettext("Java version: ");
         res(3,2) = system_getproperty("java.version");
 
-        res(4,1) = gettext("Java runtime information :");
+        res(4,1) = gettext("Java runtime information: ");
         res(4,2) = sprintf("%s (build %s)\n",system_getproperty("java.runtime.name"), ..
         system_getproperty("java.runtime.version"));
 
-        res(5,1) = gettext("Java vm information :");
+        res(5,1) = gettext("Java Virtual Machine information: ");
         res(5,2) = sprintf("%s (build %s, %s)\n",system_getproperty("java.vm.name"), ..
         system_getproperty("java.vm.version"), ..
         system_getproperty("java.vm.info"));
index e86f4c0..81a9e70 100644 (file)
@@ -403,7 +403,7 @@ static void sig_fatal(int signum, siginfo_t * info, void *p)
     // 4 is to ignore the first 4 functions
     bt = backtrace_print(4, 1);
     Scierror(42,
-             _("Oups. A fatal error has been detected by Scilab.\nYour instance will probably crash soon.\nIf a graphic feature has been used, this might be caused by the system graphic drivers.\nPlease try to update them and try again.\nPlease report a bug on %s with:\n* a sample code which reproduces the issue\n* the result of [a, b] = getdebuginfo()\n* the following information:\n%s %s\n"),
+             _("A fatal error has been detected by Scilab.\nYour instance will probably quit unexpectedly soon.\nIf a graphic feature has been used, this might be caused by the system graphic drivers.\nPlease try to update them and run this feature again.\nYou can report a bug on %s with:\n* a sample code which reproduces the issue\n* the result of [a, b] = getdebuginfo()\n* the following information:\n%s %s\n"),
              PACKAGE_BUGREPORT, print_buffer, bt);
 
     free(bt);
index f607f9a..8a519ff 100644 (file)
@@ -224,8 +224,8 @@ static int C2F(getmati) (char *fname, int *topk, int *spos, int *lw, int *it, in
     {
         if (*inlistx)
         {
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Real or Complex matrix expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Real or Complex matrix expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         }
         else
         {
@@ -297,7 +297,7 @@ int C2F(cremat) (char *fname, int *lw, int *it, int *m, int *n, int *lr, int *lc
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(cremati) (fname, Lstk(*lw), it, m, n, lr, lc, &c_true, fname_len) == FALSE)
@@ -537,8 +537,8 @@ static int C2F(getimati) (char *fname, int *topk, int *spos, int *lw, int *it, i
     if (*istk(il) != 8)
     {
         if (*inlistx)
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Int matrix expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Real or Complex matrix expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         else
             Scierror(201, _("%s: Wrong type for argument #%d: Real or Complex matrix expected.\n"), get_fname(fname, fname_len),
                      Rhs + (*spos - *topk));
@@ -601,7 +601,7 @@ int C2F(creimat) (char *fname, int *lw, int *it, int *m, int *n, int *lr, unsign
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(creimati) (fname, Lstk(*lw), it, m, n, lr, &c_true, fname_len) == FALSE)
@@ -728,8 +728,8 @@ static int C2F(getbmati) (char *fname, int *topk, int *spos, int *lw, int *m, in
     if (*istk(il) != 4)
     {
         if (*inlistx)
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Boolean matrix expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Boolean matrix expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         else
         {
             Scierror(208, _("%s: Wrong type for argument #%d: Boolean matrix expected.\n"), get_fname(fname, fname_len), Rhs + (*spos - *topk));
@@ -795,7 +795,7 @@ int C2F(crebmat) (char *fname, int *lw, int *m, int *n, int *lr, unsigned long f
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
 
@@ -818,7 +818,7 @@ int C2F(fakecrebmat) (int *lw, int *m, int *n, int *lr)
 {
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), "fakecrebmat");
+        Scierror(18, _("%s: Too many variables.\n"), "fakecrebmat");
         return FALSE;
     }
     if (C2F(crebmati) ("crebmat", Lstk(*lw), m, n, lr, &c_false, 7L) == FALSE)
@@ -951,8 +951,8 @@ static int C2F(getsparsei) (char *fname, int *topk, int *spos, int *lw, int *it,
     if (*istk(il) != sci_sparse)
     {
         if (*inlistx)
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Sparse matrix expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nellist);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Sparse matrix expected.\n"), get_fname(fname, fname_len),
+                     *nellist, Rhs + (*spos - *topk));
         else
         {
             Scierror(999, _("%s: Wrong type for argument #%d: Sparse matrix expected.\n"), get_fname(fname, fname_len), Rhs + (*spos - *topk));
@@ -1024,7 +1024,7 @@ int C2F(cresparse) (char *fname, int *lw, int *it, int *m, int *n, int *nel, int
 {
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
 
@@ -1095,8 +1095,7 @@ int C2F(getlistvect) (char *fname, int *topk, int *spos, int *lnum, int *it, int
 
     if (*m != 1 && *n != 1)
     {
-        Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Vector expected.\n"), get_fname(fname, fname_len), Rhs + (*spos - *topk),
-                 *lnum);
+        Scierror(999, _("%s: Wrong type for element %d of argument #%d: Vector expected.\n"), get_fname(fname, fname_len), *lnum, Rhs + (*spos - *topk));
         return FALSE;
     }
     return TRUE;
@@ -1203,8 +1202,7 @@ int C2F(getlistscalar) (char *fname, int *topk, int *spos, int *lnum, int *lr, u
 
     if (m * n != 1)
     {
-        Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Scalar expected.\n"), get_fname(fname, fname_len), Rhs + (*spos - *topk),
-                 *lnum);
+        Scierror(999, _("%s: Wrong type for element %d of argument #%d: Scalar expected.\n"), get_fname(fname, fname_len), *lnum, Rhs + (*spos - *topk));
         return FALSE;
     }
     return TRUE;
@@ -1369,8 +1367,8 @@ static int C2F(getwsmati) (char *fname, int *topk, int *spos, int *lw, int *m, i
     {
         if (*inlistx)
         {
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Matrix of strings expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Matrix of strings expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         }
         else
         {
@@ -1402,8 +1400,8 @@ static int C2F(getsmati) (char *fname, int *topk, int *spos, int *lw, int *m, in
     {
         if (*inlistx)
         {
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): String matrix expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Matrix of strings expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         }
         else
         {
@@ -1482,7 +1480,7 @@ int C2F(cresmat) (char *fname, int *lw, int *m, int *n, int *nchar, unsigned lon
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(cresmati) (fname, Lstk(*lw), m, n, nchar, &job, &lr, &sz, fname_len) == FALSE)
@@ -1515,7 +1513,7 @@ int C2F(cresmat1) (char *fname, int *lw, int *m, int *nchar, unsigned long fname
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(cresmati) (fname, Lstk(*lw), m, &n, nchar, &job, &lr, &sz, fname_len) == FALSE)
@@ -1543,7 +1541,7 @@ int C2F(cresmat2) (char *fname, int *lw, int *nchar, int *lr, unsigned long fnam
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(cresmati) (fname, Lstk(*lw), &m, &n, nchar, &job, lr, &sz, fname_len) == FALSE)
@@ -1579,7 +1577,7 @@ int C2F(cresmat3) (char *fname, int *lw, int *m, int *n, int *nchar, char *buffe
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(cresmati) (fname, Lstk(*lw), m, n, nchar, &job, &lr, &sz, fname_len) == FALSE)
@@ -1608,7 +1606,7 @@ int C2F(cresmat4) (char *fname, int *lw, int *m, int *nchar, int *lr, unsigned l
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     nnchar = 0;
@@ -1795,7 +1793,7 @@ int cre_smat_from_str(char *fname, int *lw, int *m, int *n, char *Str[], unsigne
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
 
@@ -1886,7 +1884,7 @@ int cre_sparse_from_ptr(char *fname, int *lw, int *m, int *n, SciSparse * Str, u
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
 
@@ -2055,7 +2053,7 @@ int C2F(smatj) (char *fname, int *lw, int *j, unsigned long fname_len)
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     ix1 = *lw - 1;
@@ -2216,7 +2214,7 @@ int C2F(lmatj) (char *fname, int *lw, int *j, unsigned long fname_len)
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     ix1 = *lw - 1;
@@ -2392,7 +2390,7 @@ int C2F(pmatj) (char *fname, int *lw, int *j, unsigned long fname_len)
     int l2, m2, n2, lc, il, lj, it, lr, il2, ilp;
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     ix1 = *lw - 1;
@@ -2467,7 +2465,7 @@ int C2F(crewmat) (char *fname, int *lw, int *m, int *lr, unsigned long fname_len
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     il = iadr(*Lstk(*lw));
@@ -2497,7 +2495,7 @@ int C2F(crewimat) (char *fname, int *lw, int *m, int *n, int *lr, unsigned long
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     il = iadr(*Lstk(*lw));
@@ -2607,7 +2605,7 @@ int C2F(crepointer) (char *fname, int *lw, int *lr, unsigned long fname_len)
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(crepointeri) (fname, Lstk(*lw), lr, &c_true, fname_len) == FALSE)
@@ -2732,8 +2730,8 @@ int C2F(getlistvectrow) (char *fname, int *topk, int *spos, int *lnum, int *it,
     }
     if (*m != 1)
     {
-        Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Row vector expected.\n"), get_fname(fname, fname_len),
-                 Rhs + (*spos - *topk), *lnum);
+        Scierror(999, _("%s: Wrong type for element %d of argument #%d: Row vector expected.\n"), get_fname(fname, fname_len),
+                 *lnum, Rhs + (*spos - *topk));
         return FALSE;
     }
     return TRUE;
@@ -2913,8 +2911,8 @@ static int C2F(getpointeri) (char *fname, int *topk, int *spos, int *lw, int *lr
         /* used to be sci_lufact_pointer before Scilab 5.2 */
         sciprint("----%d\n", *istk(il));
         if (*inlistx)
-            Scierror(197, _("%s: Wrong type for argument #%d (List element: %d): Boxed pointer expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(197, _("%s: Wrong type for element %d of argument #%d: Boxed pointer expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         else
         {
             Scierror(198, _("%s: Wrong type for argument #%d: Boxed pointer expected.\n"), get_fname(fname, fname_len), Rhs + (*spos - *topk));
@@ -2939,7 +2937,7 @@ int C2F(mspcreate) (int *lw, int *m, int *n, int *nzMax, int *it)
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), "");
+        Scierror(18, _("%s: Too many variables.\n"), "");
         return FALSE;
     }
 
@@ -3089,7 +3087,7 @@ int C2F(vcopyobj) (char *fname, int *lw, int *lwd, unsigned long fname_len)
     l1 = *Lstk(*lwd);
     if (*lwd + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     Err = *Lstk(*lwd) + lv - *Lstk(Bot);
@@ -3378,7 +3376,7 @@ int C2F(getexternal) (char *fname, int *topk, int *lw, char *namex, int *typex,
                 (*setfun) (namex, &irep);   /* , name_len); */
                 if (irep == 1)
                 {
-                    Scierror(50, _("%s: %s: subroutine not found.\n"), get_fname(fname, fname_len), namex);
+                    Scierror(50, _("%s: Subroutine '%s' not found.\n"), get_fname(fname, fname_len), namex);
                     ret_value = FALSE;
                 }
             }
@@ -3469,7 +3467,7 @@ int C2F(credata) (char *fname, int *lw, int m, unsigned long fname_len)
     lr = *Lstk(*lw);
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
 
@@ -3569,7 +3567,7 @@ int C2F(crehmat) (char *fname, int *lw, int *m, int *n, int *lr, unsigned long f
 
     if (*lw + 1 >= Bot)
     {
-        Scierror(18, _("%s: Too many variables!\n"), get_fname(fname, fname_len));
+        Scierror(18, _("%s: Too many variables.\n"), get_fname(fname, fname_len));
         return FALSE;
     }
     if (C2F(crehmati) (fname, Lstk(*lw), m, n, lr, &c_true, fname_len) == FALSE)
@@ -3644,8 +3642,8 @@ static int C2F(gethmati) (char *fname, int *topk, int *spos, int *lw, int *m, in
     if (*istk(il) != sci_handles)
     {
         if (*inlistx)
-            Scierror(999, _("%s: Wrong type for argument #%d (List element: %d): Matrix of handle expected.\n"), get_fname(fname, fname_len),
-                     Rhs + (*spos - *topk), *nel);
+            Scierror(999, _("%s: Wrong type for element %d of argument #%d: Matrix of handle expected.\n"), get_fname(fname, fname_len),
+                     *nel, Rhs + (*spos - *topk));
         else
         {
             Scierror(200, _("%s: Wrong type for argument #%d: Matrix of handle expected.\n"), get_fname(fname, fname_len), Rhs + (*spos - *topk));
index f83e4f1..84057a0 100644 (file)
@@ -822,7 +822,7 @@ int C2F(intehm)()
         ier = create_index_vector(i, dec + i, &mn, H.dims[i - 1], &ind_max);
         if ( ier == 0  ||  ind_max > H.dims[i - 1] )
         {
-            Scierror(999, _("%s: Bad index #%d in hypermatrix extraction. "), "hmops", i);
+            Scierror(999, _("%s: Invalid index #%d in hypermatrix extraction. "), "hmops", i);
             return 0;
         }
         if ( mn == 0 )   /* the vector index is [] => we return an empty matrix */
@@ -1055,7 +1055,7 @@ int C2F(intihm)()
             }
             else   /* B have at least 2 elts */
             {
-                Scierror(999, _("%s: Bad hypermatrix insertion.\n"), "hmops");
+                Scierror(999, _("%s: Invalid hypermatrix insertion.\n"), "hmops");
                 return 0;
             }
         }
index ffe4bee..270effb 100644 (file)
@@ -16,7 +16,7 @@ if haveacompiler() then
     "{ *c = *a + *b; }"  ];
 
     mprintf("\n");
-    mprintf(gettext("C Function to call in scilab.\n"));
+    mprintf(gettext("Calling a C function from Scilab.\n"));
 
     disp(foo);
 
@@ -28,7 +28,7 @@ if haveacompiler() then
         mputl(foo,"foo.c");
 
         mprintf("\n");
-        mprintf(gettext("Call ilib_for_link to build C function.\n"));
+        mprintf(gettext("Calling ilib_for_link to build C function.\n"));
         ilib_for_link(["foo"],"foo.c",[],"c");
         exec loader.sce ;
         chdir(path);
@@ -39,7 +39,7 @@ if haveacompiler() then
     X = 5;
     Y = 7;
     mprintf("\n");
-    mprintf(gettext("Call C function. Z = X+Y"));
+    mprintf(gettext("Calling C function. Z = X+Y"));
     mprintf("\n");
     mprintf(gettext("with X = %d"), X);
     mprintf("\n");
@@ -48,7 +48,7 @@ if haveacompiler() then
     mprintf("Z = call(''foo'', X, 1, ''d'', Y, 2, ''d'', ''out'', [1,1], 3, ''d'');");
     mprintf("\n");
     Z = call("foo", X, 1, "d", Y, 2, "d", "out", [1,1], 3, "d");
-    mprintf(gettext("result Z = %d"), Z);
+    mprintf(gettext("Result Z = %d"), Z);
     mprintf("\n");
 
 end
\ No newline at end of file
index 62a35a9..d310dfb 100644 (file)
@@ -15,7 +15,7 @@ if haveacompiler() then
     "      return"; "       end"];
 
     mprintf("\n");
-    mprintf(gettext("Fortran subroutine to call in scilab.\n"));
+    mprintf(gettext("Calling a Fortran subroutine from Scilab.\n"));
 
     disp(foof);
 
@@ -27,7 +27,7 @@ if haveacompiler() then
         mputl(foof,"foof.f");
 
         mprintf("\n");
-        mprintf(gettext("Call ilib_for_link to build fortran subroutine.\n"));
+        mprintf(gettext("Calling ilib_for_link to build a Fortran subroutine.\n"));
 
         ilib_for_link(["foof"],"foof.f",[],"f");
         exec loader.sce ;
@@ -39,7 +39,7 @@ if haveacompiler() then
     Y = 7;
 
     mprintf("\n");
-    mprintf(gettext("Call Fortran subroutine. Z = X+Y"));
+    mprintf(gettext("Calling Fortran subroutine. Z = X+Y"));
     mprintf("\n");
     mprintf(gettext("with X = %d"), X);
     mprintf("\n");
@@ -48,7 +48,7 @@ if haveacompiler() then
     mprintf("Z = call(''foof'', X, 1, ''d'', Y, 2, ''d'', ''out'', [1,1], 3, ''d'');");
     mprintf("\n");
     Z = call("foof", X, 1, "d", Y, 2, "d", "out", [1,1], 3, "d");
-    mprintf(gettext("result Z = %d"), Z);
+    mprintf(gettext("Result Z = %d"), Z);
     mprintf("\n");
 
 end
\ No newline at end of file
index e89cae0..73d7fdb 100644 (file)
@@ -57,7 +57,7 @@ function bOK = detectmsvc64tools()
             else
                 show = displayWarningMsVC();
                 if show then
-                    TXT = gettext("Microsoft Visual Studio C 2008 or more x64 Compiler not installed.");
+                    TXT = gettext("Microsoft Visual Studio C 2008 (or more recent) x64 Compiler not installed.");
                     warning(TXT);
                     clear TXT;
                     disableWarningMsVC();
@@ -67,7 +67,7 @@ function bOK = detectmsvc64tools()
         else
             show = displayWarningMsVC();
             if show then
-                TXT = gettext("Microsoft Visual Studio C 2008 or more Compiler not found.");
+                TXT = gettext("Microsoft Visual Studio C 2008 (or more recent) Compiler not found.");
                 warning(TXT);
                 clear TXT;
                 disableWarningMsVC();
index 6822d66..a2b1a29 100644 (file)
@@ -50,7 +50,7 @@ function y = nthroot(x,n)
     elseif (isnan(n) & or(x >= 0)) then
         y(find(x>=0)) = %nan;
     elseif (or (or(x(:)<0) & (or(n~=fix(n)) | reste==0 | reste==%f))) then
-        error(msprintf(gettext("%s: If x is negative, then n must be odd integers\n"),"nthroot"));
+        error(msprintf(gettext("%s: If x is negative, then n must contain odd integers only.\n"),"nthroot"));
         // If n ~=0 and n ~= %nan
     elseif (or(n~=0) & ~isnan(n)) then
         // If x = 0 and n is negative and n i~= %nan
index 9288af8..1033514 100644 (file)
@@ -137,7 +137,7 @@ int sci_gsort(char *fname, unsigned long fname_len)
             if (getWarningMode())
             {
                 sciprint(_("WARNING: %s\n"), _("This usage of the third argument of gsort is obsolete."));
-                sciprint(_("WARNING: %s\n"), _("It will be more strict in Scilab 6."));
+                sciprint(_("WARNING: %s\n"), _("It will no more be available in Scilab 6."));
                 sciprint(_("WARNING: %s\n"), _("Please use 'd' or 'i' instead."));
             }
         }
index 1a6434b..ca1351d 100644 (file)
@@ -35,37 +35,37 @@ assert_checkfalse(execstr("nthroot(-2, %nan)", "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checkfalse(execstr("nthroot(-2, %eps)", "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checkfalse(execstr("nthroot(-3, 6)",     "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checkfalse(execstr("nthroot(-3, 0)",     "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checkfalse(execstr("nthroot(-%inf, -2)", "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checkfalse(execstr("nthroot(-2, -2)",     "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checkfalse(execstr("nthroot(-2, 2)",      "errcatch") == 0);
 lasterror(execstr("10000","errcatch") == 0)
  ans  =
  
- nthroot: If x is negative, then n must be odd integers   
+ nthroot: If x is negative, then n must contain odd integers only.   
 assert_checktrue(nthroot(3, []) == 3);
 // 2. Singular Values
 // ==================
index df5e8d2..c4950d9 100644 (file)
@@ -54,12 +54,12 @@ int sci_getrelativefilename(char *fname, unsigned long l)
     // Check type
     if (isStringType(pvApiCtx, piAddr1) == 0)
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: Matrix of strings expected.\n"), fname, 1);
+        Scierror(999, _("%s: Wrong type for input argument #%d: A matrix of strings expected.\n"), fname, 1);
         return 0;
     }
     if (getAllocatedMatrixOfString(pvApiCtx, piAddr1, &iRows1, &iCols1, &Input_StringMatrix_1))
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: Matrix of strings expected.\n"), fname, 1);
+        Scierror(999, _("%s: Wrong type for input argument #%d: A matrix of strings expected.\n"), fname, 1);
         return 0;
     }
 
@@ -74,12 +74,12 @@ int sci_getrelativefilename(char *fname, unsigned long l)
     // Check type
     if (isStringType(pvApiCtx, piAddr2) == 0)
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: Matrix of strings exepected.\n"), fname, 2);
+        Scierror(999, _("%s: Wrong type for input argument #%d: A matrix of strings expected.\n"), fname, 2);
         return 0;
     }
     if (getAllocatedMatrixOfString(pvApiCtx, piAddr2, &iRows2, &iCols2, &Input_StringMatrix_2))
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: Matrix of strings expected.\n"), fname, 2);
+        Scierror(999, _("%s: Wrong type for input argument #%d: A matrix of strings expected.\n"), fname, 2);
         return 0;
     }
 
@@ -91,7 +91,7 @@ int sci_getrelativefilename(char *fname, unsigned long l)
         return 0;
     }
 
-    OutputStrings = (char**)MALLOC(iRows1*iCols1 * sizeof(char*));
+    OutputStrings = (char**)MALLOC(iRows1 * iCols1 * sizeof(char*));
     if (OutputStrings == NULL)
     {
         freeAllocatedMatrixOfString(iRows1, iCols1, Input_StringMatrix_1);
@@ -100,7 +100,7 @@ int sci_getrelativefilename(char *fname, unsigned long l)
         return 0;
     }
 
-    for( x = 0; x < iRows1*iCols1; x++)
+    for ( x = 0; x < iRows1 * iCols1; x++)
     {
         OutputStrings[x] = (char*)MALLOC(PATH_MAX * sizeof(char*));
         if (OutputStrings[x] == NULL)
@@ -120,7 +120,7 @@ int sci_getrelativefilename(char *fname, unsigned long l)
         {
             Scierror(999, _("%s: Wrong size for input argument #%d: Must be less than %d characters.\n"), fname, 2, PATH_MAX);
         }
-        OutputStrings[x] = getrelativefilename(Input_StringMatrix_1[x], Input_StringMatrix_2[x]);        
+        OutputStrings[x] = getrelativefilename(Input_StringMatrix_1[x], Input_StringMatrix_2[x]);
     }
 
     sciErr = createMatrixOfString(pvApiCtx, iRhs + 1, iRows1, iCols1, (char**)OutputStrings);
index b8cd736..23ec70f 100644 (file)
@@ -424,7 +424,7 @@ char *downloadFile(char *url, char *dest, char *username, char *password, char *
 
         if (res != CURLE_OK)
         {
-            Scierror(999, _("Failed to set write data [%s]\n"), errorBuffer);
+            Scierror(999, _("Failed to set write function [%s]\n"), errorBuffer);
             return NULL;
         }
 
index dd2a7ac..d9e6ea9 100644 (file)
@@ -73,7 +73,7 @@ function opt1 = getColorIndex(ColorString)
     str = part(str,i:length(str));
 
     if (size(opt1,"*") > 1)  // unreachable case normally
-        warning(msprintf(gettext("%s:  Wrong number of input argument: %d expected.\n"),"getColorIndex",1));
+        warning(msprintf(gettext("%s:  Wrong number of input arguments: %d expected.\n"),"getColorIndex",1));
         return;
     end
 
index aea1eac..23d33fa 100644 (file)
@@ -12,7 +12,7 @@ function [a]=sca(h)
     [lhs,rhs] = argn(0);
 
     if rhs <> 1 then
-        error(msprintf(gettext("%s: Wrong number of input argument: %d expected.\n"), "sca",1));
+        error(msprintf(gettext("%s: Wrong number of input arguments: %d expected.\n"), "sca",1));
         return;
     end
 
index 629b8a9..b51f7d9 100644 (file)
@@ -177,7 +177,7 @@ int sci_xset(char *fname, unsigned long fname_len)
         int clipState = 2;
         if (nbInputArgument(pvApiCtx) != 5 && nbInputArgument(pvApiCtx) != 2)
         {
-            Scierror(999, _("%s: Wrong number of input argument: %d or %d expected.\n"), fname, 2, 5);
+            Scierror(999, _("%s: Wrong number of input arguments: %d or %d expected.\n"), fname, 2, 5);
             return 1;
         }
 
@@ -243,7 +243,7 @@ int sci_xset(char *fname, unsigned long fname_len)
         char *subwinUID = NULL;
         if (nbInputArgument(pvApiCtx) != 3)
         {
-            Scierror(999, _("%s: Wrong number of input argument: %d expected.\n"), fname, 3);
+            Scierror(999, _("%s: Wrong number of input arguments: %d expected.\n"), fname, 3);
             return -1;
         }
 
@@ -417,7 +417,7 @@ int sci_xset(char *fname, unsigned long fname_len)
         double fontSize = xx[1];
         if (nbInputArgument(pvApiCtx) != 3)
         {
-            Scierror(999, _("%s: Wrong number of input argument: %d expected.\n"), fname, 3);
+            Scierror(999, _("%s: Wrong number of input arguments: %d expected.\n"), fname, 3);
             return -1;
         }
 
@@ -486,7 +486,7 @@ int sci_xset(char *fname, unsigned long fname_len)
         int figurePosition[2];
         if (nbInputArgument(pvApiCtx) != 2)
         {
-            Scierror(999, _("%s: Wrong number of input argument: %d expected.\n"), fname, 2);
+            Scierror(999, _("%s: Wrong number of input arguments: %d expected.\n"), fname, 2);
             return -1;
         }
         getOrCreateDefaultSubwin();
@@ -500,7 +500,7 @@ int sci_xset(char *fname, unsigned long fname_len)
         int figureSize[2];
         if (nbInputArgument(pvApiCtx) != 2 && nbInputArgument(pvApiCtx) != 3)
         {
-            Scierror(999, _("%s: Wrong number of input argument: %d or %d expected.\n"), fname, 2, 3);
+            Scierror(999, _("%s: Wrong number of input arguments: %d or %d expected.\n"), fname, 2, 3);
             return -1;
         }
         getOrCreateDefaultSubwin();
index 1770feb..0e3bf4b 100644 (file)
@@ -20,4 +20,4 @@
 //  at line       2 of function sca called by :
 //  sca()
 execstr("sca();","errcatch");
-if lasterror() <> msprintf(gettext("%s: Wrong number of input argument: %d expected.\n"), "sca",1) then bugmes();quit;end
+if lasterror() <> msprintf(gettext("%s: Wrong number of input arguments: %d expected.\n"), "sca",1) then bugmes();quit;end
index a049f27..d7c4e1b 100644 (file)
@@ -24,4 +24,4 @@
 //  sca()
 
 execstr("sca();","errcatch");
-if lasterror() <> msprintf(gettext("%s: Wrong number of input argument: %d expected.\n"), "sca",1) then pause,end
+if lasterror() <> msprintf(gettext("%s: Wrong number of input arguments: %d expected.\n"), "sca",1) then pause,end
index d887a44..8ca56dc 100644 (file)
@@ -134,7 +134,7 @@ int sci_displaytree(char *fname, unsigned long fname_len)
 
     if (getAllocatedSingleString(pvApiCtx, piAddrLabel, &strLabel))
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: Label: A string expected.\n"), fname, 1);
+        Scierror(999, _("%s: Wrong type for element %d of input argument #%d: A string expected.\n"), fname, 3, 1);
         return 1;
     }
 
@@ -151,7 +151,7 @@ int sci_displaytree(char *fname, unsigned long fname_len)
 
     if (getAllocatedSingleString(pvApiCtx, piAddrIcon, &strIcon))
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: Icon: A string expected.\n"), fname, 1);
+        Scierror(999, _("%s: Wrong type for element %d of input argument #%d: A string expected.\n"), fname, 4, 1);
         return 1;
     }
 
@@ -168,7 +168,7 @@ int sci_displaytree(char *fname, unsigned long fname_len)
 
     if (getAllocatedSingleString(pvApiCtx, piAddrCallback, &strCallback))
     {
-        Scierror(999, _("%s: Wrong type for input argument #%d: callback: A string expected.\n"), fname, 1);
+        Scierror(999, _("%s: Wrong type for element %d of input argument #%d: A string expected.\n"), fname, 5, 1);
         return 1;
     }
 
index 9d7a994..56671e9 100644 (file)
@@ -142,7 +142,7 @@ int sci_h5dataset(char *fname, unsigned long fname_len)
 
     if (row != 5)
     {
-        Scierror(999, _("%s: Wrogn size for input argument #%d: five row vector expected.\n"), fname, 3);
+        Scierror(999, _("%s: Wrong size for input argument #%d: Five row vector expected.\n"), fname, 3);
         return 0;
     }
 
index 0dd34e4..6843b79 100644 (file)
@@ -78,7 +78,7 @@ private:
         hid_t stid = H5Eget_current_stack();
         if (stid < 0)
         {
-            return std::string(_("Cannot get the current errors stack"));
+            return std::string(_("Cannot get the current stack of errors."));
         }
 
         ssize_t stackSize = H5Eget_num(stid);
index 9a9045a..6d6790b 100644 (file)
@@ -399,7 +399,7 @@ void HDF5Scilab::createLink(H5Object & parent, const std::string & name, H5Objec
     {
         if (hard)
         {
-            throw H5Exception(__LINE__, __FILE__, _("Cannot create a hard link to an external object: %s."), name.c_str());
+            throw H5Exception(__LINE__, __FILE__, _("Cannot create a hard link to the external object: %s."), name.c_str());
         }
         createLink(parent, name, targetObject);
     }
index f0e4ae4..8f3102d 100644 (file)
@@ -1,4 +1,3 @@
-
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 // Copyright (C) ????-2008 - INRIA
 //
@@ -11,7 +10,7 @@
 function [As,Es,Z,dim]= gschur(A,E,extern)
 
     if argn(2)<=2 then
-        warning("Obsolete function gschur. Please, replace gschur by schur")
+        warning("Obsolete function. Please use schur instead.")
         if argn(1)==2 then
             [As,Es]= schur(A,E)
         else
@@ -27,7 +26,7 @@ function [As,Es,Z,dim]= gschur(A,E,extern)
                 Es=dim;As=Z;
             end
         else // hard coded
-            warning(msprintf(gettext("%s: Obsolete function. Old external cannot be used."),"gschur"));
+            warning(msprintf(gettext("%s: Obsolete function. Former external functions cannot be used anymore."),"gschur"));
             //impossible to redefine
         end
     else //coded by a scilab function
@@ -38,7 +37,7 @@ function [As,Es,Z,dim]= gschur(A,E,extern)
         warning(msprintf(gettext("%s: Obsolete function. Please replace ''%s'' by ''%s''."),"gschur","gschur","schur"));
         deff("t=%_rule(Alpha,Beta)",["if imag(Alpha)==0 then"
         "  t=extern([1,real(Alpha),Beta])==1"
-        "else              "
+        "else"
         "  c=Alpha/Beta"
         "  t=extern([2,real(c+c''),real(c*c'')])==1"
         "end;"])
index 6b0044a..3d5c763 100644 (file)
@@ -35,7 +35,7 @@ function X=pinv(A,tol)
                 execstr("X="+fun+"(A,tol)")
             end
         else
-            error(msprintf(gettext("%s: Type not defined for %s. Check argument or define function %s."),"pinv",n,fun));
+            error(msprintf(gettext("%s: Function not defined for type ''%s''. Check argument or define function %s."),"pinv",n,fun));
         end
     end
 endfunction
index 1bed5cb..b5166c1 100644 (file)
@@ -27,7 +27,7 @@ function r=rank(A,tol)
                 execstr("r="+fun+"(A,tol)")
             end
         else
-            error(msprintf(gettext("%s: Type not defined ''%s''. Check argument or define function %s."),"rank",n,fun));
+            error(msprintf(gettext("%s: Function not defined for type ''%s''. Check argument or define function %s."),"rank",n,fun));
         end
     end
 endfunction
index 530cedb..b9821f2 100644 (file)
@@ -30,7 +30,7 @@ function [Ws,Fs1]=rowshuff(Fs,alfa)
     rk=0;i=0;
     while rk  < n
         if i==n then
-            error(msprintf(gettext("%s: Singular pencil!"),"rowshuffle"));
+            error(msprintf(gettext("%s: Singular pencil."),"rowshuffle"));
             W=[];
         end
         [W,rk]=rowcomp(E);
index bba1df6..45c32fd 100644 (file)
@@ -39,7 +39,7 @@ function [A,jb]=rref(A,tol)
         if exists(fun)==1 then
             execstr("[A,jb]="+fun+"(A)")
         else
-            error(msprintf(gettext("%s: Type not defined %s. Check argument or define function %s."),"rref",n,fun));
+            error(msprintf(gettext("%s: Function not defined for type ''%s''. Check argument or define function %s."),"rref",n,fun));
         end
     end
 endfunction
index b1a328c..8dcd99d 100644 (file)
@@ -64,9 +64,9 @@ function [txtdo]=lmitool(PROBNAME,XNAME,DNAME)
         labels=[gettext("LMI problem name: ");gettext("Names of unknown matrices: ");...
         gettext("Names of data matrices: ")];
         [ok,PROBNAME,XNAME,DNAME]=getvalue([gettext("Problem definition");
-        gettext("LMITOOL will generate for you a skeleton of the functions needed");
+        gettext("LMITOOL will generate a skeleton of the functions needed");
         gettext(" (see User''s Guide for details). For that, you need to specify:");
-        gettext("1- Name of you problem which will be given to the solver function,");
+        gettext("1- Name of your problem which will be given to the solver function,");
         gettext("2- Names of unknown matrices or list of unknown matrices,");
         gettext("3- Names of data matrices or list of data matrices.")],labels,...
         list("str",1,"str",1,"str",1),...
@@ -156,19 +156,19 @@ function [txtdo]=lmitool(PROBNAME,XNAME,DNAME)
     sep2;" ";txts1;" ";sep13;txts2];
 
     if RHS==0|RHS==1 then
-        [txt4]=x_dialog([gettext("Function definitions");
-        gettext("Here is a skeleton of the functions which you should edit");
-        gettext("You can do the editing in this window or click on ''ok'', save");
-        gettext("the skeleton and edit later using your favorite editor")],[txt4]);
+        [txt4]=x_dialog([gettext("Function definitions: ");
+        gettext("Here is a skeleton of the functions you should edit.");
+        gettext("You can edit in this window or click on ''ok''.");
+        gettext("Save and edit the skeleton later through your favorite editor.")],[txt4]);
     end
     if txt4==[] then txtdo="Try again";return;end
     txt=[txt4];
     n=1;
     if RHS<>3 then
 
-        fname=x_dialog([gettext("Name of file in which you want the solver function");
-        gettext("and the evaluation function be saved (overwrites if a");
-        gettext("file with the same name exists already)")],[fname+"                "])
+        fname=x_dialog([gettext("Name of the file where to save the solver function");
+        gettext("and the evaluation function");
+        gettext("(Will overwrite if a file with the same name already exists).")],[fname+"                "])
         fname=stripblanks(fname);
     else
         messagebox(gettext("functions saved in ")+fname',"modal","info");
index 7e1c6fb..b1ce5fb 100644 (file)
@@ -1441,7 +1441,7 @@ static int msg_113(int *n, int *ierr)
 /*--------------------------------------------------------------------------*/
 static int msg_114(int *n, int *ierr)
 {
-    sciprint(_("%s: %s: %s is too small. %s is orthogonal to the columns of the jacobian to machine precision.\n"), _("Warning"), "lsqrsolve", "gtol", "fvec");
+    sciprint(_("%s: %s: %s is too small. %s is orthogonal to the columns of the Jacobian to machine precision.\n"), _("Warning"), "lsqrsolve", "gtol", "fvec");
     return 0;
 }
 /*--------------------------------------------------------------------------*/
index 7b7d9e7..72134db 100644 (file)
@@ -13,7 +13,7 @@ function r=%hm_g_hm(a,b)
     //                  and if a and b have the same dimensions
     //                      or if one have only one element
     if type(a.entries) ~= 4 | type(b.entries) ~= 4 then
-        error(msprintf(_("%s: Operand not a boolean hypermat.\n"),"%hm_g_hm"));
+        error(msprintf(_("%s: Operand is not a boolean hypermatrix.\n"),"%hm_g_hm"));
     end
     if and(a.dims==b.dims) then
         r=hypermat(a.dims,a.entries | b.entries)
@@ -22,6 +22,6 @@ function r=%hm_g_hm(a,b)
     elseif prod(b.dims) == 1 then
         r=hypermat(a.dims,a.entries | b.entries)
     else
-        error(msprintf(_("%s: incompatible operand dimensions.\n"),"%hm_g_hm"));
+        error(msprintf(_("%s: Incompatible operand dimensions.\n"),"%hm_g_hm"));
     end
 endfunction
index 97012d9..5d65608 100644 (file)
@@ -9,7 +9,7 @@
 function r=%s_b_s(varargin)
     //a:b:c where a and b are double
     if round(varargin(1))<>varargin(1)|round(varargin(2))<>varargin(2) then
-        error(msprintf(_("%s: Wrong type for input argument #%d and #%d: integer values expected.\n"),"%s_b_s",1,2));
+        error(msprintf(_("%s: Wrong type for input arguments #%d and #%d: Integer values expected.\n"),"%s_b_s",1,2));
     end
     select type(varargin(3))
     case 8 then
index 622180f..9fad2b8 100644 (file)
@@ -36,7 +36,7 @@ function x=%s_pow(a,p)
         else
             [s,u,bs]=bdiag(p+0*%i);
             if max(bs)>1 then
-                error(msprintf(_("%s: unable to diagonalize!"),"%s_pow"));
+                error(msprintf(_("%s: Unable to diagonalize.\n"),"%s_pow"));
             end
             w=diag(s);
             x=u*diag(a.^diag(s))*inv(u);
@@ -59,7 +59,7 @@ function x=%s_pow(a,p)
             r=and(imag(a)==0)
             [s,u,bs]=bdiag(a+0*%i);
             if max(bs)>1 then
-                error(msprintf(_("%s: unable to diagonalize!"),"%s_pow"));
+                error(msprintf(_("%s: Unable to diagonalize.\n"),"%s_pow"));
             end
             x=u*diag(diag(s).^p)*inv(u);
         end
index 83eeb94..a4a66db 100644 (file)
@@ -30,7 +30,7 @@ function a=%sp_i_sp(i,j,b,a)
             a = matrix(b,m,n)
         else
             // print an error
-            error(msprintf(_("%s: Sparse insertion case not treated.\n"),"%sp_i_sp"));
+            error(msprintf(_("%s: Sparse insertion case is not implemented.\n"),"%sp_i_sp"));
         end
     end
 endfunction
index 11ff96f..bab33da 100644 (file)
@@ -44,7 +44,7 @@ function [z]=PoissonT(n)
     deff("[y]=fact(n)","if n==0 then y=1;else y=n*fact(n-1);end");
     zt=[];for i1=0:N; zt=[zt, exp(-pmean) *pmean^i1/fact(i1)];end
     plot2d1("onn",i',zt',[-2,6]);
-    xtitle(_("Simulation of a poisson random variable"));
+    xtitle(_("Simulation of a Poisson random variable"));
     current_axe = gca();
     current_axe.title.font_size = 3;
     current_axe.background = color(232,230,200);
index 016c02e..2415750 100644 (file)
@@ -239,7 +239,7 @@ int set_seed_clcg4(int g, double s0, double s1, double s2, double s3)
         init_generator_clcg4(g, InitialSeed);
         if (getWarningMode())
         {
-            sciprint(_("WARNING: %s\n"), _("be aware that you have may lost synchronization\n    between the virtual gen %d and the others !\n    use grand(\"setall\", s1, s2, s3, s4) if you want recover it."), g);
+            sciprint(_("WARNING: %s\n"), _("be aware that you may have lost synchronization\n    between the virtual generator %d and the others.\n    use grand(\"setall\", s1, s2, s3, s4) if you want to recover it."), g);
         }
         return ( 1 );
     }
index b49d273..2e5ffa3 100644 (file)
@@ -22,6 +22,6 @@ grand('setsd',123456,123456,123456,123456);
 warning("on");
 grand('setgen',"clcg4");
 grand('setsd',123456,123456,123456,123456);
-WARNING: be aware that you have may lost synchronization
-    between the virtual gen %d and the others !
-    use grand("setall", s1, s2, s3, s4) if you want recover it.
+WARNING: be aware that you may have lost synchronization
+    between the virtual generator %d and the others.
+    use grand("setall", s1, s2, s3, s4) if you want to recover it.
index 71e7515..f958283 100644 (file)
@@ -84,7 +84,7 @@ function [flag_type,rdnom,DF_type,Code]=translate(CI,CI1,CLa_type,CLa_exp,CLb_ty
 
         [equations,impl_type]=gen_code_FEM(A,B1,B2,C1,C2,C3,F3,oper,N,a,b,..
         b1,b2,b3,b4,b5,b6,b7,vbc,kbc);
-        mprintf(_("The finite element discretization takes %.2f seconds"),timer());
+        mprintf(_("The finite element discretization took %.2f seconds"),timer());
         // FDM
     elseif (type_meth == 1) then
         //dans les différences finies on génère de l'implicite
@@ -103,7 +103,7 @@ function [flag_type,rdnom,DF_type,Code]=translate(CI,CI1,CLa_type,CLa_exp,CLb_ty
         // génération des équations
         [equations,impl_type,Nfictif]=gen_code_FDM(a1,b1,a2,b2,a3,b3,a4,b4,..
         a5,b5,a6,b6,a7,b7,a,b,N,oper,vbc,kbc,DF_type,h)
-        mprintf(_("The finite differences discretization takes %.2f seconds"),timer());
+        mprintf(_("The finite differences discretization took %.2f seconds"),timer());
 
         // FVM
     else
@@ -117,7 +117,7 @@ function [flag_type,rdnom,DF_type,Code]=translate(CI,CI1,CLa_type,CLa_exp,CLb_ty
 
         [equations,flag_type,impl_type]=gen_code_FVM(a1,b1,a2,b2,a3,b3,a4,b4,a5,b5,a6,b6,..
         a7,b7,N,oper,vbc,xn,xc);
-        mprintf(_("The finite volume discretization takes %.2f seconds"),timer());
+        mprintf(_("The finite volume discretization took %.2f seconds"),timer());
     end
     // Assemblage de code
     if (flag_type == 1) then
@@ -128,7 +128,7 @@ function [flag_type,rdnom,DF_type,Code]=translate(CI,CI1,CLa_type,CLa_exp,CLb_ty
 
     Code=code_generation(rdnom,equations,eq_pts_mes,flag_type,h,CI,CI1,a, ...
     Nfictif,N,impl_type,type_meth,oper);
-    mprintf(_("The code generation, the compilation and link takes %.2f seconds"),timer());
+    mprintf(_("The code generation, the compilation and link took %.2f seconds"),timer());
 
 endfunction
 
index 8dc7eda..9d4b139 100644 (file)
@@ -62,7 +62,7 @@ function [y,Fs,bits]=auread(aufile,ext)
             y = [snd("samples"),snd("chans")];
             return
         elseif exts>2 then
-            error(msprintf(gettext("%s: An error occurred: %s\n"),"auread",gettext("Index range must be specified as a scalar or 2-element vector.")));
+            error(msprintf(gettext("%s: An error occurred: %s\n"),"auread",gettext("Index range must be specified as a scalar or a 2 elements vector.")));
         elseif exts==1 then
             ext = [1,ext];
         end
index c7d1b71..8da3a8d 100644 (file)
@@ -56,11 +56,11 @@ function [spcho]= blkfc1(spcho,level)
 
     select iflag
     case -1 then,
-        error(gettext("Nonpositive diag. encountered, matrix is not positive def.")),
+        error(gettext("Non-positive diagonal encountered, matrix is not positive definite.")),
     case -2 then,
-        error(gettext("Insufficient working storage in blkfct, temp(*)")),
+        error(gettext("Insufficient working storage in blkfct, temp(*).")),
     case -3 then,
-        error(gettext("Insufficient working storage in blkfct, iwork(*)")),
+        error(gettext("Insufficient working storage in blkfct, iwork(*).")),
     end;
     //
     spcho("lnz")=lnz;
index 0d1b501..a54312c 100644 (file)
@@ -47,7 +47,7 @@ int cdfpoiI(char* fname, unsigned long l)
             if (S[i] == S[i] && S[i] + 1 != S[i]) // NaN and Inf will be handled in the program
                 if ((int) S[i] - S[i] != 0)
                 {
-                    Scierror(999, _("%s: Wrong value for input argument #%d: A matrix of integer value expected.\n"), fname, 2);
+                    Scierror(999, _("%s: Wrong value for input argument #%d: A matrix of integer values expected.\n"), fname, 2);
                     return 0;
                 }
         CdfBase(fname, 2, 2, callpos, "PQ", _("S and Xlam"), 1, C2F(cdfpoi),
@@ -68,7 +68,7 @@ int cdfpoiI(char* fname, unsigned long l)
             if (S[i] == S[i] && S[i] + 1 != S[i]) // NaN and Inf will be handled in the program
                 if ((int) S[i] - S[i] != 0)
                 {
-                    Scierror(999, _("%s: Wrong value for input argument #%d: A matrix of integer value expected.\n"), fname, 4);
+                    Scierror(999, _("%s: Wrong value for input argument #%d: A matrix of integer values expected.\n"), fname, 4);
                     return 0;
                 }
         CdfBase(fname, 3, 1, callpos, "Xlam", _("P,Q and S"), 3, C2F(cdfpoi),