\r\n => \n everywhere ... I hope it won't broke anything under weak OS
Sylvestre Ledru [Thu, 4 Oct 2007 11:41:33 +0000 (11:41 +0000)]
244 files changed:
scilab/Makefile.in
scilab/modules/cacsd/locales/en_US/messages.pot
scilab/modules/cacsd/sci_gateway/c/sci_contr.c
scilab/modules/completion/locales/en_US/messages.pot
scilab/modules/completion/sci_gateway/c/sci_completion.c
scilab/modules/completion/src/nocompletion/nocompletion.c
scilab/modules/console/locales/en_US/messages.pot
scilab/modules/console/src/noconsole/noconsole.c
scilab/modules/core/locales/en_US/messages.pot
scilab/modules/core/sci_gateway/c/sci_chdir.c
scilab/modules/core/sci_gateway/c/sci_getvariablesonstack.c
scilab/modules/core/sci_gateway/c/sci_libraryinfo.c
scilab/modules/core/src/c/banier.c
scilab/modules/core/src/c/basout.c
scilab/modules/core/src/c/dynamic_menus.c
scilab/modules/core/src/c/link_SYSV.c
scilab/modules/core/src/c/link_W95.c
scilab/modules/core/src/c/link_linux.c
scilab/modules/core/src/c/link_std.c
scilab/modules/core/src/c/msgstore.c
scilab/modules/data_structures/src/c/stcreate.c
scilab/modules/elementaries_functions/locales/en_US/messages.pot
scilab/modules/elementaries_functions/sci_gateway/c/sci_gsort.c
scilab/modules/fftw/locales/en_US/messages.pot
scilab/modules/fftw/sci_gateway/c/gw_fftw.c
scilab/modules/fftw/src/nofftw/nofftw.c
scilab/modules/fileio/locales/en_US/messages.pot
scilab/modules/fileio/sci_gateway/c/intreadxls.c
scilab/modules/fileio/sci_gateway/c/sci_fileio.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_isdir.c
scilab/modules/fileio/sci_gateway/c/sci_mfprintf.c
scilab/modules/fileio/sci_gateway/c/sci_mfscanf.c
scilab/modules/fileio/sci_gateway/c/sci_mprintf.c
scilab/modules/fileio/sci_gateway/c/sci_mscanf.c
scilab/modules/fileio/sci_gateway/c/sci_msprintf.c
scilab/modules/fileio/sci_gateway/c/sci_msscanf.c
scilab/modules/fileio/src/c/diary.c
scilab/modules/fileio/src/c/do_xxprintf.c
scilab/modules/fileio/src/c/do_xxscanf.c
scilab/modules/fileio/src/c/fileio.c
scilab/modules/fileio/src/c/logger.c
scilab/modules/fileio/src/c/mclose.c
scilab/modules/fileio/src/c/mget.c
scilab/modules/fileio/src/c/mgetstr.c
scilab/modules/fileio/src/c/mopen.c
scilab/modules/fileio/src/c/mput.c
scilab/modules/fileio/src/c/mputstr.c
scilab/modules/fileio/src/c/mseek.c
scilab/modules/graphics/sci_gateway/c/gw_graphics.c
scilab/modules/graphics/sci_gateway/c/sci_StringBox.c
scilab/modules/graphics/sci_gateway/c/sci_addcb.c
scilab/modules/graphics/sci_gateway/c/sci_champ.c
scilab/modules/graphics/sci_gateway/c/sci_contour2di.c
scilab/modules/graphics/sci_gateway/c/sci_copy.c
scilab/modules/graphics/sci_gateway/c/sci_delete.c
scilab/modules/graphics/sci_gateway/c/sci_demo.c
scilab/modules/graphics/sci_gateway/c/sci_drawaxis.c
scilab/modules/graphics/sci_gateway/c/sci_fec.c
scilab/modules/graphics/sci_gateway/c/sci_get.c
scilab/modules/graphics/sci_gateway/c/sci_glue.c
scilab/modules/graphics/sci_gateway/c/sci_grayplot.c
scilab/modules/graphics/sci_gateway/c/sci_matplot.c
scilab/modules/graphics/sci_gateway/c/sci_move.c
scilab/modules/graphics/sci_gateway/c/sci_newaxes.c
scilab/modules/graphics/sci_gateway/c/sci_param3d.c
scilab/modules/graphics/sci_gateway/c/sci_param3d1.c
scilab/modules/graphics/sci_gateway/c/sci_plot2d.c
scilab/modules/graphics/sci_gateway/c/sci_plot2d1.c
scilab/modules/graphics/sci_gateway/c/sci_plot3d.c
scilab/modules/graphics/sci_gateway/c/sci_relocate_handle.c
scilab/modules/graphics/sci_gateway/c/sci_set.c
scilab/modules/graphics/sci_gateway/c/sci_swap_handles.c
scilab/modules/graphics/sci_gateway/c/sci_unglue.c
scilab/modules/graphics/sci_gateway/c/sci_xarcs.c
scilab/modules/graphics/sci_gateway/c/sci_xarrows.c
scilab/modules/graphics/sci_gateway/c/sci_xclea.c
scilab/modules/graphics/sci_gateway/c/sci_xfarcs.c
scilab/modules/graphics/sci_gateway/c/sci_xfpolys.c
scilab/modules/graphics/sci_gateway/c/sci_xpoly.c
scilab/modules/graphics/sci_gateway/c/sci_xrect.c
scilab/modules/graphics/sci_gateway/c/sci_xrects.c
scilab/modules/graphics/sci_gateway/c/sci_xs2bmp.c
scilab/modules/graphics/sci_gateway/c/sci_xs2emf.c
scilab/modules/graphics/sci_gateway/c/sci_xsegs.c
scilab/modules/graphics/sci_gateway/c/sci_xset.c
scilab/modules/graphics/sci_gateway/c/sci_xstringb.c
scilab/modules/graphics/sci_gateway/c/sci_xtape.c
scilab/modules/graphics/src/c/Actions.c
scilab/modules/graphics/src/c/Contour.c
scilab/modules/graphics/src/c/Format.c
scilab/modules/graphics/src/c/GetCommandArg.c
scilab/modules/graphics/src/c/GetProperty.c
scilab/modules/graphics/src/c/HandleManagement.c
scilab/modules/graphics/src/c/Interaction.c
scilab/modules/graphics/src/c/Plo2dEch.c
scilab/modules/graphics/src/c/SetProperty.c
scilab/modules/graphics/src/c/getHandleProperty/CheckTicksProperty.c
scilab/modules/graphics/src/c/getHandleProperty/set_data_property.c
scilab/modules/graphics/src/c/sciCall.c
scilab/modules/graphics/src/c/xs2file.c
scilab/modules/graphics/src/nographics/nographics.c
scilab/modules/gui/sci_gateway/c/sci_ClipBoard.c
scilab/modules/gui/sci_gateway/c/sci_setlookandfeel.c
scilab/modules/gui/src/nogui/nogui.c
scilab/modules/helptools/macros/xmlfiletohtml.sci
scilab/modules/history_manager/locales/en_US/messages.pot
scilab/modules/history_manager/src/nohistory_manager/nohistory_manager.c
scilab/modules/incremental_link/examples/dynamic_links_c_and_fortran/ext14c.c
scilab/modules/incremental_link/examples/gateway/intmatmul.c
scilab/modules/incremental_link/examples/gateway/intview.c
scilab/modules/incremental_link/examples/interfaces/c/as2osc.c
scilab/modules/incremental_link/examples/interfaces/c/crestrc.c
scilab/modules/incremental_link/examples/interfaces/c/intex13c.c
scilab/modules/incremental_link/examples/interfaces/c/intex15c.c
scilab/modules/incremental_link/examples/interfaces/c/intex17c.c
scilab/modules/incremental_link/examples/interfaces/c/intex1c.c
scilab/modules/incremental_link/examples/interfaces/c/intex2c.c
scilab/modules/incremental_link/examples/interfaces/c/intex4c.c
scilab/modules/incremental_link/examples/interfaces/c/intex5c.c
scilab/modules/incremental_link/examples/interfaces/c/intex6c.c
scilab/modules/incremental_link/examples/interfaces/c/intex8c.c
scilab/modules/incremental_link/locales/en_US/messages.pot
scilab/modules/integer/locales/en_US/messages.pot
scilab/modules/integer/src/c/mgeti.c
scilab/modules/integer/src/c/mputi.c
scilab/modules/interpolation/locales/en_US/messages.pot
scilab/modules/interpolation/sci_gateway/c/sci_bsplin3val.c
scilab/modules/interpolation/sci_gateway/c/sci_cshep2d.c
scilab/modules/interpolation/sci_gateway/c/sci_eval_cshep2d.c
scilab/modules/interpolation/sci_gateway/c/sci_interp.c
scilab/modules/interpolation/sci_gateway/c/sci_interp2d.c
scilab/modules/interpolation/sci_gateway/c/sci_interp3d.c
scilab/modules/interpolation/sci_gateway/c/sci_linear_interpn.c
scilab/modules/interpolation/sci_gateway/c/sci_lsq_splin.c
scilab/modules/interpolation/sci_gateway/c/sci_splin.c
scilab/modules/interpolation/sci_gateway/c/sci_splin2d.c
scilab/modules/interpolation/sci_gateway/c/sci_splin3d.c
scilab/modules/interpolation/src/c/interpolation.c
scilab/modules/intersci/examples/ex12c.c
scilab/modules/intersci/examples/ex14c.c
scilab/modules/intersci/examples/ex15c.c
scilab/modules/intersci/examples/ex16c.c
scilab/modules/intersci/examples/ex6c.c
scilab/modules/intersci/examples/ex8c.c
scilab/modules/intersci/locales/en_US/messages.pot
scilab/modules/io/locales/en_US/messages.pot
scilab/modules/io/sci_gateway/c/sci_get_absolute_file_path.c
scilab/modules/io/src/c/getenvc.c
scilab/modules/jvm/locales/en_US/messages.pot
scilab/modules/jvm/sci_gateway/c/gw_jvm.c
scilab/modules/jvm/sci_gateway/c/sci_javaclasspath.c
scilab/modules/jvm/sci_gateway/c/sci_javalibrarypath.c
scilab/modules/jvm/sci_gateway/c/sci_system_getproperty.c
scilab/modules/jvm/sci_gateway/c/sci_system_setproperty.c
scilab/modules/jvm/src/nojvm/nojvm.c
scilab/modules/linear_algebra/examples/intcdgemm.c
scilab/modules/linear_algebra/examples/intdgeesx.c
scilab/modules/linear_algebra/examples/intdgemm.c
scilab/modules/linear_algebra/examples/intzgeesx.c
scilab/modules/linear_algebra/examples/intzgemm.c
scilab/modules/linear_algebra/locales/en_US/messages.pot
scilab/modules/linear_algebra/sci_gateway/c/sci_backslash.c
scilab/modules/linear_algebra/sci_gateway/c/sci_balanc.c
scilab/modules/linear_algebra/sci_gateway/c/sci_bdiag.c
scilab/modules/linear_algebra/sci_gateway/c/sci_chol.c
scilab/modules/linear_algebra/sci_gateway/c/sci_det.c
scilab/modules/linear_algebra/sci_gateway/c/sci_eig.c
scilab/modules/linear_algebra/sci_gateway/c/sci_hess.c
scilab/modules/linear_algebra/sci_gateway/c/sci_inv.c
scilab/modules/linear_algebra/sci_gateway/c/sci_lsq.c
scilab/modules/linear_algebra/sci_gateway/c/sci_lu.c
scilab/modules/linear_algebra/sci_gateway/c/sci_qr.c
scilab/modules/linear_algebra/sci_gateway/c/sci_rcond.c
scilab/modules/linear_algebra/sci_gateway/c/sci_schur.c
scilab/modules/linear_algebra/sci_gateway/c/sci_slash.c
scilab/modules/linear_algebra/sci_gateway/c/sci_svd.c
scilab/modules/metanet/locales/en_US/messages.pot
scilab/modules/metanet/src/c/nometanet/nometanet.c
scilab/modules/mexlib/locales/en_US/messages.pot
scilab/modules/mexlib/src/c/mexlib.c
scilab/modules/optimization/locales/en_US/messages.pot
scilab/modules/optimization/src/c/intqld.c
scilab/modules/pvm/locales/en_US/messages.pot
scilab/modules/pvm/sci_gateway/c/sci_pvm_bcast.c
scilab/modules/pvm/sci_gateway/c/sci_pvm_config.c
scilab/modules/pvm/sci_gateway/c/sci_pvm_error_mode.c
scilab/modules/pvm/sci_gateway/c/sci_pvm_send.c
scilab/modules/pvm/sci_gateway/c/sci_pvm_tasks.c
scilab/modules/pvm/src/c/pvm_proc_ctrl.c
scilab/modules/pvm/src/nopvm/nopvm.c
scilab/modules/randlib/locales/en_US/messages.pot
scilab/modules/randlib/sci_gateway/c/sci_grand.c
scilab/modules/randlib/src/norandlib/norandlib.c
scilab/modules/renderer/locales/en_US/messages.pot
scilab/modules/renderer/src/norenderer/norenderer.c
scilab/modules/scicos/macros/scicos/scicos_flat.sci
scilab/modules/scicos/sci_gateway/c/intcscicos.c
scilab/modules/scicos/src/c/noscicos/noscicos.c
scilab/modules/scicos/src/c/readau.c
scilab/modules/scicos/src/c/readc.c
scilab/modules/scicos/src/c/scicos.c
scilab/modules/scicos/src/c/slider.c
scilab/modules/scicos/src/c/time_delay.c
scilab/modules/scicos/src/c/variable_delay.c
scilab/modules/sound/locales/en_US/messages.pot
scilab/modules/sound/sci_gateway/c/sci_PlaySound.c
scilab/modules/sound/sci_gateway/c/sci_beep.c
scilab/modules/sound/sci_gateway/c/sci_loadwave.c
scilab/modules/sound/sci_gateway/c/sci_savewave.c
scilab/modules/sound/src/c/raw.c
scilab/modules/sound/src/c/sox.c
scilab/modules/sound/src/c/wav.c
scilab/modules/sound/src/nosound/nosound.c
scilab/modules/special_functions/locales/en_US/messages.pot
scilab/modules/special_functions/sci_gateway/c/gw_special_functions2.c
scilab/modules/special_functions/sci_gateway/c/sci_beta.c
scilab/modules/special_functions/sci_gateway/c/sci_legendre.c
scilab/modules/statistics/locales/en_US/messages.pot
scilab/modules/statistics/sci_gateway/c/sci_cdfbet.c
scilab/modules/statistics/sci_gateway/c/sci_cdfbin.c
scilab/modules/statistics/sci_gateway/c/sci_cdfchi.c
scilab/modules/statistics/sci_gateway/c/sci_cdfchn.c
scilab/modules/statistics/sci_gateway/c/sci_cdff.c
scilab/modules/statistics/sci_gateway/c/sci_cdffnc.c
scilab/modules/statistics/sci_gateway/c/sci_cdfgam.c
scilab/modules/statistics/sci_gateway/c/sci_cdfnbn.c
scilab/modules/statistics/sci_gateway/c/sci_cdfnor.c
scilab/modules/statistics/sci_gateway/c/sci_cdfpoi.c
scilab/modules/statistics/sci_gateway/c/sci_cdft.c
scilab/modules/statistics/src/c/CdfBase.c
scilab/modules/string/locales/en_US/messages.pot
scilab/modules/string/src/c/men_Sutils.c
scilab/modules/string/src/c/strcat-c.c
scilab/modules/symbolic/locales/en_US/messages.pot
scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
scilab/modules/tclsci/locales/en_US/messages.pot
scilab/modules/tclsci/src/notclsci/notclsci.c
scilab/modules/windows_tools/sci_gateway/c/sci_dos.c
scilab/modules/windows_tools/sci_gateway/c/sci_winopen.c
scilab/modules/windows_tools/sci_gateway/c/sci_winqueryreg.c
scilab/modules/windows_tools/src/c/scilab_windows/console.c
scilab/modules/windows_tools/src/nowindows_tools/nowindows_tools.c

index 7ecc2f8..b22f16a 100644 (file)
@@ -47,10 +47,10 @@ DIST_COMMON = $(am__configure_deps) $(srcdir)/Makefile.am \
        $(top_srcdir)/libs/f2c/Makefile.in \
        $(top_srcdir)/modules/core/includes/machine.h.in \
        $(top_srcdir)/modules/helptools/macros/xmlfiletohtml.sci.in \
-       $(top_srcdir)/modules/scicos/src/ocaml/Makefile.in \
-       config/compile config/config.guess config/config.sub \
-       config/depcomp config/install-sh config/ltmain.sh \
-       config/missing
+       $(top_srcdir)/modules/scicos/src/ocaml/Makefile.in ABOUT-NLS \
+       ChangeLog config/compile config/config.guess \
+       config/config.rpath config/config.sub config/depcomp \
+       config/install-sh config/ltmain.sh config/missing
 ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
 am__aclocal_m4_deps = $(top_srcdir)/m4/fftw.m4 \
        $(top_srcdir)/m4/fortran.m4 $(top_srcdir)/m4/intel_compiler.m4 \
index f7fb89d..feb319f 100644 (file)
@@ -137,10 +137,10 @@ msgid     "incompatible LHS.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_contr.c, line: 35
-msgid  "Invalid A,B matrices \r\n"
+msgid  "Invalid A,B matrices \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_contr.c, line: 40
-msgid  "TOL must be in [0 1]\r\n"
+msgid  "TOL must be in [0 1]\n"
 msgstr ""
 
index 9b613c3..d4036c1 100644 (file)
@@ -32,12 +32,12 @@ int intab01od(char* fname)
        GetRhsVar(2,MATRIX_OF_DOUBLE_DATATYPE,&mB,&nB,&ptrB);   B=2;        /*     B */
        M=nB;
        if (nA != mB || mA != nA )
-       { Scierror(999,"Invalid A,B matrices \r\n");  return 0; }
+       { Scierror(999,"Invalid A,B matrices \n");  return 0; }
        if (Rhs == 3) {
                /*    TOL is given:   ab01od(A,B,tol)   */
                GetRhsVar(3,MATRIX_OF_DOUBLE_DATATYPE,&mtol,&ntol,&ptrTOL);  theTOL=*stk(ptrTOL);    /*     TOL */
                if (theTOL>1.0||theTOL<0.0) {
-                       Scierror(999,"TOL must be in [0 1]\r\n");  return 0; 
+                       Scierror(999,"TOL must be in [0 1]\n");  return 0; 
                }
        }
 
index bc493f7..afe0df8 100644 (file)
@@ -25,13 +25,13 @@ msgid       "The native library scicompletion does not exist or cannot be found."
 msgstr ""
 #
 # File: src/nocompletion/nocompletion.c, line: 11
-msgid  "completion interface not installed.\r\n"
+msgid  "completion interface not installed.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_completion.c, line: 31
 # File: sci_gateway/c/sci_completion.c, line: 84
 # File: sci_gateway/c/sci_completion.c, line: 95
 # File: sci_gateway/c/sci_completion.c, line: 107
-msgid  "Invalid parameter(s).\r\n"
+msgid  "Invalid parameter(s).\n"
 msgstr ""
 
index 21a0dd4..041ef08 100644 (file)
@@ -28,7 +28,7 @@ int C2F(sci_completion) _PARAMS((char *fname,unsigned long fname_len))
        }
        else
        {
-               Scierror(999,"Invalid parameter(s).\r\n");
+               Scierror(999,"Invalid parameter(s).\n");
                return 0;
        }
 
@@ -81,7 +81,7 @@ int C2F(sci_completion) _PARAMS((char *fname,unsigned long fname_len))
                                }
                                else
                                {
-                                       Scierror(999,"Invalid parameter(s).\r\n");
+                                       Scierror(999,"Invalid parameter(s).\n");
                                        return 0;
                                }
 
@@ -92,7 +92,7 @@ int C2F(sci_completion) _PARAMS((char *fname,unsigned long fname_len))
                        }
                        else
                        {
-                               Scierror(999,"Invalid parameter(s).\r\n");
+                               Scierror(999,"Invalid parameter(s).\n");
                                return 0;
                        }
                }
@@ -104,7 +104,7 @@ int C2F(sci_completion) _PARAMS((char *fname,unsigned long fname_len))
 
                if (Rhs == 2)
                {
-                       Scierror(999,"Invalid parameter(s).\r\n");
+                       Scierror(999,"Invalid parameter(s).\n");
                        return 0;
                }
 
index c15a398..c96460f 100644 (file)
@@ -8,7 +8,7 @@
 /*-----------------------------------------------------------------------------------*/ 
 int C2F(gw_completion)()
 {
-       Scierror(999,"completion interface not installed.\r\n");
+       Scierror(999,"completion interface not installed.\n");
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/ 
index 584862b..bdaafd8 100644 (file)
@@ -15,7 +15,7 @@ msgstr        "Project-Id-Version: Scilab - console\n"
        "Content-Transfer-Encoding: 8bit\n"
 #
 # File: src/noconsole/noconsole.c, line: 18
-msgid  "console interface not installed.\r\n"
+msgid  "console interface not installed.\n"
 msgstr ""
 #
 # File: src/jni/org_scilab_modules_gui_bridge_console.cpp, line: 44
index 13cf098..8623606 100644 (file)
@@ -15,7 +15,7 @@
 /*-----------------------------------------------------------------------------------*/ 
 int C2F(gw_console)()
 {
-       Scierror(999,"console interface not installed.\r\n");
+       Scierror(999,"console interface not installed.\n");
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/ 
index 73d15fc..8063eb4 100644 (file)
@@ -37,7 +37,7 @@ msgid "Functions compiled with very old versions are no more handled"
 msgstr ""
 #
 # File: src/c/link_std.c, line: 119
-msgid  "Std link : No unlink up to now \r\n"
+msgid  "Std link : No unlink up to now \n"
 msgstr ""
 #
 # File: src/c/link_std.c, line: 162
@@ -109,7 +109,7 @@ msgstr      ""
 #
 # File: src/c/link_std.c, line: 565
 # File: src/c/link_SYSV.c, line: 627
-msgid  "Link too many files \r\n"
+msgid  "Link too many files \n"
 msgstr ""
 #
 # File: src/c/msgs.c, line: 483
@@ -1199,56 +1199,56 @@ msgstr  ""
 #
 # File: src/c/link_W95.c, line: 44
 # File: src/c/link_SYSV.c, line: 125
-msgid  "shared archive loaded\r\n"
+msgid  "shared archive loaded\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 96
-msgid  "link: first argument must be a unique dll name\r\n"
+msgid  "link: first argument must be a unique dll name\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 101
 #, possible-c-format
-msgid  "link failed for dll %s\r\n"
+msgid  "link failed for dll %s\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 117
 # File: src/c/link_SYSV.c, line: 305
 #, possible-c-format
-msgid  "You can't open shared files maxentry %d reached\r\n"
+msgid  "You can't open shared files maxentry %d reached\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 148
 # File: src/c/link_SYSV.c, line: 500
 #, possible-c-format
-msgid  "You can't link more functions maxentry %d reached\r\n"
+msgid  "You can't link more functions maxentry %d reached\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 153
 # File: src/c/link_SYSV.c, line: 505
 #, possible-c-format
-msgid  "Shared lib %d does not exists\r\n"
+msgid  "Shared lib %d does not exists\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 159
 # File: src/c/link_SYSV.c, line: 511
 #, possible-c-format
-msgid  "Entry name %s is already loaded from lib %d\r\n"
+msgid  "Entry name %s is already loaded from lib %d\n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 166
 # File: src/c/link_SYSV.c, line: 529
 #, possible-c-format
-msgid  "%s is not an entry point \r\n"
+msgid  "%s is not an entry point \n"
 msgstr ""
 #
 # File: src/c/link_W95.c, line: 172
 # File: src/c/link_SYSV.c, line: 541
 #, possible-c-format
-msgid  "Linking %s \r\n"
+msgid  "Linking %s \n"
 msgstr ""
 #
 # File: src/c/link_linux.c, line: 104
-msgid  "aout link : No unlink up to now \r\n"
+msgid  "aout link : No unlink up to now \n"
 msgstr ""
 #
 # File: src/c/link_linux.c, line: 125
@@ -1273,7 +1273,7 @@ msgstr    ""
 # File: src/c/link_linux.c, line: 188
 # File: src/c/link_linux.c, line: 305
 #, possible-c-format
-msgid  "unloading : \"%s\"\r\n"
+msgid  "unloading : \"%s\"\n"
 msgstr ""
 #
 # File: src/c/link_linux.c, line: 203
@@ -1284,7 +1284,7 @@ msgstr    ""
 # File: src/c/link_linux.c, line: 216
 # File: src/c/link_linux.c, line: 317
 #, possible-c-format
-msgid  "loading : \"%s\"\r\n"
+msgid  "loading : \"%s\"\n"
 msgstr ""
 #
 # File: src/c/link_linux.c, line: 220
@@ -1312,7 +1312,7 @@ msgstr    ""
 #
 # File: src/c/link_linux.c, line: 256
 #, possible-c-format
-msgid  "procedure numero %d \"%s\" located in \"%s\"\r\n"
+msgid  "procedure numero %d \"%s\" located in \"%s\"\n"
 msgstr ""
 #
 # File: src/c/link_linux.c, line: 263
@@ -1333,11 +1333,11 @@ msgstr  ""
 #
 # File: src/c/link_linux.c, line: 342
 #, possible-c-format
-msgid  "procedure numero %d \"%s\" located in \"%s\" .... \r\n"
+msgid  "procedure numero %d \"%s\" located in \"%s\" .... \n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 181
-msgid  "No global constructor(s) call\r\n"
+msgid  "No global constructor(s) call\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 190
@@ -1346,16 +1346,16 @@ msgstr  ""
 #
 # File: src/c/link_SYSV.c, line: 240
 #, possible-c-format
-msgid  "Loading shared executable %s\r\n"
+msgid  "Loading shared executable %s\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 277
-msgid  "Link : scilab is not a valid first argument on your machine\r\n"
+msgid  "Link : scilab is not a valid first argument on your machine\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 288
 # File: src/c/link_SYSV.c, line: 534
-msgid  "link error\r\n"
+msgid  "link error\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 326
@@ -1365,27 +1365,27 @@ msgstr  ""
 #
 # File: src/c/link_SYSV.c, line: 333
 # File: src/c/link_SYSV.c, line: 423
-msgid  " to create a shared executable\r\n"
+msgid  " to create a shared executable\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 389
 # File: src/c/link_SYSV.c, line: 460
-msgid  "can't create new process: \r\n"
+msgid  "can't create new process: \n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 394
 # File: src/c/link_SYSV.c, line: 465
-msgid  "no child !\r\n"
+msgid  "no child !\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 398
 #, possible-c-format
-msgid  "ld returned bad status: %x\r\n"
+msgid  "ld returned bad status: %x\n"
 msgstr ""
 #
 # File: src/c/link_SYSV.c, line: 469
 #, possible-c-format
-msgid  "collect2 returned bad status: %x\r\n"
+msgid  "collect2 returned bad status: %x\n"
 msgstr ""
 #
 # File: src/c/version.c, line: 16
@@ -1677,12 +1677,12 @@ msgstr  ""
 #
 # File: src/c/dynamic_menus.c, line: 171
 #, possible-c-format
-msgid  "   Unqueuing %s - No option\r\n"
+msgid  "   Unqueuing %s - No option\n"
 msgstr ""
 #
 # File: src/c/dynamic_menus.c, line: 172
 #, possible-c-format
-msgid  "   Unqueuing %s - seq\r\n"
+msgid  "   Unqueuing %s - seq\n"
 msgstr ""
 #
 # File: src/c/getmodules.c, line: 72
@@ -1719,56 +1719,56 @@ msgid   "              Consortium Scilab (INRIA, ENPC)              "
 msgstr ""
 #
 # File: src/c/banier.c, line: 32
-msgid  "!!! WARNING !!!\r\n"
+msgid  "!!! WARNING !!!\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 33
 msgid  "This software is being provided \"as is\", without any express or "
-       "\r\n"
+       "\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 34
-msgid  "implied warranty.\r\n"
+msgid  "implied warranty.\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 35
 msgid  "This is a development and not at all a final or stable version of "
-       "Scilab 5.0\r\n"
+       "Scilab 5.0\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 36
 msgid  "that will be released in the future. A lot of features are missing "
-       "and buggy.\r\n"
+       "and buggy.\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 37
 msgid  "In no event will the authors be held liable for any damages arising "
-       "from,\r\n"
+       "from,\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 38
 msgid  "out of or in connection with the software or the use or other "
-       "dealings\r\n"
+       "dealings\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 39
-msgid  "in the software.\r\n"
+msgid  "in the software.\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 43
 # File: src/c/banier.c, line: 49
-msgid  "Warning: the operational team of the Scilab Consortium\r\n"
+msgid  "Warning: the operational team of the Scilab Consortium\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 44
 msgid  "   doesn't provide and doesn't support the port of Scilab to MacOS."
-       "\r\n"
-       "\r\n"
+       "\n"
+       "\n"
 msgstr ""
 #
 # File: src/c/banier.c, line: 50
 msgid  "   doesn't provide and doesn't support this version of Scilab built "
-       "with\r\n"
+       "with\n"
 msgstr ""
 #
 # File: src/c/InitializeCore.c, line: 29
@@ -2202,13 +2202,13 @@ msgid   "incompatible LHS."
 msgstr ""
 #
 # File: sci_gateway/c/sci_libraryinfo.c, line: 80
-msgid  "Invalid library.\r\n"
+msgid  "Invalid library.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_libraryinfo.c, line: 85
 # File: sci_gateway/c/sci_getvariablesonstack.c, line: 45
 # File: sci_gateway/c/sci_getvariablesonstack.c, line: 51
-msgid  "Invalid parameter(s).\r\n"
+msgid  "Invalid parameter(s).\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_with_module.c, line: 39
@@ -2296,7 +2296,7 @@ msgid     "Invalid type parameter. parameters must be strings."
 msgstr ""
 #
 # File: sci_gateway/c/sci_chdir.c, line: 55
-msgid  "Invalid parameter.\r\n"
+msgid  "Invalid parameter.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_clearfun.c, line: 57
index 21870b0..9f01b49 100644 (file)
@@ -52,7 +52,7 @@ int C2F(sci_chdir) _PARAMS((char *fname,unsigned long fname_len))
        }
        else
        {
-               Scierror(999,"Invalid parameter.\r\n");
+               Scierror(999,"Invalid parameter.\n");
        }
        return 0;
 }
index ab1790a..0a04b56 100644 (file)
@@ -42,13 +42,13 @@ int C2F(sci_getvariablesonstack) _PARAMS((char *fname,unsigned long fname_len))
                        }
                        else
                        {
-                               Scierror(999,"Invalid parameter(s).\r\n");
+                               Scierror(999,"Invalid parameter(s).\n");
                                return 0;
                        }
                }
                else
                {
-                       Scierror(999,"Invalid parameter(s).\r\n");
+                       Scierror(999,"Invalid parameter(s).\n");
                        return 0;
                }
        }
index 12de5e8..8c74981 100644 (file)
@@ -77,12 +77,12 @@ int C2F(sci_libraryinfo) _PARAMS((char *fname,unsigned long fname_len))
                }
                else
                {
-                       Scierror(999,"Invalid library.\r\n");
+                       Scierror(999,"Invalid library.\n");
                }
        }
        else
        {
-               Scierror(999,"Invalid parameter(s).\r\n");
+               Scierror(999,"Invalid parameter(s).\n");
        }
        return 0;
 }
index 9a2fcfe..ed1b34c 100644 (file)
@@ -15,7 +15,7 @@ void banner(void)
        char *line = "        ___________________________________________        ";
        int startVersion = (int)(floor((double)(strlen(line)/2)) - floor((double)(strlen(SCI_VERSION_STRING)/2)));
        
-       sciprint("%s\r\n",line);
+       sciprint("%s\n",line);
        
        /* To center the version name */
        for( i=0 ; i<startVersion ; i++ )
@@ -23,31 +23,31 @@ void banner(void)
                sciprint(" ");
        }
        
-       sciprint("%s\r\n\n",SCI_VERSION_STRING);
+       sciprint("%s\n\n",SCI_VERSION_STRING);
        message_scilab("                 Copyright (c) 1989-2007                   ");
        message_scilab("              Consortium Scilab (INRIA, ENPC)              ");
-       sciprint("%s\r\n",line);
+       sciprint("%s\n",line);
 
-       sciprint("\r\n\r\n");
-       sciprint("!!! WARNING !!!\r\n");
-       sciprint("This software is being provided \"as is\", without any express or \r\n");
-       sciprint("implied warranty.\r\n");
-       sciprint("This is a development and not at all a final or stable version of Scilab 5.0\r\n");
-       sciprint("that will be released in the future. A lot of features are missing and buggy.\r\n");
-       sciprint("In no event will the authors be held liable for any damages arising from,\r\n");
-       sciprint("out of or in connection with the software or the use or other dealings\r\n");
-       sciprint("in the software.\r\n");
+       sciprint("\n\n");
+       sciprint("!!! WARNING !!!\n");
+       sciprint("This software is being provided \"as is\", without any express or \n");
+       sciprint("implied warranty.\n");
+       sciprint("This is a development and not at all a final or stable version of Scilab 5.0\n");
+       sciprint("that will be released in the future. A lot of features are missing and buggy.\n");
+       sciprint("In no event will the authors be held liable for any damages arising from,\n");
+       sciprint("out of or in connection with the software or the use or other dealings\n");
+       sciprint("in the software.\n");
 
        #if defined(__APPLE__)
-               sciprint("\r\n\r\n");
-               sciprint("Warning: the operational team of the Scilab Consortium\r\n");
-               sciprint("   doesn't provide and doesn't support the port of Scilab to MacOS.\r\n\r\n");
+               sciprint("\n\n");
+               sciprint("Warning: the operational team of the Scilab Consortium\n");
+               sciprint("   doesn't provide and doesn't support the port of Scilab to MacOS.\n\n");
        #endif /* __APPLE__ */
 
        #if ( defined(_MSC_VER) && ( (_MSC_VER >= 1200) && (_MSC_VER < 1300) ) )
-               sciprint("\r\n\r\n");
-               sciprint("Warning: the operational team of the Scilab Consortium\r\n");
-               sciprint("   doesn't provide and doesn't support this version of Scilab built with\r\n");
+               sciprint("\n\n");
+               sciprint("Warning: the operational team of the Scilab Consortium\n");
+               sciprint("   doesn't provide and doesn't support this version of Scilab built with\n");
                sciprint("   ");
   #endif
 }
index 327ee04..af37873 100644 (file)
@@ -63,7 +63,7 @@ int C2F(basout)(integer *io, integer *lunit, char *string,long int nbcharacters)
                {
                        if (nbcharacters > 0)
                        {
-                               #define bufferformat "%s\r\n"
+                               #define bufferformat "%s\n"
                                char *buffer = NULL;
                                buffer = (char *)MALLOC(sizeof(char)*(nbcharacters+strlen(bufferformat)+1));
                                if (buffer)
index b10f9f7..dff7ab3 100644 (file)
@@ -168,8 +168,8 @@ int GetCommand ( char *str)
       FREE (p->command);
       FREE (p);
       if (C2F(iop).ddt==-1) {
-        if (flag==0) { sciprint_full("   Unqueuing %s - No option\r\n",str); }
-        else         { sciprint_full("   Unqueuing %s - seq\r\n",str); }
+        if (flag==0) { sciprint_full("   Unqueuing %s - No option\n",str); }
+        else         { sciprint_full("   Unqueuing %s - seq\n",str); }
       }
     }
   return flag;
index 2fa78ef..55a4173 100644 (file)
@@ -122,7 +122,7 @@ void SciLink(int iflag, int *rhs, int *ilib, char **files, char **en_names, char
        *ilib  = Sci_dlopen(files,0);
     }
   if ( *ilib  == -1 ) return;
-  if ( iflag == 0) if (getWarningMode()) sciprint("shared archive loaded\r\n");
+  if ( iflag == 0) if (getWarningMode()) sciprint("shared archive loaded\n");
   if ( *rhs >= 2) 
     {
       i=0 ;
@@ -178,7 +178,7 @@ void call_ctor_dtor(handle,loading)
       if (shl_findsym(&handle,"_GLOBAL__DI",TYPE_PROCEDURE,
                      (void *) &call_sym))
        {
-         if (getWarningMode()) sciprint("No global constructor(s) call\r\n");
+         if (getWarningMode()) sciprint("No global constructor(s) call\n");
          return;
        }
     }
@@ -237,7 +237,7 @@ static int Sci_dlopen(char **loaded_files,int global)
           && strstr(loaded_files[0],SHARED_SUF)!= NULL)
        {
          strcpy(tmp_file,loaded_files[0]);
-         if (debug) sciprint_nd("Loading shared executable %s\r\n",loaded_files[0]);
+         if (debug) sciprint_nd("Loading shared executable %s\n",loaded_files[0]);
        }
       else 
        {
@@ -254,7 +254,7 @@ static int Sci_dlopen(char **loaded_files,int global)
       Call_shl_load = 0;
       if ( global == 1) 
        {
-         /* sciprint("Using global\r\n"); */ 
+         /* sciprint("Using global\n"); */ 
          hd1 = dlopen(tmp_file, RTLD_NOW | RTLD_GLOBAL );
        }
       else 
@@ -274,7 +274,7 @@ static int Sci_dlopen(char **loaded_files,int global)
 #ifdef hppa
       hd1 = PROG_HANDLE;
 #else
-      if (getWarningMode()) sciprint("Link : scilab is not a valid first argument on your machine\r\n");
+      if (getWarningMode()) sciprint("Link : scilab is not a valid first argument on your machine\n");
       return(-1);
 #endif
 #endif
@@ -282,10 +282,10 @@ static int Sci_dlopen(char **loaded_files,int global)
   /* this will load the shared library */
 #ifndef hppa
   if ( hd1 == (void *) NULL || hd1 < (void *) 0 ) {
-    if (getWarningMode()) sciprint("%s\r\n",dlerror());
+    if (getWarningMode()) sciprint("%s\n",dlerror());
 #else
   if (  hd1 == NULL) {
-    if (getWarningMode()) sciprint("link error\r\n");
+    if (getWarningMode()) sciprint("link error\n");
 #endif
     return(-1);
   }
@@ -302,7 +302,7 @@ static int Sci_dlopen(char **loaded_files,int global)
   
   if ( Nshared == ENTRYMAX ) 
     {
-      if (getWarningMode()) sciprint("You can't open shared files maxentry %d reached\r\n",ENTRYMAX);
+      if (getWarningMode()) sciprint("You can't open shared files maxentry %d reached\n",ENTRYMAX);
       return(FAIL);
     }
 
@@ -330,7 +330,7 @@ static int CreateShared(char **loaded_files, char *tmp_file)
       i++;
     }
 
-  if (debug) sciprint_nd(" to create a shared executable\r\n");
+  if (debug) sciprint_nd(" to create a shared executable\n");
   count++;
   /* be sure that tmpdir exists */
   tmpdir = get_sci_tmp_dir();
@@ -378,7 +378,7 @@ static int CreateShared(char **loaded_files, char *tmp_file)
 
 #ifdef DEBUG
      for ( i=0 ; i < argc ; i++) 
-       if (getWarningMode()) sciprint("arg[%d]=%s\r\n",i,argv[i]);
+       if (getWarningMode()) sciprint("arg[%d]=%s\n",i,argv[i]);
 #endif 
      
      if ((pid = vfork()) == 0) {
@@ -386,16 +386,16 @@ static int CreateShared(char **loaded_files, char *tmp_file)
        _exit(1);
      }
      if (pid < 0) {
-       if (getWarningMode()) sciprint("can't create new process: \r\n");
+       if (getWarningMode()) sciprint("can't create new process: \n");
        return(-1);
      }
      while ((wpid = wait(&status)) != pid)
        if (wpid < 0) {
-        if (getWarningMode()) sciprint("no child !\r\n");
+        if (getWarningMode()) sciprint("no child !\n");
         return(-1);
        }
      if (status != 0) {
-       if (getWarningMode()) sciprint("ld returned bad status: %x\r\n", status);
+       if (getWarningMode()) sciprint("ld returned bad status: %x\n", status);
        return(-1);
      }
    }
@@ -420,7 +420,7 @@ static int CreateCppShared(char **loaded_files, char *tmp_file)
       i++;
     }
 
-  if (debug) sciprint_nd(" to create a shared executable\r\n");
+  if (debug) sciprint_nd(" to create a shared executable\n");
   count++;
   tmpdir = get_sci_tmp_dir();
   sprintf(tmp_file, "%s/SL_%d_XXXXXX",tmpdir,(int) getpid()); /*,count);*/
@@ -445,7 +445,7 @@ static int CreateCppShared(char **loaded_files, char *tmp_file)
     
 #ifdef DEBUG
      for ( i=0 ; i < argc ; i++) 
-       sciprint("arg[%d]=%s\r\n",i,argv[i]);
+       sciprint("arg[%d]=%s\n",i,argv[i]);
 #endif 
      exec_cpp = (char *) malloc((strlen((char *)getSCIpath()) + 16) * 
                             sizeof(char));
@@ -457,16 +457,16 @@ static int CreateCppShared(char **loaded_files, char *tmp_file)
        _exit(1);
      }
      if (pid < 0) {
-       if (getWarningMode()) sciprint("can't create new process: \r\n");
+       if (getWarningMode()) sciprint("can't create new process: \n");
        return(-1);
      }
      while ((wpid = wait(&status)) != pid)
        if (wpid < 0) {
-        if (getWarningMode()) sciprint("no child !\r\n");
+        if (getWarningMode()) sciprint("no child !\n");
         return(-1);
        }
      if (status != 0) {
-       sciprint("collect2 returned bad status: %x\r\n", status);
+       sciprint("collect2 returned bad status: %x\n", status);
        return(-1);
      }
   }
@@ -497,18 +497,18 @@ static int Sci_dlsym(char *ename, int ishared, char *strf)
   /* lookup the address of the function to be called */
   if ( NEpoints == ENTRYMAX ) 
     {
-      if (getWarningMode()) sciprint("You can't link more functions maxentry %d reached\r\n",ENTRYMAX);
+      if (getWarningMode()) sciprint("You can't link more functions maxentry %d reached\n",ENTRYMAX);
       return(FAIL);
     }
   if ( hd[ish].ok == FAIL ) 
     {
-      if (getWarningMode()) sciprint("Shared lib %d does not exists\r\n",ish);
+      if (getWarningMode()) sciprint("Shared lib %d does not exists\n",ish);
       return(FAIL);
     }
   /** entry was previously loaded **/
   if ( SearchFandS(ename,ish) >= 0 ) 
     {
-      if (getWarningMode()) sciprint("Entry name %s is already loaded from lib %d\r\n",ename,ish);
+      if (getWarningMode()) sciprint("Entry name %s is already loaded from lib %d\n",ename,ish);
       return(OK);
     }
 #ifndef hppa
@@ -526,19 +526,19 @@ static int Sci_dlsym(char *ename, int ishared, char *strf)
 #else
       char *loc;
 #endif
-      if (getWarningMode()) sciprint("%s is not an entry point \r\n",enamebuf);
+      if (getWarningMode()) sciprint("%s is not an entry point \n",enamebuf);
 #ifndef hppa
       loc = dlerror();
-      if ( loc != NULL) sciprint("%s \r\n",loc);
+      if ( loc != NULL) sciprint("%s \n",loc);
 #else
-      if (getWarningMode()) sciprint("link error\r\n");
+      if (getWarningMode()) sciprint("link error\n");
 #endif
       return(FAIL);
     }
   else 
     {
       /* we don't add the _ in the table */
-      if (debug) sciprint("Linking %s \r\n",ename);
+      if (debug) sciprint("Linking %s \n",ename);
       strncpy(EP[NEpoints].name,ename,MAXNAME);
       EP[NEpoints].Nshared = ish;
       NEpoints++;
@@ -624,7 +624,7 @@ static int SetArgv1(char **argv, char *files, int first, int max, int *err)
       argv[j] = loc; j++;
       if ( j == max ) 
        {
-         if (getWarningMode()) sciprint("Link too many files \r\n");
+         if (getWarningMode()) sciprint("Link too many files \n");
          *err=1;
          break;
        }
index 4d1fd41..06ced97 100644 (file)
@@ -41,7 +41,7 @@ void SciLink(int iflag,int *rhs,int *ilib,char *files[],char *en_names[],char *s
        if (*ilib  == -1 ) return;
        if ( iflag == 0) 
        {
-               if (getWarningMode()) sciprint("shared archive loaded\r\n");
+               if (getWarningMode()) sciprint("shared archive loaded\n");
        }
        if ( *rhs >= 2) 
        {
@@ -93,12 +93,12 @@ int Sci_dlopen( char *loaded_files[], int global)
        while ( loaded_files[count] != NULL) count++;
        if ( count != 1 ) 
        {
-               if (getWarningMode()) sciprint("link: first argument must be a unique dll name\r\n");
+               if (getWarningMode()) sciprint("link: first argument must be a unique dll name\n");
        }
        hd1 =   LoadDynLibrary (loaded_files[0]);
        if ( hd1 == NULL ) 
        {
-               if (getWarningMode()) sciprint("link failed for dll %s\r\n",loaded_files[0]);
+               if (getWarningMode()) sciprint("link failed for dll %s\n",loaded_files[0]);
                return(-1);
        }
        for ( i = 0 ; i < Nshared ; i++ ) 
@@ -114,7 +114,7 @@ int Sci_dlopen( char *loaded_files[], int global)
 
        if ( Nshared == ENTRYMAX ) 
        {
-               if (getWarningMode()) sciprint("You can't open shared files maxentry %d reached\r\n",ENTRYMAX);
+               if (getWarningMode()) sciprint("You can't open shared files maxentry %d reached\n",ENTRYMAX);
                return(FAIL);
        }
 
@@ -145,31 +145,31 @@ int Sci_dlsym(char *ename,int ishared,char *strf)
        /* lookup the address of the function to be called */
        if ( NEpoints == ENTRYMAX ) 
        {
-               if (getWarningMode()) sciprint("You can't link more functions maxentry %d reached\r\n",ENTRYMAX);
+               if (getWarningMode()) sciprint("You can't link more functions maxentry %d reached\n",ENTRYMAX);
                return(FAIL);
        }
        if ( hd[ish].ok == FAIL ) 
        {
-               if (getWarningMode()) sciprint("Shared lib %d does not exists\r\n",ish);
+               if (getWarningMode()) sciprint("Shared lib %d does not exists\n",ish);
                return(FAIL);
        }
        /** entry was previously loaded **/
        if ( SearchFandS(ename,ish) >= 0 ) 
        {
-               if (getWarningMode()) sciprint("Entry name %s is already loaded from lib %d\r\n",ename,ish);
+               if (getWarningMode()) sciprint("Entry name %s is already loaded from lib %d\n",ename,ish);
                return(OK);
        }
        hd1 = (DynLibHandle)  hd[ish].shl;
        EP[NEpoints].epoint = (function) GetDynLibFuncPtr (hd1,enamebuf);
        if ( EP[NEpoints].epoint == NULL )
        {
-               if (getWarningMode()) sciprint("%s is not an entry point \r\n",enamebuf);
+               if (getWarningMode()) sciprint("%s is not an entry point \n",enamebuf);
                return(FAIL);
        }
        else 
        {
                /* we don't add the _ in the table */
-               if (debug) sciprint("Linking %s \r\n",ename);
+               if (debug) sciprint("Linking %s \n",ename);
                strncpy(EP[NEpoints].name,ename,MAXNAME);
                EP[NEpoints].Nshared = ish;
                NEpoints++;
index bf1676d..1b208bd 100644 (file)
@@ -101,7 +101,7 @@ int LinkStatus()
 void C2F(isciulink)(i) 
      integer *i;
 {
-  sciprint("aout link : No unlink up to now \r\n");
+  sciprint("aout link : No unlink up to now \n");
 }
 
 
@@ -163,7 +163,7 @@ int C2F(dynload)(int *ii,char ename1[],char loaded_files[],int *err)
   char current_char;
 
 #ifdef DEBUG
-  sciprint("ename1 [%s]\r\n",ename1);
+  sciprint("ename1 [%s]\n",ename1);
   sciprint("lastlink %d, entry=%d\n",lastlink,*ii);
 #endif
 
@@ -185,7 +185,7 @@ int C2F(dynload)(int *ii,char ename1[],char loaded_files[],int *err)
            {
              dld_unlink_by_file (current_object_file,1);
 #ifdef DEBUG
-             sciprint("unloading : \"%s\"\r\n",current_object_file);
+             sciprint("unloading : \"%s\"\n",current_object_file);
 #endif
            };
        };
@@ -213,7 +213,7 @@ int C2F(dynload)(int *ii,char ename1[],char loaded_files[],int *err)
        current_object_file[j] = '\0';
        if(strlen(current_object_file)>0){
 #ifdef DEBUG
-         sciprint("loading : \"%s\"\r\n",current_object_file);
+         sciprint("loading : \"%s\"\n",current_object_file);
 #endif
          *err = dld_link (current_object_file);
          if(*err){
@@ -253,7 +253,7 @@ int C2F(dynload)(int *ii,char ename1[],char loaded_files[],int *err)
          return;
        };
 #ifdef DEBUG
-      sciprint("procedure numero %d \"%s\" located in \"%s\"\r\n",*ii,ename1,loaded_files);
+      sciprint("procedure numero %d \"%s\" located in \"%s\"\n",*ii,ename1,loaded_files);
 #endif
       EP[*ii].epoint = func;
       lastlink=lastlink+1;
@@ -278,7 +278,7 @@ int C2F(dynload1)(int *ii,char ename1[],char *loaded_files[],int *err)
   int i,j;
 
 #ifdef DEBUG
-  sciprint("ename1 [%s]\r\n",ename1);
+  sciprint("ename1 [%s]\n",ename1);
   sciprint("lastlink %d, entry=%d\n",lastlink,*ii);
 #endif
   sciprint("linking  \"%s\" defined in ",ename1);
@@ -287,7 +287,7 @@ int C2F(dynload1)(int *ii,char ename1[],char *loaded_files[],int *err)
     {
       sciprint("\"%s\" ", loaded_files[i]); i++;
     }
-  sciprint("\r\n");
+  sciprint("\n");
   *err = 0;
   if ( (*err = dyninit_())) return; /* Error on init */
   /* scaning and loading  objects files */
@@ -302,7 +302,7 @@ int C2F(dynload1)(int *ii,char ename1[],char *loaded_files[],int *err)
            {
              dld_unlink_by_file (loaded_files[i],1);
 #ifdef DEBUG
-             sciprint("unloading : \"%s\"\r\n",loaded_files[i]);
+             sciprint("unloading : \"%s\"\n",loaded_files[i]);
 #endif
            }
        }
@@ -314,7 +314,7 @@ int C2F(dynload1)(int *ii,char ename1[],char *loaded_files[],int *err)
     {
       if(strlen(loaded_files[i])>0){
 #ifdef DEBUG
-         sciprint("loading : \"%s\"\r\n",loaded_files[i]);
+         sciprint("loading : \"%s\"\n",loaded_files[i]);
 #endif
          *err = dld_link (loaded_files[i]);
          if(*err){
@@ -339,7 +339,7 @@ int C2F(dynload1)(int *ii,char ename1[],char *loaded_files[],int *err)
          return;
        };
 #ifdef DEBUG
-      sciprint("procedure numero %d \"%s\" located in \"%s\" .... \r\n",*ii,ename1,loaded_files[0]);
+      sciprint("procedure numero %d \"%s\" located in \"%s\" .... \n",*ii,ename1,loaded_files[0]);
 #endif
       EP[*ii].epoint = func;
       lastlink=lastlink+1;
index ff24575..b63ced8 100644 (file)
@@ -116,7 +116,7 @@ int LinkStatus()
 void C2F(isciulink)(i) 
      integer *i;
 {
-  sciprint("Std link : No unlink up to now \r\n");
+  sciprint("Std link : No unlink up to now \n");
 }
 
 
@@ -150,7 +150,7 @@ int C2F(dynload)(ii,ename1,loaded_files,err)
    extern errno;
 
 #ifdef DEBUG
-  sciprint("ename1 [%s]\r\n",ename1);
+  sciprint("ename1 [%s]\n",ename1);
   sciprint("lastlink %d, entry=%d\n",lastlink,*ii);
 #endif
 
@@ -562,7 +562,7 @@ int SetArgv1(argv,files,first,max,err)
       argv[j] = loc; j++;
       if ( j == max ) 
        {
-         sciprint("Link too many files \r\n");
+         sciprint("Link too many files \n");
          *err=1;
          break;
        }
index 1134690..e754058 100644 (file)
@@ -41,7 +41,7 @@ int C2F(msgstore)(char *str,int *n)
     return(MAX_LINES);
   if ( (line = (char *) MALLOC((*n + 1)*sizeof(char))) == (char *)0) 
     return(MEM_LACK);
-  /* do not store \r\n" */ 
+  /* do not store \n" */ 
   for ( i= 0 ; i < *n ; i++ ) 
     if ( (c=str[i]) != '\n' && c != '\r') line[count++]=c;
   line[count]='\0';
index 94dd25b..ab0941f 100644 (file)
@@ -25,7 +25,7 @@ int C2F(stcreate)(integer *lw, integer *nz, integer *sz, integer *nf, char *fnam
     C2F(intersci).iwhere[*lw -Top + Rhs - 1] = *Lstk(*lw);
 
     if (*lw > intersiz) {
-      Scierror(998,"Too many arguments in the stack edit stack.h and enlarge intersiz\r\n");
+      Scierror(998,"Too many arguments in the stack edit stack.h and enlarge intersiz\n");
        return 1;
     }
     sttyp(&n1, "size", nf, fnames);
index 0a832e0..44df5a2 100644 (file)
@@ -301,25 +301,25 @@ msgstr    ""
 # File: sci_gateway/c/sci_gsort.c, line: 51
 #, possible-c-format
 msgid  "%s: first argument has a wrong type, expecting scalar or string "
-       "matrix\r\n"
+       "matrix\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_gsort.c, line: 62
 #, possible-c-format
-msgid  "%s: second argument is an empty string\r\n"
+msgid  "%s: second argument is an empty string\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_gsort.c, line: 68
 #, possible-c-format
-msgid  "%s: second argument has a wrong value %s should be in r,c,g,lr,lc\r\n"
+msgid  "%s: second argument has a wrong value %s should be in r,c,g,lr,lc\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_gsort.c, line: 80
 #, possible-c-format
-msgid  "%s: third argument must be \"i\" or \"d\"\r\n"
+msgid  "%s: third argument must be \"i\" or \"d\"\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_gsort.c, line: 188
 # File: sci_gateway/c/sci_gsort.c, line: 204
-msgid  "invalid type.\r\n"
+msgid  "invalid type.\n"
 msgstr ""
index ea02fe8..3b0f2e1 100644 (file)
@@ -48,7 +48,7 @@ int C2F(sci_gsort) _PARAMS((char *fname, unsigned long fname_len))
                        GetRhsVar(1,MATRIX_OF_INTEGER_DATATYPE,&m1,&n1,&Im);
                        break;
                default :
-                       Scierror(999,"%s: first argument has a wrong type, expecting scalar or string matrix\r\n",fname);
+                       Scierror(999,"%s: first argument has a wrong type, expecting scalar or string matrix\n",fname);
                        return 0;
                }
        }
@@ -59,13 +59,13 @@ int C2F(sci_gsort) _PARAMS((char *fname, unsigned long fname_len))
                GetRhsVar(2,STRING_DATATYPE,&m2,&n2,&l2);
                if ( m2 == 0 ) 
                {
-                       Scierror(999,"%s: second argument is an empty string\r\n",fname);
+                       Scierror(999,"%s: second argument is an empty string\n",fname);
                        return 0;
                }
                c = *cstk(l2);
                if (c != ROW_SORT && c != COLUMN_SORT && c != GLOBAL_SORT && c != LIST_SORT) 
                {
-                       Scierror(999,"%s: second argument has a wrong value %s should be in r,c,g,lr,lc\r\n",fname,cstk(l2));
+                       Scierror(999,"%s: second argument has a wrong value %s should be in r,c,g,lr,lc\n",fname,cstk(l2));
                        return 0;
                }
                strcpy(typex,cstk(l2));
@@ -77,7 +77,7 @@ int C2F(sci_gsort) _PARAMS((char *fname, unsigned long fname_len))
                CheckLength(3,m3,1);
                if ( *cstk(l3) != INCREASE_COMMAND && *cstk(l3) != DECREASE_COMMAND)
                {
-                       Scierror(999,"%s: third argument must be \"i\" or \"d\"\r\n",fname);
+                       Scierror(999,"%s: third argument must be \"i\" or \"d\"\n",fname);
                        return 0;
                }
                iord[0] = *cstk(l3);
@@ -185,7 +185,7 @@ int C2F(sci_gsort) _PARAMS((char *fname, unsigned long fname_len))
                                C2F(gsortuint)(Im.D,indices,&iflag,&m1,&n1,typex,iord);
                                break;
                        default:
-                               Scierror(999,"invalid type.\r\n");
+                               Scierror(999,"invalid type.\n");
                                return 0;
                        }
 
@@ -201,7 +201,7 @@ int C2F(sci_gsort) _PARAMS((char *fname, unsigned long fname_len))
                }
                break;
        default:
-               Scierror(999,"invalid type.\r\n");
+               Scierror(999,"invalid type.\n");
                return 0;
                break;
        }
index 066ae67..4d182a9 100644 (file)
@@ -17,7 +17,7 @@ msgstr        "Project-Id-Version: Scilab - fftw\n"
        "Content-Transfer-Encoding: 8bit\n"
 #
 # File: src/nofftw/nofftw.c, line: 10
-msgid  "FFTW interface not installed.\r\n"
+msgid  "FFTW interface not installed.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_fftw_flags.c, line: 127
@@ -55,11 +55,11 @@ msgstr      ""
 #
 # File: sci_gateway/c/gw_fftw.c, line: 35
 #, possible-c-format
-msgid  "FFTW Library %s not found.\r\n"
+msgid  "FFTW Library %s not found.\n"
 msgstr ""
 #
 # File: sci_gateway/c/gw_fftw.c, line: 39
-msgid  "FFTW Library not found.\r\n"
+msgid  "FFTW Library not found.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_fftw.c, line: 89
index fbc33c7..3baae8b 100644 (file)
@@ -32,11 +32,11 @@ int C2F(gw_fftw)()
 
                        if (fftwlibNAME)
                        {
-                               Scierror(999,"FFTW Library %s not found.\r\n",fftwlibNAME);
+                               Scierror(999,"FFTW Library %s not found.\n",fftwlibNAME);
                        }
                        else
                        {
-                               Scierror(999,"FFTW Library not found.\r\n");
+                               Scierror(999,"FFTW Library not found.\n");
                        }
                        
                        if (fftwlibNAME) {FREE(fftwlibNAME); fftwlibNAME=NULL;}
index a717862..84d76d2 100644 (file)
@@ -7,7 +7,7 @@
 /*-----------------------------------------------------------------------------------*/ 
 int C2F(gw_fftw)()
 {
-       Scierror(999,"FFTW interface not installed.\r\n");
+       Scierror(999,"FFTW interface not installed.\n");
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/ 
index a3e16b8..44c0fb3 100644 (file)
@@ -214,30 +214,30 @@ msgid     "\");"
 msgstr ""
 #
 # File: src/c/do_xxprintf.c, line: 40
-msgid  "Error:\tprintf: not enough arguments\r\n"
+msgid  "Error:\tprintf: not enough arguments\n"
 msgstr ""
 #
 # File: src/c/do_xxprintf.c, line: 249
-msgid  "Error:\tsprintf problem, buffer too small\r\n"
+msgid  "Error:\tsprintf problem, buffer too small\n"
 msgstr ""
 #
 # File: src/c/do_xxprintf.c, line: 353
 msgid  "Warning:\tprintf: bad conversion l or h flag mixed with s directive"
-       "\r\n"
+       "\n"
 msgstr ""
 #
 # File: src/c/do_xxprintf.c, line: 357
 msgid  "Warning:\tprintf: bad conversion l or h flag mixed with c directive"
-       "\r\n"
+       "\n"
 msgstr ""
 #
 # File: src/c/do_xxprintf.c, line: 415
 # File: src/c/do_xxprintf.c, line: 437
-msgid  "Error:\tprintf: bad conversion\r\n"
+msgid  "Error:\tprintf: bad conversion\n"
 msgstr ""
 #
 # File: src/c/do_xxprintf.c, line: 432
-msgid  "Error:\tprintf: \"o\" format not allowed\r\n"
+msgid  "Error:\tprintf: \"o\" format not allowed\n"
 msgstr ""
 #
 
@@ -245,7 +245,7 @@ msgstr      ""
 # File: src/c/mput.c, line: 125
 # File: src/c/mput.c, line: 176
 #, possible-c-format
-msgid  "mput : %s format not recognized \r\n"
+msgid  "mput : %s format not recognized \n"
 msgstr ""
 #
 # File: src/c/mput.c, line: 59
@@ -253,11 +253,11 @@ msgstr    ""
 # File: src/c/mget.c, line: 55
 # File: src/c/mget.c, line: 170
 #, possible-c-format
-msgid  "No input file associated to logical unit %d\r\n"
+msgid  "No input file associated to logical unit %d\n"
 msgstr ""
 #
 # File: src/c/mput.c, line: 168
-msgid  "mput : format is of length 0\r\n"
+msgid  "mput : format is of length 0\n"
 msgstr ""
 #
 # File: src/c/ripole.c, line: 25
@@ -334,7 +334,7 @@ msgid       "ripOLE: decoding of %s resulted in error %d\n"
 msgstr ""
 #
 # File: src/c/mseek.c, line: 31
-msgid  "mseek: wrong file logical unit \r\n"
+msgid  "mseek: wrong file logical unit \n"
 msgstr ""
 #
 # File: src/c/mseek.c, line: 35
@@ -353,11 +353,11 @@ msgstr    ""
 #
 # File: src/c/mseek.c, line: 43
 #, possible-c-format
-msgid  "mseek : flag = %s not recognized \r\n"
+msgid  "mseek : flag = %s not recognized \n"
 msgstr ""
 #
 # File: src/c/mseek.c, line: 59
-msgid  "mseek: error\r\n"
+msgid  "mseek: error\n"
 msgstr ""
 #
 # File: src/c/mtell.c, line: 15
@@ -367,11 +367,11 @@ msgstr    ""
 # File: src/c/mputstr.c, line: 16
 # File: src/c/mgetstr.c, line: 34
 # File: src/c/mgetstr.c, line: 54
-msgid  "No input file \r\n"
+msgid  "No input file \n"
 msgstr ""
 #
 # File: src/c/mgetstr.c, line: 22
-msgid  "No more memory \r\n"
+msgid  "No more memory \n"
 msgstr ""
 #
 # File: src/c/olestream-unwrap.c, line: 156
@@ -598,15 +598,15 @@ msgstr    ""
 #
 # File: src/c/mclose.c, line: 45
 #, possible-c-format
-msgid  "File %d not active \r\n"
+msgid  "File %d not active \n"
 msgstr ""
 #
 # File: src/c/mclose.c, line: 51
-msgid  "No file to close \r\n"
+msgid  "No file to close \n"
 msgstr ""
 #
 # File: src/c/fileio.c, line: 75
-msgid  "Error:\ttoo many directive in scanf\r\n"
+msgid  "Error:\ttoo many directive in scanf\n"
 msgstr ""
 #
 # File: src/c/pldstr.c, line: 499
@@ -623,60 +623,60 @@ msgstr    ""
 #
 # File: src/c/mopen.c, line: 25
 #, possible-c-format
-msgid  "Warning : file '%s' already opened in scilab.\r\n"
+msgid  "Warning : file '%s' already opened in scilab.\n"
 msgstr ""
 #
 # File: src/c/mget.c, line: 41
 # File: src/c/mget.c, line: 166
 #, possible-c-format
-msgid  "mget : %s format not recognized \r\n"
+msgid  "mget : %s format not recognized \n"
 msgstr ""
 #
 # File: src/c/mget.c, line: 157
-msgid  "mget : format is of length 0\r\n"
+msgid  "mget : format is of length 0\n"
 msgstr ""
 #
 #
 # File: src/c/do_xxscanf.c, line: 123
-msgid  "Error:\tscanf, unclosed [ directive\r\n"
+msgid  "Error:\tscanf, unclosed [ directive\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 134
-msgid  "Error:\tscanf unclosed [ directive\r\n"
+msgid  "Error:\tscanf unclosed [ directive\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 151
 #, possible-c-format
-msgid  "Error:\tscanf too many (> %d) conversion required\r\n"
+msgid  "Error:\tscanf too many (> %d) conversion required\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 162
 #, possible-c-format
 msgid  "Error:\tscanf, width field %d is too long (> %d) for %%[ directive"
-       "\r\n"
+       "\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 174
 # File: src/c/do_xxscanf.c, line: 194
 # File: src/c/do_xxscanf.c, line: 260
 # File: src/c/do_xxscanf.c, line: 276
-msgid  "Error:\tscanf: bad conversion\r\n"
+msgid  "Error:\tscanf: bad conversion\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 181
 #, possible-c-format
 msgid  "Error:\tscanf, width field %d is too long (< %d) for %%s directive"
-       "\r\n"
+       "\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 203
 #, possible-c-format
-msgid  "Error:\tscanf width field %d is too long (< %d) for %%c directive\r\n"
+msgid  "Error:\tscanf width field %d is too long (< %d) for %%c directive\n"
 msgstr ""
 #
 # File: src/c/do_xxscanf.c, line: 304
 #, possible-c-format
-msgid  "Error:\tscanf, format is too long (> %d) \r\n"
+msgid  "Error:\tscanf, format is too long (> %d) \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_fileext.c, line: 45
@@ -691,18 +691,18 @@ msgstr    ""
 # File: sci_gateway/c/sci_fscanfMat.c, line: 128
 # File: sci_gateway/c/sci_fscanfMat.c, line: 140
 #, possible-c-format
-msgid  "Error: in function %s, cannot allocate enough memory\r\n"
+msgid  "Error: in function %s, cannot allocate enough memory\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_fscanfMat.c, line: 53
 # File: sci_gateway/c/sci_fprintfMat.c, line: 74
 #, possible-c-format
-msgid  "Error: in function %s, cannot open file %s\r\n"
+msgid  "Error: in function %s, cannot open file %s\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_fscanfMat.c, line: 76
 #, possible-c-format
-msgid  "Error: in function %s, cannot read data in file %s\r\n"
+msgid  "Error: in function %s, cannot read data in file %s\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_createdir.c, line: 39
@@ -717,15 +717,15 @@ msgstr    ""
 #
 # File: sci_gateway/c/sci_msprintf.c, line: 28
 # File: sci_gateway/c/sci_mprintf.c, line: 22
-msgid  "Error:\tRhs must be > 0\r\n"
+msgid  "Error:\tRhs must be > 0\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_msprintf.c, line: 47
-msgid  "sprintf: Invalid format.\r\n"
+msgid  "sprintf: Invalid format.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_msprintf.c, line: 138
-msgid  "sprintf: cannot allocate cannot allocate more memory \r\n"
+msgid  "sprintf: cannot allocate cannot allocate more memory \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_findfiles.c, line: 40
@@ -743,35 +743,35 @@ msgstr    ""
 #
 # File: sci_gateway/c/sci_fileio.c, line: 75
 #, possible-c-format
-msgid  "%s:  Could not open the file!\r\n"
+msgid  "%s:  Could not open the file!\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mscanf.c, line: 39
-msgid  "Error: in scanf: incorrect first argument\r\n"
+msgid  "Error: in scanf: incorrect first argument\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mscanf.c, line: 56
-msgid  "Error: in scanf: format cannot include \\n \r\n"
+msgid  "Error: in scanf: format cannot include \\n \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mscanf.c, line: 73
-msgid  "Error: in scanf\r\n"
+msgid  "Error: in scanf\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mscanf.c, line: 98
 # File: sci_gateway/c/sci_mfscanf.c, line: 82
-msgid  "Error: in fscanf: data mismatch\r\n"
+msgid  "Error: in fscanf: data mismatch\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mscanf.c, line: 105
-msgid  "Error: in scanf: cannot allocate more memory \r\n"
+msgid  "Error: in scanf: cannot allocate more memory \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mscanf.c, line: 117
 # File: sci_gateway/c/sci_mfscanf.c, line: 101
 # File: sci_gateway/c/sci_msscanf.c, line: 98
 # File: sci_gateway/c/sci_msscanf.c, line: 110
-msgid  "Error: in sscanf: cannot allocate more memory \r\n"
+msgid  "Error: in sscanf: cannot allocate more memory \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_maxfiles.c, line: 47
@@ -807,16 +807,16 @@ msgid     "%s works only with reals.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_isdir.c, line: 22
-msgid  "parameter incorrect must be a string (a file pathname).\r\n"
+msgid  "parameter incorrect must be a string (a file pathname).\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_isdir.c, line: 40
-msgid  "First parameter incorrect, must be a string (a file pathname).\r\n"
+msgid  "First parameter incorrect, must be a string (a file pathname).\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_isdir.c, line: 48
 #, possible-c-format
-msgid  "The parameter is too long : must be less than %d caracters.\r\n"
+msgid  "The parameter is too long : must be less than %d caracters.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_getshortpathname.c, line: 50
@@ -825,16 +825,16 @@ msgid     "Not a path string"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mfscanf.c, line: 34
-msgid  "Error: in fscanf: incorrect first argument\r\n"
+msgid  "Error: in fscanf: incorrect first argument\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mfscanf.c, line: 53
 #, possible-c-format
-msgid  "fprintf:\t wrong file descriptor %d\r\n"
+msgid  "fprintf:\t wrong file descriptor %d\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mfscanf.c, line: 90
-msgid  "Error: in fscanf: cannot allocate more memory \r\n"
+msgid  "Error: in fscanf: cannot allocate more memory \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_fullpath.c, line: 49
@@ -843,86 +843,86 @@ msgstr    ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 48
 #, possible-c-format
-msgid  "%s :Not enough memory to allocate results \r\n"
+msgid  "%s :Not enough memory to allocate results \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 53
 #, possible-c-format
-msgid  "%s :Failed to read expected data, may be invalid xls file \r\n"
+msgid  "%s :Failed to read expected data, may be invalid xls file \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 58
 #, possible-c-format
-msgid  "%s :End of File \r\n"
+msgid  "%s :End of File \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 137
 #, possible-c-format
-msgid  "%s :There is no  file %s \r\n"
+msgid  "%s :There is no  file %s \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 143
 #, possible-c-format
-msgid  "%s :file %s is not an ole2 file\r\n"
+msgid  "%s :file %s is not an ole2 file\n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 145
 #, possible-c-format
-msgid  "%s :file %s  cannot be opened\r\n"
+msgid  "%s :file %s  cannot be opened\n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 154
 #, possible-c-format
-msgid  "%s :There is no xls stream in the ole2 file %s \r\n"
+msgid  "%s :There is no xls stream in the ole2 file %s \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 171
 #, possible-c-format
-msgid  "%s :Not an ole2 file \r\n"
+msgid  "%s :Not an ole2 file \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 176
 #, possible-c-format
-msgid  "%s : the file has no Workbook directory \r\n"
+msgid  "%s : the file has no Workbook directory \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 181
 #, possible-c-format
-msgid  "%s : impossible to alloc enough memory \r\n"
+msgid  "%s : impossible to alloc enough memory \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 186
 #, possible-c-format
-msgid  "%s : incorrect or corrupted file \r\n"
+msgid  "%s : incorrect or corrupted file \n"
 msgstr ""
 #
 # File: sci_gateway/c/intreadxls.c, line: 191
 #, possible-c-format
-msgid  "%s : Only BIFF8 file format is handled \r\n"
+msgid  "%s : Only BIFF8 file format is handled \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mprintf.c, line: 44
 # File: sci_gateway/c/sci_mfprintf.c, line: 55
-msgid  "mfprintf: Invalid format.\r\n"
+msgid  "mfprintf: Invalid format.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mfprintf.c, line: 25
-msgid  "Error:\tRhs must be >= 2\r\n"
+msgid  "Error:\tRhs must be >= 2\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_mfprintf.c, line: 40
 #, possible-c-format
-msgid  "mfprintf:\t wrong file descriptor %d\r\n"
+msgid  "mfprintf:\t wrong file descriptor %d\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_msscanf.c, line: 33
-msgid  "Error: in sscanf: incorrect first argument\r\n"
+msgid  "Error: in sscanf: incorrect first argument\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_msscanf.c, line: 53
-msgid  "Error: in sscanf: not enough entries in str\r\n"
+msgid  "Error: in sscanf: not enough entries in str\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_msscanf.c, line: 91
-msgid  "Error: in sscanf: data mismatch\r\n"
+msgid  "Error: in sscanf: data mismatch\n"
 msgstr ""
index ce46440..c764d2f 100644 (file)
@@ -45,17 +45,17 @@ int C2F(intreadxls)(char *fname, long lfn)
   xls_read(&fd,&pos,&data, &ind, &N, &M,  &ierr);
   if (ierr == 1)
     {
-      Scierror(999,"%s :Not enough memory to allocate results \r\n",fname);
+      Scierror(999,"%s :Not enough memory to allocate results \n",fname);
       return 0;
     }
   else if(ierr == 2)
     {
-      Scierror(999,"%s :Failed to read expected data, may be invalid xls file \r\n",fname);
+      Scierror(999,"%s :Failed to read expected data, may be invalid xls file \n",fname);
       return 0;
     }
   else if(ierr == 3)
     {
-      Scierror(999,"%s :End of File \r\n",fname);
+      Scierror(999,"%s :End of File \n",fname);
       return 0;
     }
 
@@ -134,15 +134,15 @@ int C2F(intopenxls)(char *fname, long lfn)
   result=ripole(IN, TMP, 0, 0);
   if (result != OLE_OK) {
     if (result == OLEER_NO_INPUT_FILE)
-      Scierror(999,"%s :There is no  file %s \r\n",fname,IN);
+      Scierror(999,"%s :There is no  file %s \n",fname,IN);
     else if(result == OLEER_NOT_OLE_FILE || 
            result == OLEER_INSANE_OLE_FILE || 
            result == OLEER_LOADFAT_BAD_BOUNDARY || 
            result == OLEER_MINIFAT_READ_FAIL || 
            result == OLEER_PROPERTIES_READ_FAIL)
-      Scierror(999,"%s :file %s is not an ole2 file\r\n",fname,IN);
+      Scierror(999,"%s :file %s is not an ole2 file\n",fname,IN);
     else if(result == -1)
-      Scierror(999,"%s :file %s  cannot be opened\r\n",fname,IN);
+      Scierror(999,"%s :file %s  cannot be opened\n",fname,IN);
 
     return 0;
   }
@@ -151,7 +151,7 @@ int C2F(intopenxls)(char *fname, long lfn)
   C2F(mopen)(&fd, TMP,"rb", &f_swap, &res, &ierr);
   if (ierr != 0)
     {
-      Scierror(999,"%s :There is no xls stream in the ole2 file %s \r\n",fname,IN);
+      Scierror(999,"%s :There is no xls stream in the ole2 file %s \n",fname,IN);
       return 0;
     }
   CreateVar(Rhs+1,MATRIX_OF_INTEGER_DATATYPE,&one,&one,&l2);
@@ -168,27 +168,27 @@ int C2F(intopenxls)(char *fname, long lfn)
    */
   if (ierr == 1)
     {
-      Scierror(999,"%s :Not an ole2 file \r\n",fname);
+      Scierror(999,"%s :Not an ole2 file \n",fname);
       return 0;
     }
   else  if (ierr == 2)
     {
-      Scierror(999,"%s : the file has no Workbook directory \r\n",fname);
+      Scierror(999,"%s : the file has no Workbook directory \n",fname);
       return 0;
     }
  else  if (ierr == 3)
     {
-      Scierror(999,"%s : impossible to alloc enough memory \r\n",fname);
+      Scierror(999,"%s : impossible to alloc enough memory \n",fname);
       return 0;
     }
   else  if (ierr == 4)
     {
-      Scierror(990,"%s : incorrect or corrupted file \r\n",fname);
+      Scierror(990,"%s : incorrect or corrupted file \n",fname);
       return 0;
     }
   else  if (ierr == 3)
     {
-      Scierror(999,"%s : Only BIFF8 file format is handled \r\n",fname);
+      Scierror(999,"%s : Only BIFF8 file format is handled \n",fname);
       return 0;
     }
 
index 79e43d4..57c7a08 100644 (file)
@@ -72,7 +72,7 @@ int intsmopen(char *fname,unsigned long fname_len)
                        }
                        else if ( err == 2)
                        {
-                               Scierror(999,"%s:  Could not open the file!\r\n",fname);
+                               Scierror(999,"%s:  Could not open the file!\n",fname);
                                return 0;
                        }
                        else 
@@ -112,7 +112,7 @@ int intsmputstr(char *fname,unsigned long fname_len)
        C2F(mputstr)(&fd,cstk(l1),stk(l3),&err);
        if (err >  0)
        {
-               /*sciprint("%s: Internal Error \r\n",fname);*/
+               /*sciprint("%s: Internal Error \n",fname);*/
                Error(10000);
                return 0;
        };
@@ -173,7 +173,7 @@ int intsmput(char *fname,unsigned long fname_len)
        C2F(mput)(&fd,stk(l1),&n1,type,&err);
        if (err >  0)
        {
-               /* sciprint("%s: Internal Error \r\n",fname);*/
+               /* sciprint("%s: Internal Error \n",fname);*/
                Error(10000);
                return 0;
        };
@@ -217,7 +217,7 @@ int intsmget(char *fname,unsigned long fname_len)
        C2F(mget)(&fd,stk(l4),&n,type,&err);
        if (err >  0) 
        {
-               /*      sciprint("%s: Internal Error \r\n",fname);*/
+               /*      sciprint("%s: Internal Error \n",fname);*/
                Error(10000);
                return 0;
        }
@@ -262,7 +262,7 @@ int intsmgetstr(char *fname,unsigned long fname_len)
        LhsVar(1)=Rhs+1;
        if (err >  0) 
        {
-               /*      sciprint("%s: Internal Error \r\n",fname);*/
+               /*      sciprint("%s: Internal Error \n",fname);*/
                Error(10000);
                return 0;
        }
@@ -331,7 +331,7 @@ int intsmseek(char *fname,unsigned long fname_len)
        C2F(mseek)(&fd,istk(l1),flag,&err);
        if (err >  0)
        {
-               /* sciprint("%s: Internal Error \r\n",fname);*/
+               /* sciprint("%s: Internal Error \n",fname);*/
                Error(10000);
                return 0;
        };
@@ -359,7 +359,7 @@ int intsmtell(char *fname,unsigned long fname_len)
        C2F(mtell)(&fd,stk(l2),&err);
        if (err >  0)
        {
-               /*sciprint("%s: Internal Error \r\n",fname);*/
+               /*sciprint("%s: Internal Error \n",fname);*/
                Error(10000);
                return 0;
        };
index aef2e93..0357b40 100644 (file)
@@ -71,7 +71,7 @@ int int_objfprintfMat(char *fname,unsigned long fname_len)
 
        if (( f = fopen(cstk(l1),"w")) == (FILE *)0) 
        {
-               Scierror(999,"Error: in function %s, cannot open file %s\r\n",fname,cstk(l1));
+               Scierror(999,"Error: in function %s, cannot open file %s\n",fname,cstk(l1));
                return 0;
        }
 
index e8f8a5e..f4eb7ba 100644 (file)
@@ -26,7 +26,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
        {
                if (( Info =MALLOC(INFOSIZE*sizeof(char)))==NULL)
                {
-                       Scierror(999,"Error: in function %s, cannot allocate enough memory\r\n",fname);
+                       Scierror(999,"Error: in function %s, cannot allocate enough memory\n",fname);
                        return 0;
                }
                Info_size = INFOSIZE;
@@ -50,7 +50,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
 
        if (( f = fopen(cstk(l1),"r")) == (FILE *)0) 
        {
-               Scierror(999,"Error: in function %s, cannot open file %s\r\n",fname,cstk(l1));
+               Scierror(999,"Error: in function %s, cannot open file %s\n",fname,cstk(l1));
                return 0;
        }
        /*** first pass to get colums and rows ***/
@@ -63,7 +63,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
                {
                        FREE(Info);Info=NULL;
                        fclose(f);
-                       Scierror(999,"Error: in function %s, cannot allocate enough memory\r\n",fname);
+                       Scierror(999,"Error: in function %s, cannot allocate enough memory\n",fname);
                        return 0;
                }
                vl++;
@@ -73,7 +73,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
        {
                FREE(Info);Info=NULL;
                fclose(f);
-               Scierror(999,"Error: in function %s, cannot read data in file %s\r\n",fname,cstk(l1));
+               Scierror(999,"Error: in function %s, cannot read data in file %s\n",fname,cstk(l1));
                return 0;
        }
        cols = NumTokens(Info);
@@ -86,7 +86,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
                {
                        FREE(Info);Info=NULL;
                        fclose(f);
-                       Scierror(999,"Error: in function %s, cannot allocate enough memory\r\n",fname);
+                       Scierror(999,"Error: in function %s, cannot allocate enough memory\n",fname);
                        return 0;
                }
 
@@ -109,7 +109,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
                {
                        FREE(Info);Info=NULL;
                        fclose(f);
-                       Scierror(999,"Error: in function %s, cannot allocate enough memory\r\n", fname);
+                       Scierror(999,"Error: in function %s, cannot allocate enough memory\n", fname);
                        return 0;
                }
 
@@ -125,7 +125,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
                        fclose(f);
                        for (j=0;j<i;j++) FREE(Str[j]);
                        FREE(Str);
-                       Scierror(999,"Error: in function %s, cannot allocate enough memory\r\n",fname);
+                       Scierror(999,"Error: in function %s, cannot allocate enough memory\n",fname);
                        return 0;
                }
 
@@ -137,7 +137,7 @@ int int_objfscanfMat(char *fname,unsigned long fname_len)
                                fclose(f);
                                for (j=0;j<i;j++) FREE(Str[j]);
                                FREE(Str);
-                               Scierror(999,"Error: in function %s, cannot allocate enough memory\r\n", fname);
+                               Scierror(999,"Error: in function %s, cannot allocate enough memory\n", fname);
                                return 0;
                        }
                        strcpy(Str[i],Info);
index e0e8ef0..b717fec 100644 (file)
@@ -19,7 +19,7 @@ int C2F(sci_isdir) _PARAMS((char *fname,unsigned long fname_len))
        
        if (! (GetType(1) == sci_strings))
        {
-               Scierror(999,"parameter incorrect must be a string (a file pathname).\r\n");
+               Scierror(999,"parameter incorrect must be a string (a file pathname).\n");
                return 0;
        }
        else
@@ -37,7 +37,7 @@ int C2F(sci_isdir) _PARAMS((char *fname,unsigned long fname_len))
                }
                else
                {
-                       Scierror(999,"First parameter incorrect, must be a string (a file pathname).\r\n");
+                       Scierror(999,"First parameter incorrect, must be a string (a file pathname).\n");
                        return 0;
                }
 
@@ -45,7 +45,7 @@ int C2F(sci_isdir) _PARAMS((char *fname,unsigned long fname_len))
                
                if( strlen(path) > PATH_MAX )
                {
-                       Scierror(999,"The parameter is too long : must be less than %d caracters.\r\n",PATH_MAX);
+                       Scierror(999,"The parameter is too long : must be less than %d caracters.\n",PATH_MAX);
                }
                
                /* Crappy workaround because a / was added after SCI & ~ into 
index 0f91329..bc9754f 100644 (file)
@@ -22,7 +22,7 @@ int int_objfprintf __PARAMS((char *fname,unsigned long fname_len))
        CheckLhs(0,1);
        if ( Rhs < 2 ) 
        { 
-               Scierror(999,"Error:\tRhs must be >= 2\r\n");
+               Scierror(999,"Error:\tRhs must be >= 2\n");
                return 0;
        }
        for (k=3;k<=Rhs;k++) 
@@ -37,7 +37,7 @@ int int_objfprintf __PARAMS((char *fname,unsigned long fname_len))
 
        if ((f= GetFileOpenedInScilab(param1)) == (FILE *)0)
        {
-               Scierror(999,"mfprintf:\t wrong file descriptor %d\r\n",*istk(l1));
+               Scierror(999,"mfprintf:\t wrong file descriptor %d\n",*istk(l1));
                return 0;
        }
 
@@ -52,7 +52,7 @@ int int_objfprintf __PARAMS((char *fname,unsigned long fname_len))
 
        if (NumberPercent<Rhs-2)
        {
-               Scierror(999,"mfprintf: Invalid format.\r\n");
+               Scierror(999,"mfprintf: Invalid format.\n");
                return 0;
        }
 
index cd4a4b4..d3c6273 100644 (file)
@@ -31,7 +31,7 @@ int int_objfscanf(char *fname,unsigned long fname_len)
                GetRhsVar(1,MATRIX_OF_INTEGER_DATATYPE,&m1,&n1,&l1);
                if (m1*n1 != 1 ) 
                {
-                       Scierror(999,"Error: in fscanf: incorrect first argument\r\n");
+                       Scierror(999,"Error: in fscanf: incorrect first argument\n");
                        return 0;
                }
                iarg=2;
@@ -50,7 +50,7 @@ int int_objfscanf(char *fname,unsigned long fname_len)
        StringConvert(cstk(l2));  /* conversion */
        if ((f= GetFileOpenedInScilab(param1)) == (FILE *)0)
        {
-               Scierror(999,"fprintf:\t wrong file descriptor %d\r\n",*istk(l1));
+               Scierror(999,"fprintf:\t wrong file descriptor %d\n",*istk(l1));
                return 0;
        }
 
@@ -67,7 +67,7 @@ int int_objfscanf(char *fname,unsigned long fname_len)
                if ( retval == EOF) 
                {
                        /* 
-                       Scierror(999,"Error: in %s: end of file reached\r\n",fname);
+                       Scierror(999,"Error: in %s: end of file reached\n",fname);
                        */
                        break;
                }
@@ -79,7 +79,7 @@ int int_objfscanf(char *fname,unsigned long fname_len)
                                if (maxrow>=0) 
                                {
                                        Free_Scan(rowcount,ncol,type_s,&data);
-                                       Scierror(999,"Error: in fscanf: data mismatch\r\n");
+                                       Scierror(999,"Error: in fscanf: data mismatch\n");
                                        return 0;
                                }
                                fseek(f,pos,SEEK_SET);
@@ -87,7 +87,7 @@ int int_objfscanf(char *fname,unsigned long fname_len)
 
                        case MEM_LACK:
                                Free_Scan(rowcount,ncol,type_s,&data);
-                               Scierror(999,"Error: in fscanf: cannot allocate more memory \r\n");
+                               Scierror(999,"Error: in fscanf: cannot allocate more memory \n");
                                return 0;
                                break;
                        }
@@ -98,7 +98,7 @@ int int_objfscanf(char *fname,unsigned long fname_len)
        /* create Scilab variable with each column of data */
        err=Sci_Store(rowcount,ncol,data,type_s,retval_s);
        Free_Scan(rowcount,ncol,type_s,&data);
-       if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \r\n");}
+       if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \n");}
        return 0;
 }  
 /*-----------------------------------------------------------------------------------*/ 
index 0236960..fa10242 100644 (file)
@@ -19,7 +19,7 @@ int int_objprintf __PARAMS((char *fname,unsigned long fname_len))
   CheckLhs(0,1);
   if ( Rhs < 1 ) 
   { 
-     Scierror(999,"Error:\tRhs must be > 0\r\n");
+     Scierror(999,"Error:\tRhs must be > 0\n");
      return 0;
   }
 
@@ -41,7 +41,7 @@ int int_objprintf __PARAMS((char *fname,unsigned long fname_len))
 
   if (NumberPercent<Rhs-1)
   {
-       Scierror(999,"mfprintf: Invalid format.\r\n");
+       Scierror(999,"mfprintf: Invalid format.\n");
        return 0;
   }
 
index f83b8db..cc37820 100644 (file)
@@ -36,7 +36,7 @@ int int_objscanf(char *fname,unsigned long fname_len)
                GetRhsVar(1,MATRIX_OF_INTEGER_DATATYPE,&m1,&n1,&l1);
                if (m1*n1 != 1) 
                {
-                       Scierror(999,"Error: in scanf: incorrect first argument\r\n");
+                       Scierror(999,"Error: in scanf: incorrect first argument\n");
                        return 0;
                }
                iarg=2;
@@ -53,7 +53,7 @@ int int_objscanf(char *fname,unsigned long fname_len)
 
        if (n_count>1) 
        {
-               Scierror(999,"Error: in scanf: format cannot include \\n \r\n");
+               Scierror(999,"Error: in scanf: format cannot include \\n \n");
                return 0;
        }
 
@@ -70,7 +70,7 @@ int int_objscanf(char *fname,unsigned long fname_len)
 
                if(status != 0) 
                {
-                       Scierror(999,"Error: in scanf\r\n");
+                       Scierror(999,"Error: in scanf\n");
                        return 0;
                }
 
@@ -82,7 +82,7 @@ int int_objscanf(char *fname,unsigned long fname_len)
                if ( retval == EOF)
                {
                        /* 
-                       Scierror(999,"Error: in %s: end of file reached\r\n",fname);
+                       Scierror(999,"Error: in %s: end of file reached\n",fname);
                        return 0;
                        */
                }
@@ -95,14 +95,14 @@ int int_objscanf(char *fname,unsigned long fname_len)
                                if (maxrow>=0)
                                {
                                        Free_Scan(rowcount,ncol,type_s,&data);
-                                       Scierror(999,"Error: in fscanf: data mismatch\r\n");
+                                       Scierror(999,"Error: in fscanf: data mismatch\n");
                                        return 0;
                                }
                                break;
 
                        case MEM_LACK:
                                Free_Scan(rowcount,ncol,type_s,&data);
-                               Scierror(999,"Error: in scanf: cannot allocate more memory \r\n");
+                               Scierror(999,"Error: in scanf: cannot allocate more memory \n");
                                return 0;
                                break;
                        }
@@ -114,7 +114,7 @@ int int_objscanf(char *fname,unsigned long fname_len)
        /* create Scilab variables with each column of data */
        err=Sci_Store(rowcount,ncol,data,type_s,retval_s);
        Free_Scan(rowcount,ncol,type_s,&data);
-       if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \r\n");}
+       if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \n");}
        return 0;
 } 
 /*-----------------------------------------------------------------------------------*/ 
index 7727de4..cb61a74 100644 (file)
@@ -25,7 +25,7 @@ int int_objsprintf(char *fname,unsigned long fname_len)
        CheckLhs(0,1);
        if ( Rhs < 1 ) 
        { 
-               Scierror(999,"Error:\tRhs must be > 0\r\n");
+               Scierror(999,"Error:\tRhs must be > 0\n");
                return 0;
        }
        for (k=2;k<=Rhs;k++) {
@@ -44,7 +44,7 @@ int int_objsprintf(char *fname,unsigned long fname_len)
 
        if (NumberPercent<Rhs-1)
        {
-               Scierror(999,"sprintf: Invalid format.\r\n");
+               Scierror(999,"sprintf: Invalid format.\n");
                return 0;
        }
 
@@ -135,7 +135,7 @@ int int_objsprintf(char *fname,unsigned long fname_len)
        PutLhsVar();    
        return 0;
 mem:
-       Scierror(999,"sprintf: cannot allocate cannot allocate more memory \r\n");
+       Scierror(999,"sprintf: cannot allocate cannot allocate more memory \n");
        return 0;
 }  
 /*-----------------------------------------------------------------------------------*/ 
index e77b22a..204b84e 100644 (file)
@@ -30,7 +30,7 @@ int int_objsscanf __PARAMS((char *fname,unsigned long fname_len))
                GetRhsVar(1,MATRIX_OF_INTEGER_DATATYPE,&m1,&n1,&l1);
                if (m1*n1!=1)
                {
-                       Scierror(999,"Error: in sscanf: incorrect first argument\r\n");
+                       Scierror(999,"Error: in sscanf: incorrect first argument\n");
                        return 0;
                }
 
@@ -50,7 +50,7 @@ int int_objsscanf __PARAMS((char *fname,unsigned long fname_len))
 
        if ( (maxrow >= 0) && (maxrow*n_count>m1*n1) )
        {
-               Scierror(999,"Error: in sscanf: not enough entries in str\r\n");
+               Scierror(999,"Error: in sscanf: not enough entries in str\n");
                return 0;
        }
 
@@ -75,7 +75,7 @@ int int_objsscanf __PARAMS((char *fname,unsigned long fname_len))
                {
                        /* 
                        first returned argument wil be set to -1 
-                       Scierror(999,"Error: in %s: end of string reached\r\n",fname);
+                       Scierror(999,"Error: in %s: end of string reached\n",fname);
                        return 0;
                        */
                }
@@ -88,14 +88,14 @@ int int_objsscanf __PARAMS((char *fname,unsigned long fname_len))
                                if (maxrow>=0) 
                                {
                                        Free_Scan(rowcount,ncol,type_s,&data);
-                                       Scierror(999,"Error: in sscanf: data mismatch\r\n");
+                                       Scierror(999,"Error: in sscanf: data mismatch\n");
                                        return 0;
                                }
                                break;
 
                        case MEM_LACK:
                                Free_Scan(rowcount,ncol,type_s,&data);
-                               Scierror(999,"Error: in sscanf: cannot allocate more memory \r\n");
+                               Scierror(999,"Error: in sscanf: cannot allocate more memory \n");
                                return 0;
                                break;
                        }
@@ -107,7 +107,7 @@ int int_objsscanf __PARAMS((char *fname,unsigned long fname_len))
        /* create Scilab variables with each column of data */
        err=Sci_Store(rowcount,ncol,data,type_s,retval_s);
        Free_Scan(rowcount,ncol,type_s,&data);
-       if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \r\n");}
+       if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \n");}
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/ 
index a2425cb..ade2531 100644 (file)
@@ -13,7 +13,7 @@ int getdiary(void)
 void C2F(diary)(char *str,int *n)
 {
 #if defined(_MSC_VER)
-       char newline[2]="\r\n";
+       char newline[2]="\n";
        int nn=2;
 #else
        char newline[1]="\n";
index fb4612f..8d75534 100644 (file)
@@ -37,7 +37,7 @@ static void error_on_rval(XXPRINTF xxprintf,FLUSH flush,char *target)
 {
        (*xxprintf) ((VPTR) target, "\n");
        (*flush) ((FILE *) target);
-       Scierror(998,"Error:\tprintf: not enough arguments\r\n");
+       Scierror(998,"Error:\tprintf: not enough arguments\n");
 }
 /*-----------------------------------------------------------------------------------*/
 static int call_printf(XXPRINTF xxprintf,char *target,char *p,char *sval,int *asterisk,int asterisk_count,int conversion_type,double dval )
@@ -246,7 +246,7 @@ int do_xxprintf (char *fname, FILE *fp, char *format, int nargs, int argcount, i
                                {
                                        if (target > sprintf_limit)     /* over sprintf_limit */
                                        {
-                                               Scierror(998,"Error:\tsprintf problem, buffer too small\r\n");
+                                               Scierror(998,"Error:\tsprintf problem, buffer too small\n");
                                                return RET_BUG;
                                        }
                                        else
@@ -350,11 +350,11 @@ int do_xxprintf (char *fname, FILE *fp, char *format, int nargs, int argcount, i
                                {
                                        if (*tmpcurrentchar == 's')
                                        {
-                                               Scierror(998,"Warning:\tprintf: bad conversion l or h flag mixed with s directive\r\n");
+                                               Scierror(998,"Warning:\tprintf: bad conversion l or h flag mixed with s directive\n");
                                        }
                                        else /* 'c' */
                                        {
-                                               Scierror(998,"Warning:\tprintf: bad conversion l or h flag mixed with c directive\r\n");
+                                               Scierror(998,"Warning:\tprintf: bad conversion l or h flag mixed with c directive\n");
                                        }
                                }
 
@@ -412,7 +412,7 @@ int do_xxprintf (char *fname, FILE *fp, char *format, int nargs, int argcount, i
                case 'e': case 'g': case 'f': case 'E': case 'G':
                        if (high_flag + low_flag)
                        {
-                               Scierror(998,"Error:\tprintf: bad conversion\r\n");
+                               Scierror(998,"Error:\tprintf: bad conversion\n");
                                return RET_BUG;
                        }
                        rval=GetScalarDouble(fname,&prev,&arg_count,nargs,&ccount,lcount,&dval);
@@ -429,12 +429,12 @@ int do_xxprintf (char *fname, FILE *fp, char *format, int nargs, int argcount, i
                        break;
 
                case 'o':
-                       Scierror(998,"Error:\tprintf: \"o\" format not allowed\r\n");
+                       Scierror(998,"Error:\tprintf: \"o\" format not allowed\n");
                        return RET_BUG;
                        break;
 
                default:
-                       Scierror(998,"Error:\tprintf: bad conversion\r\n");
+                       Scierror(998,"Error:\tprintf: bad conversion\n");
                        return RET_BUG;
                }
 
index 8d062b1..f05b2e4 100644 (file)
@@ -120,7 +120,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
 
                        if ( *currentchar1 == '\0') 
                        {
-                               Scierror(998,"Error:\tscanf, unclosed [ directive\r\n");
+                               Scierror(998,"Error:\tscanf, unclosed [ directive\n");
                                return RET_BUG;
                        }
 
@@ -131,7 +131,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
 
                                if ( *currentchar1 == '\0') 
                                {
-                                       Scierror(998,"Error:\tscanf unclosed [ directive\r\n");
+                                       Scierror(998,"Error:\tscanf unclosed [ directive\n");
                                        return RET_BUG;
                                }
                        }
@@ -148,7 +148,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
 
                        if ( num_conversion >= MAXSCAN ) 
                        {
-                               Scierror(998,"Error:\tscanf too many (> %d) conversion required\r\n",num_conversion,MAXSCAN);
+                               Scierror(998,"Error:\tscanf too many (> %d) conversion required\n",num_conversion,MAXSCAN);
                                return RET_BUG;
                        }
 
@@ -159,7 +159,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
 
                                if (width_flag == 1 && width_val > MAX_STR-1 )
                                {
-                                       Scierror(998,"Error:\tscanf, width field %d is too long (> %d) for %%[ directive\r\n",width_val,MAX_STR-1);
+                                       Scierror(998,"Error:\tscanf, width field %d is too long (> %d) for %%[ directive\n",width_val,MAX_STR-1);
                                        return RET_BUG;
                                }
 
@@ -171,14 +171,14 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
                        case 's':
                                if (l_flag + h_flag)
                                {
-                                       Scierror(998,"Error:\tscanf: bad conversion\r\n");
+                                       Scierror(998,"Error:\tscanf: bad conversion\n");
                                        return RET_BUG;
                                }
 
                                if (width_flag == 0 ) str_width_flag = 1;
                                if (width_flag == 1 && width_val > MAX_STR-1 )
                                {
-                                       Scierror(998,"Error:\tscanf, width field %d is too long (< %d) for %%s directive\r\n",width_val,MAX_STR-1);
+                                       Scierror(998,"Error:\tscanf, width field %d is too long (< %d) for %%s directive\n",width_val,MAX_STR-1);
                                        return RET_BUG;
                                }
 
@@ -191,7 +191,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
                        case 'c':
                                if (l_flag + h_flag)
                                {
-                                       Scierror(998,"Error:\tscanf: bad conversion\r\n");
+                                       Scierror(998,"Error:\tscanf: bad conversion\n");
                                        return RET_BUG;
                                }
 
@@ -200,7 +200,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
 
                                if (width_flag == 1 && width_val > MAX_STR-1 )
                                {
-                                       Scierror(998,"Error:\tscanf width field %d is too long (< %d) for %%c directive\r\n",width_val,MAX_STR-1);
+                                       Scierror(998,"Error:\tscanf width field %d is too long (< %d) for %%c directive\n",width_val,MAX_STR-1);
                                        return RET_BUG;
                                }
 
@@ -257,7 +257,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
                        case 'e': case 'f': case 'g': case 'E': case 'G':
                                if (h_flag)
                                {
-                                       Scierror(998,"Error:\tscanf: bad conversion\r\n");
+                                       Scierror(998,"Error:\tscanf: bad conversion\n");
                                        return RET_BUG;
                                }
                                else if (l_flag) 
@@ -273,7 +273,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
                                break;
 
                        default:
-                               Scierror(998,"Error:\tscanf: bad conversion\r\n");
+                               Scierror(998,"Error:\tscanf: bad conversion\n");
                                return RET_BUG;
                                break;
                        }
@@ -301,7 +301,7 @@ int do_xxscanf (char *fname, FILE *fp, char *format, int *nargs, char *strv, int
 
                        if ( f2 == slast )
                        {
-                               Scierror(998,"Error:\tscanf, format is too long (> %d) \r\n",MAX_STR-1);
+                               Scierror(998,"Error:\tscanf, format is too long (> %d) \n",MAX_STR-1);
                                return RET_BUG;
                        }
                }
index 60fbea0..936f1de 100644 (file)
@@ -72,7 +72,7 @@ int Sci_Store __PARAMS((int nrow, int ncol, entry *data, sfdir *type, int retval
 
   /* create Scilab variable with each column of data */
   if (ncol+Rhs > intersiz ){
-    Scierror(998,"Error:\ttoo many directive in scanf\r\n");
+    Scierror(998,"Error:\ttoo many directive in scanf\n");
     return RET_BUG;
   }
   iarg=Rhs;
index 666c370..1ce5672 100644 (file)
@@ -225,7 +225,7 @@ int LOGGER_clean_output( char *string, char **buffer )
                {
                        if (isspace((int)*q))
                        {
-                               next_space = strpbrk( (q+1), "\t\r\n\v " );
+                               next_space = strpbrk( (q+1), "\t\n\v " );
                                if (next_space != NULL)
                                {
                                        if ((line_size +(next_space -q)) >= LOGGER_glb.wraplength)
index f1751af..a8d0424 100644 (file)
@@ -42,13 +42,13 @@ void C2F(mclose) (integer *fd, double *res)
                        else
                        {
                                *res = 0.0;
-                               sciprint("File %d not active \r\n",fd1);
+                               sciprint("File %d not active \n",fd1);
                        }
                }
                else 
                {
                        *res = -1.0;
-                       sciprint("No file to close \r\n",fd1);
+                       sciprint("No file to close \n",fd1);
                }
        }
 }
index a9aeb5a..170f008 100644 (file)
@@ -38,7 +38,7 @@ int swap = 0;
                  MGET_NC(NumType,Fswap); break; \
          case 'l': swap = (islittleendian()==1) ? 0:1; \
          MGET_NC(NumType,Fswap);  break; \
-         default: sciprint("mget : %s format not recognized \r\n",type); \
+         default: sciprint("mget : %s format not recognized \n",type); \
          *ierr=1; return; \
                                } \
 }
@@ -52,7 +52,7 @@ void C2F(mgetnc)(integer *fd, void * res, integer *n1, char *type, integer *ierr
 
        *ierr=0;
        if ((fa = GetFileOpenedInScilab(*fd)) ==NULL) {
-               sciprint("No input file associated to logical unit %d\r\n",*fd);
+               sciprint("No input file associated to logical unit %d\n",*fd);
                *ierr=3;
                return;
        }
@@ -85,7 +85,7 @@ void C2F(mgetnc)(integer *fd, void * res, integer *n1, char *type, integer *ierr
        if ( items != n ) 
        {
                *ierr = -(items) -1 ;
-               /** sciprint("Read %d out of \r\n",items,n); **/
+               /** sciprint("Read %d out of \n",items,n); **/
        }
        return;
 }
@@ -141,7 +141,7 @@ void mget2(FILE *fa, integer swap2, double *res, integer n, char *type, integer
        if ( items != n ) 
        {
                *ierr = -(items) -1 ;
-               /** sciprint("Read %d out of \r\n",items,n); **/
+               /** sciprint("Read %d out of \n",items,n); **/
        }
        return;
 }
@@ -154,7 +154,7 @@ void C2F(mget) (integer *fd, double *res, integer *n, char *type, integer *ierr)
        *ierr=0;
        if ( nc == 0) 
        {
-               sciprint("mget : format is of length 0\r\n",type);
+               sciprint("mget : format is of length 0\n",type);
                *ierr=2;
                return;
        }
@@ -163,11 +163,11 @@ void C2F(mget) (integer *fd, double *res, integer *n, char *type, integer *ierr)
        {
                swap2 = GetSwapStatus(*fd);
                mget2(fa,swap2,res,*n,type,ierr);
-               if (*ierr > 0) sciprint("mget : %s format not recognized \r\n",type);
+               if (*ierr > 0) sciprint("mget : %s format not recognized \n",type);
        }
        else 
        {
-               sciprint("No input file associated to logical unit %d\r\n",*fd);
+               sciprint("No input file associated to logical unit %d\n",*fd);
                *ierr=3;
        }
 }
index 67abd5a..0cfb0e1 100644 (file)
@@ -19,7 +19,7 @@ void C2F(mgetstr) (integer *fd, char **start, integer *n, integer *ierr)
                *start= (char *) MALLOC((*n+1)*sizeof(char));
                if ( *start == (char *) 0)
                {       
-                       sciprint("No more memory \r\n");
+                       sciprint("No more memory \n");
                        *ierr=1;
                        return;
                }
@@ -31,7 +31,7 @@ void C2F(mgetstr) (integer *fd, char **start, integer *n, integer *ierr)
                }
                return;
        }
-       sciprint("No input file \r\n");
+       sciprint("No input file \n");
        *ierr=1;
 }
 /*-----------------------------------------------------------------------------------*/
@@ -51,7 +51,7 @@ void C2F(mgetstr1) (integer *fd, char *start, integer *n, integer *ierr)
                }
                return;
        }
-       sciprint("No input file \r\n");
+       sciprint("No input file \n");
        *ierr=1;
 }
 /*-----------------------------------------------------------------------------------*/
index d143136..5e1ff53 100644 (file)
@@ -22,7 +22,7 @@ void C2F(mopen)(int *fd, char *file, char *status, int *f_swap, double *res, int
 
        if ( getWarningMode() && IsAlreadyOpenedInScilab(file) )
        {
-               sciprint("Warning : file '%s' already opened in scilab.\r\n",file);
+               sciprint("Warning : file '%s' already opened in scilab.\n",file);
        }
 
        swap =0;
index 23eb965..47d4e86 100644 (file)
@@ -44,7 +44,7 @@ extern int swap; /* defined in mget.c */
                swap = (islittleendian()==1) ? 0 : 1; \
                MPUT_NC(Type,Fswap); break; \
                default: \
-               sciprint("mput : %s format not recognized \r\n",type); \
+               sciprint("mput : %s format not recognized \n",type); \
                *ierr=1;return; \
        }
 /*-----------------------------------------------------------------------------------*/
@@ -56,7 +56,7 @@ void C2F(mputnc) (integer *fd, void * res, integer *n1, char *type, integer *ier
        n=*n1;
        *ierr=0;
        if ((fa = GetFileOpenedInScilab(*fd)) ==NULL) {
-               sciprint("No input file associated to logical unit %d\r\n",*fd);
+               sciprint("No input file associated to logical unit %d\n",*fd);
                *ierr=3;
                return;
        }
@@ -122,7 +122,7 @@ data **/
                swap = (islittleendian()==1) ? 0 : 1; \
                MPUT(Type,Fswap); break; \
                default: \
-               sciprint("mput : %s format not recognized \r\n",type); \
+               sciprint("mput : %s format not recognized \n",type); \
                *ierr=1;return; \
 }
 /*-----------------------------------------------------------------------------------*/
@@ -165,7 +165,7 @@ void C2F(mput) (integer *fd, double *res, integer *n, char *type, integer *ierr)
        *ierr=0;
        if ((nc = (int)strlen(type)) == 0) 
        {
-               sciprint("mput : format is of length 0\r\n",type);
+               sciprint("mput : format is of length 0\n",type);
                *ierr=2;
                return;
        }
@@ -173,11 +173,11 @@ void C2F(mput) (integer *fd, double *res, integer *n, char *type, integer *ierr)
        {
                swap2 = GetSwapStatus(*fd);
                mput2(fa,swap2,res,*n,type,ierr);
-               if (*ierr > 0) sciprint("mput : %s format not recognized \r\n",type);
+               if (*ierr > 0) sciprint("mput : %s format not recognized \n",type);
        }
        else 
        {
-               sciprint("No input file associated to logical unit %d\r\n",*fd);
+               sciprint("No input file associated to logical unit %d\n",*fd);
                *ierr=3;
        }
 }
index 5f97e97..f665e25 100644 (file)
@@ -13,7 +13,7 @@ void C2F(mputstr) (int *fd, char *str, double *res, int *ierr)
        fa = GetFileOpenedInScilab(*fd);
        if (!fa) 
        {
-               sciprint("No input file \r\n");
+               sciprint("No input file \n");
                *ierr=1;
        }
        else 
index e12d999..1ae039d 100644 (file)
@@ -28,7 +28,7 @@ void C2F(mseek) (integer *fd, integer *offset, char *flag, integer *err)
        *err=0;
        if ( fa == (FILE *) 0 ) 
        {
-               sciprint("mseek: wrong file logical unit \r\n");
+               sciprint("mseek: wrong file logical unit \n");
                *err=1;
                return;
        }
@@ -40,7 +40,7 @@ void C2F(mseek) (integer *fd, integer *offset, char *flag, integer *err)
                iflag = SEEK_END;
        else 
        {
-               sciprint("mseek : flag = %s not recognized \r\n");
+               sciprint("mseek : flag = %s not recognized \n");
                *err=1;
                return;
        }
@@ -56,7 +56,7 @@ void C2F(mseek) (integer *fd, integer *offset, char *flag, integer *err)
 #else
        if (fseek(fa,(long) *offset,iflag) == -1 ) 
        {
-               sciprint("mseek: error\r\n");
+               sciprint("mseek: error\n");
                *err=1;
        }
        else 
index 780c1b6..1e763cd 100644 (file)
@@ -111,7 +111,7 @@ int C2F(gw_graphics)(void)
   }
   else
   {
-       Scierror(999,"graphic interface disabled -nogui or -nwni mode.\r\n");
+       Scierror(999,"graphic interface disabled -nogui or -nwni mode.\n");
        return 0;
   }
 
index def36d2..c878913 100644 (file)
@@ -47,7 +47,7 @@ int sci_StringBox( char * fname, unsigned long fname_len )
 
   if ( pText == NULL )
   {
-    Scierror(999,"%s : The handle is not valid.\r\n",fname);
+    Scierror(999,"%s : The handle is not valid.\n",fname);
     return 0 ;
   }
 
index 4831897..ac550fb 100644 (file)
@@ -40,7 +40,7 @@ int sci_addcb(char *fname,unsigned long fname_len)
     GetRhsVar(2,MATRIX_OF_INTEGER_DATATYPE,&m2,&n2,&l2); /* Gets the mouse event */
     break;
   default: 
-    Scierror(999,"%s: Pad parameters\r\n",fname);
+    Scierror(999,"%s: Pad parameters\n",fname);
     return 0;
     break;
 
@@ -48,7 +48,7 @@ int sci_addcb(char *fname,unsigned long fname_len)
   if ((pobj = sciGetPointerFromHandle(hdl)) != NULL )
     sciAddCallback((sciPointObj *)pobj, cstk(l1),m1*n1,*istk(l2));
   else {
-    Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+    Scierror(999,"%s :the handle is not or no more valid\n",fname);
     return 0;
   }
   LhsVar(1)=0;
index 9c66d8d..15a3398 100644 (file)
@@ -58,13 +58,13 @@ int sci_champ_G(char *fname,int (*func) (),unsigned long fname_len)
   } 
   else if ( Rhs < 4 ) 
   {
-    Scierror(999,"%s: expecting at least 4 arguments\r\n",fname);
+    Scierror(999,"%s: expecting at least 4 arguments\n",fname);
     return 0;
   }
   if ( get_optionals(fname,opts) == 0) { return 0 ; }
   if ( FirstOpt() < 5 )
   {
-    sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at position %d \n",
       fname,5);
     Error(999); 
     return(0);
index abd9e18..a43ea1c 100644 (file)
@@ -31,7 +31,7 @@ int sci_contour2di( char * fname, unsigned long fname_len )
   GetRhsVar(3,MATRIX_OF_DOUBLE_DATATYPE, &m3, &n3, &l3);
   if (m3 * n3 == 0) { LhsVar(1) = 0; return 0; }
   if (m3 == 1 || n3 == 1) {
-    Scierror(999,"%s: third argument is a vector, expecting a matrix\r\n",fname);
+    Scierror(999,"%s: third argument is a vector, expecting a matrix\n",fname);
     return 0;
   }
 
index 833b2af..2550336 100644 (file)
@@ -40,7 +40,7 @@ int sci_copy(char *fname,unsigned long fname_len)
     hdl = (unsigned long)*hstk(l1); /* on recupere le pointeur d'objet par le handle*/
     pobj = sciGetPointerFromHandle(hdl);
     if (pobj == NULL) {
-      Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+      Scierror(999,"%s :the handle is not or no more valid\n",fname);
       return 0;
     }
     typ=sciGetEntityType(pobj);
@@ -55,7 +55,7 @@ int sci_copy(char *fname,unsigned long fname_len)
     hdl = (unsigned long)*hstk(l1); /* on recupere le pointeur d'objet par le handle*/
     pobj = sciGetPointerFromHandle(hdl);
     if (pobj == NULL) {
-      Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+      Scierror(999,"%s :the handle is not or no more valid\n",fname);
       return 0;
     }
     typ=sciGetEntityType(pobj);
@@ -67,7 +67,7 @@ int sci_copy(char *fname,unsigned long fname_len)
     hdlparent = (unsigned long)*hstk(l2); /* on recupere le pointeur d'objet par le handle*/
     psubwinparenttarget = sciGetPointerFromHandle(hdlparent);
     if ( psubwinparenttarget == NULL) {
-      Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+      Scierror(999,"%s :the handle is not or no more valid\n",fname);
       return 0;
     }
   }
index da6cc0b..08ea2b8 100644 (file)
@@ -48,7 +48,7 @@ int sci_delete(char *fname,unsigned long fname_len)
     }
     else
     {
-      Scierror(999,"%s :Incorrect argument\r\n",fname);
+      Scierror(999,"%s :Incorrect argument\n",fname);
       return 0;
     }
     break;
@@ -61,7 +61,7 @@ int sci_delete(char *fname,unsigned long fname_len)
   pobj = sciGetPointerFromHandle(hdl);
   if (pobj == NULL)
   {
-    Scierror(999,"%s :the handle is not valid\r\n",fname);
+    Scierror(999,"%s :the handle is not valid\n",fname);
     return 0;
   }
   
index c4691a6..9ec556d 100644 (file)
@@ -26,12 +26,12 @@ int sci_demo( char * fname, char * code, int * flagx )
        
        /* execute the Scilab execstr function */
        if ( *flagx == 1){
-               sciprint("\r\n");
-               sciprint("Demo of %s()\r\n",fname);
+               sciprint("\n");
+               sciprint("Demo of %s()\n",fname);
                sciprint("========================================");
-               sciprint("\r\n");
-               sciprint("%s\r\n",code);
-               sciprint("\r\n");
+               sciprint("\n");
+               sciprint("%s\n",code);
+               sciprint("\n");
        }
        
        C2F(recu).krec=-1; /* added to avoid recursion errors */
index d19e05d..45f7e0a 100644 (file)
@@ -150,14 +150,14 @@ int sci_drawaxis( char * fname, unsigned long fname_len )
       return 0;
     break;
   default :
-    Scierror(999,"%s: tics has a wrong value \"%c\" should be one of \"r\",\"v\" and \"i\" \r\n", 
+    Scierror(999,"%s: tics has a wrong value \"%c\" should be one of \"r\",\"v\" and \"i\" \n", 
       fname,dir);
     return 0;
   }
 
   if ( val != 0) 
   {
-    /** sciprint("nombre de tics %d\r\n",ntics); **/
+    /** sciprint("nombre de tics %d\n",ntics); **/
     CheckLength( opts[8].position, opts[8].m*opts[8].n,ntics);
     nb_tics_labels = opts[8].m*opts[8].n;
   }
@@ -208,7 +208,7 @@ int check_xy(char *fname, char dir, int mn, int xpos, int xm, int xn,
     }
     break;
   default :
-    Scierror(999,"%s: dir has a wrong value \"%c\" should be one of \"u\",\"d\",\"r\" and \"l\"\r\n", 
+    Scierror(999,"%s: dir has a wrong value \"%c\" should be one of \"u\",\"d\",\"r\" and \"l\"\n", 
       fname,dir);
     return 0;
   }
index c2236fb..6ca60aa 100644 (file)
@@ -56,7 +56,7 @@ int sci_fec(char *fname,unsigned long fname_len)
 
   if ( get_optionals(fname,opts) == 0) return 0;
   if ( FirstOpt() < 5) {
-    sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at position %d \n",
       fname,5);
     Error(999); 
     return(0);
@@ -67,7 +67,7 @@ int sci_fec(char *fname,unsigned long fname_len)
 
   GetRhsVar(3,MATRIX_OF_DOUBLE_DATATYPE,&m3,&n3,&l3);
   if (n3 != 5) {
-    Scierror(999,"%s: triangles have %d columns,expecting 5\r\n",fname,n3);
+    Scierror(999,"%s: triangles have %d columns,expecting 5\n",fname,n3);
     return 0;
   }
 
index 02cb2f0..0a5c3a3 100644 (file)
@@ -122,14 +122,14 @@ int sci_get(char *fname,unsigned long fname_len)
       lw = 1 + Top - Rhs;
       C2F(overload)(&lw,"get",3);
          return 0;
-      /*Scierror(999,"%s: Incorrect argument\r\n",fname);*/
+      /*Scierror(999,"%s: Incorrect argument\n",fname);*/
       break;
     }
   /* cstk(l2) est la commande, l3 l'indice sur les parametres de la commande */
   CheckLhs(0,1);
   if (hdl == (unsigned long)0 ) {
     if (sciGet((sciPointObj *) NULL, cstk(l2))!=0) {
-      Scierror(999,"%s: %s\r\n",fname,error_message);
+      Scierror(999,"%s: %s\n",fname,error_message);
       return 0;
     }
   }
@@ -140,13 +140,13 @@ int sci_get(char *fname,unsigned long fname_len)
 
       if (sciGet(pobj, cstk(l2))!=0)
       {
-        Scierror(999,"%s: %s\r\n",fname,error_message);
+        Scierror(999,"%s: %s\n",fname,error_message);
         return 0;
       }
     }
     else
     {
-      Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+      Scierror(999,"%s :the handle is not or no more valid\n",fname);
     }
   }
   LhsVar(1)=Rhs+1;
index c3dccf9..822c63a 100644 (file)
@@ -36,7 +36,7 @@ int sci_glue( char * fname, unsigned long fname_len )
     C2F(dsort)(stk(l2),&n,istk(lind));
     for (i = 1; i < n;i++) {
       if (*stk(l2+i) == *stk(l2+i-1)) {
-        Scierror(999,"%s :each handle should not appear twice\r\n",fname);
+        Scierror(999,"%s :each handle should not appear twice\n",fname);
         return 0;
       }
     }
@@ -48,7 +48,7 @@ int sci_glue( char * fname, unsigned long fname_len )
     handelsvalue[i] = (unsigned long) (hstk(l1))[i];
     pobj = sciGetPointerFromHandle(handelsvalue[i]);
     if (pobj == NULL) {
-      Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+      Scierror(999,"%s :the handle is not or no more valid\n",fname);
       return 0;
     }
     parenthdl = (unsigned long ) sciGetHandle(sciGetParent (pobj));
@@ -56,18 +56,18 @@ int sci_glue( char * fname, unsigned long fname_len )
       hdl=parenthdl;
     if  (parenthdl != hdl)
     {
-      Scierror(999,"%s: Objects must have the same parent\r\n",fname);
+      Scierror(999,"%s: Objects must have the same parent\n",fname);
       return 0;
     }
 
   }
   ret = CheckForCompound (handelsvalue, n);
   if (ret>0) {
-    Scierror(999,"%s: handle %d cannot be glued (invalid parent)\r\n",fname,ret);
+    Scierror(999,"%s: handle %d cannot be glued (invalid parent)\n",fname,ret);
     return 0;
   }
   if (ret<0) {
-    Scierror(999,"%s: handle %d cannot be glued (invalid type)\r\n",fname,-ret);
+    Scierror(999,"%s: handle %d cannot be glued (invalid type)\n",fname,-ret);
     return 0;
   }
   sciSetCurrentObj ((sciPointObj *)ConstructCompound (handelsvalue, n));
index 3b791ee..739924c 100644 (file)
@@ -45,7 +45,7 @@ int sci_grayplot( char *fname, unsigned long fname_len )
 
   if ( get_optionals(fname,opts) == 0) { return 0 ; }
   if ( FirstOpt() < 4) {
-    sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at position %d \n",
       fname,4);
     Error(999); 
     return(0);
index 2a9fd26..9856ad3 100644 (file)
@@ -46,7 +46,7 @@ int sci_matplot(char *fname,unsigned long fname_len)
   if ( get_optionals(fname,opts) == 0 ) { return 0 ; }
   if ( FirstOpt() < 2)
   {
-    sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at position %d \n",
       fname,2);
     Error(999); 
     return(0);
index da9b906..7aa6f8f 100644 (file)
@@ -24,7 +24,7 @@ int sci_move( char * fname, unsigned long fname_len )
     GetRhsVar(3,STRING_DATATYPE,&m3,&n3,&l3);
     if (strcmp(cstk(l3),"alone") == 0) { opt = TRUE; }
     else {
-      Scierror(999,"%s: invalid option \r\n",fname); 
+      Scierror(999,"%s: invalid option \n",fname); 
       return 0;
     }
   }
@@ -35,7 +35,7 @@ int sci_move( char * fname, unsigned long fname_len )
   n=m2*n2;
   if (n != 2&&n !=3)
   { 
-    Scierror(999,"%s: third argument is a vector,[x y] or [x,y,z] \r\n",fname);
+    Scierror(999,"%s: third argument is a vector,[x y] or [x,y,z] \n",fname);
     return 0;
   }
   Objmove(&hdl,stk(l2),n,opt);
index e4b8acd..57a48cf 100644 (file)
@@ -34,7 +34,7 @@ int sci_newaxes( char * fname,unsigned long fname_len )
     LhsVar(1)=1;
   }
   else {
-    Scierror(999,"%s: running out of memory \r\n",fname);
+    Scierror(999,"%s: running out of memory \n",fname);
   }
   return 0;
 
index a85b118..3a314ca 100644 (file)
@@ -45,7 +45,7 @@ int sci_param3d( char * fname, unsigned long fname_len )
 
   if ( get_optionals(fname,opts) == 0) return 0;
   if ( FirstOpt() < 4) {
-    sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at position %d \n",
       fname,4);
     Error(999); 
     return(0);
index 7b29734..9fef842 100644 (file)
@@ -47,7 +47,7 @@ int sci_param3d1( char *fname, unsigned long fname_len )
 
   if ( get_optionals(fname,opts) == 0) return 0;
   if ( FirstOpt() < 4) {
-    sciprint("%s: misplaced optional argument, first must be at osition %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at osition %d \n",
       fname,4);
     Error(999); 
     return(0);
@@ -73,7 +73,7 @@ int sci_param3d1( char *fname, unsigned long fname_len )
     GetRhsVar(3,LIST_DATATYPE,&m3l,&n3l,&l3l);
     if ( m3l != 2 ) 
     {
-      Scierror(999,"%s: second argument has a wrong size (%d), expecting a list of size %d\r\n",
+      Scierror(999,"%s: second argument has a wrong size (%d), expecting a list of size %d\n",
         fname,m3l,2);
       return 0;
     }
@@ -82,7 +82,7 @@ int sci_param3d1( char *fname, unsigned long fname_len )
     zcol  = stk(l3n);
     if (m3n * n3n != n3) 
     {
-      Scierror(999,"%s: third argument: color specification has wrong size, expecting %d \r\n",fname,n3);
+      Scierror(999,"%s: third argument: color specification has wrong size, expecting %d \n",fname,n3);
       return 0;
     }
     break ;
index 268e57a..c4bc4c5 100644 (file)
@@ -78,7 +78,7 @@ int sci_plot2d( char * fname, unsigned long fname_len )
   {
     if ( FirstOpt() <= Rhs )
     {
-           sciprint("%s: misplaced optional argument, first must be at position %d\r\n",fname,3+iskip);
+           sciprint("%s: misplaced optional argument, first must be at position %d\n",fname,3+iskip);
            Error(999); 
            return(0);
     }
@@ -100,7 +100,7 @@ int sci_plot2d( char * fname, unsigned long fname_len )
   {
     if ( FirstOpt() < 3+iskip)
     {
-      sciprint("%s: misplaced optional argument, first must be at position %d\r\n", fname,3+iskip);
+      sciprint("%s: misplaced optional argument, first must be at position %d\n", fname,3+iskip);
       Error(999); 
       return(0);
     }
@@ -169,7 +169,7 @@ int sci_plot2d( char * fname, unsigned long fname_len )
 
   if(n1 == -1 || n2 == -1 || m1 == -1 || m2 == -1)
   {
-    sciprint("%s: bad argument specified in input\r\n", fname);
+    sciprint("%s: bad argument specified in input\n", fname);
     Error(999); 
     return(0);
   }
index 7b00cb1..258de9d 100644 (file)
@@ -108,7 +108,7 @@ int sci_plot2d1_G( char * fname, int ptype, unsigned long fname_len )
   {
     if ( FirstOpt() <= Rhs)
     {
-      sciprint("%s: misplaced optional argument, first must be at position %d\r\n",fname,3+iskip);
+      sciprint("%s: misplaced optional argument, first must be at position %d\n",fname,3+iskip);
       Error(999); 
       return(0);
     }
@@ -127,7 +127,7 @@ int sci_plot2d1_G( char * fname, int ptype, unsigned long fname_len )
   {
     if ( FirstOpt() < 3+iskip) 
     {
-      sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+      sciprint("%s: misplaced optional argument, first must be at position %d \n",
         fname,3+iskip);
       Error(999); 
       return(0);
index 83153d9..e534048 100644 (file)
@@ -56,7 +56,7 @@ int sci_plot3d( char * fname, unsigned long fname_len )
 
   if ( get_optionals(fname,opts) == 0) return 0;
   if ( FirstOpt() < 4) {
-    sciprint("%s: misplaced optional argument, first must be at position %d \r\n",
+    sciprint("%s: misplaced optional argument, first must be at position %d \n",
       fname,4);
     Error(999); 
     return(0);
@@ -80,7 +80,7 @@ int sci_plot3d( char * fname, unsigned long fname_len )
       GetRhsVar(3,LIST_DATATYPE,&m3l,&n3l,&l3l);
       if ( m3l != 2 ) 
       {
-        Scierror(999,"%s: second argument has a wrong size (%d), expecting a list of size %d\r\n",
+        Scierror(999,"%s: second argument has a wrong size (%d), expecting a list of size %d\n",
           fname,m3l,2);
         return 0;
       }
@@ -89,7 +89,7 @@ int sci_plot3d( char * fname, unsigned long fname_len )
       zcol  = stk(l3n);
       if (m3n * n3n != n3 &&  m3n*n3n != m3*n3)
       {
-        Scierror(999,"%s: third argument: color specification has wrong size, expecting %d or %d \r\n",fname,n3,m3*n3);
+        Scierror(999,"%s: third argument: color specification has wrong size, expecting %d or %d \n",fname,n3,m3*n3);
         return 0;
       }
       /* 
@@ -116,21 +116,21 @@ int sci_plot3d( char * fname, unsigned long fname_len )
 
   if (m1 * n1 == m3 * n3 && m1 * n1 == m2 * n2 && m1 * n1 != 1) {
     if (! (m1 == m2 && m2 == m3 && n1 == n2 && n2 == n3)) {
-      Scierror(999,"%s: The three first arguments have incompatible length \r\n",fname);
+      Scierror(999,"%s: The three first arguments have incompatible length \n",fname);
       return 0;
     }
   } else {
     if (m2 * n2 != n3) {
-      Scierror(999,"%s: second and third arguments have incompatible length\r\n",fname);
+      Scierror(999,"%s: second and third arguments have incompatible length\n",fname);
       return 0;
     }
     if (m1 * n1 != m3) {
-      Scierror(999,"%s: first and third arguments have incompatible length\r\n",fname);
+      Scierror(999,"%s: first and third arguments have incompatible length\n",fname);
       return 0;
     }
     if ( m1*n1 <= 1 || m2*n2 <= 1 ) 
     {
-      Scierror(999,"%s: first and second arguments should be of size >= 2\r\n",fname);
+      Scierror(999,"%s: first and second arguments should be of size >= 2\n",fname);
       return 0;
     }
   }
index c08ef76..3897637 100644 (file)
@@ -36,7 +36,7 @@ int sci_relocate_handle( char * fname, unsigned long fname_len )
 
   if ( parentCol * parentRow != 1 )
   {
-    Scierror(999,"%s :Handles must be relocated under a single parent.\r\n",fname);
+    Scierror(999,"%s :Handles must be relocated under a single parent.\n",fname);
     return 0 ;
   }
 
@@ -44,7 +44,7 @@ int sci_relocate_handle( char * fname, unsigned long fname_len )
   handleArray = MALLOC( nbHandle * sizeof( unsigned long ) ) ;
   if ( handleArray == NULL )
   {
-    Scierror(999,"Memory full, aborting operation.\r\n",fname);
+    Scierror(999,"Memory full, aborting operation.\n",fname);
     return 0 ;
   }
 
index 73a8c4d..a9bb35a 100644 (file)
@@ -110,7 +110,7 @@ int sci_set(char *fname, unsigned long fname_len)
                                {
                                        if (m1!=1||n1!=1) 
                                        { 
-                                               Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+                                               Scierror(999,"%s :the handle is not or no more valid\n",fname);
                                                endGraphicDataWriting();
                                                return 0;
                                        }
@@ -203,14 +203,14 @@ int sci_set(char *fname, unsigned long fname_len)
                        t2=sciType(cstk(l2),pobj);
                        if (t2<0) 
                        {
-                               Scierror(999,"%s: unknown property name '%s' \r\n",fname,cstk(l2));
+                               Scierror(999,"%s: unknown property name '%s' \n",fname,cstk(l2));
                                return 0;
                        } 
                        if ( valueType != t2 ) if(strcmp(cstk(l2),"current_figure") != 0 && VarType(2) !=1 )
                        {  
                                /* F.Leray : special unique case here set("current_figure", HANDLE);*/
                                /* HANDLE type is 9 */
-                               Scierror(999,"%s: uncompatible values for property type  '%s' \r\n",fname,cstk(l2));
+                               Scierror(999,"%s: uncompatible values for property type  '%s' \n",fname,cstk(l2));
                                return 0;
                        }
 
@@ -240,7 +240,7 @@ int sci_set(char *fname, unsigned long fname_len)
                        break;
 
          default:
-                 Scierror(999,"%s : invalid parameter(s).\r\n",fname);
+                 Scierror(999,"%s : invalid parameter(s).\n",fname);
                  endGraphicDataWriting();
                  return 0;
                  break;
@@ -252,7 +252,7 @@ int sci_set(char *fname, unsigned long fname_len)
                 pobj = sciGetPointerFromHandle(hdl);
                 if ( pobj == NULL )
                 {
-                        Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+                        Scierror(999,"%s :the handle is not or no more valid\n",fname);
                         endGraphicDataWriting();
                         return 0;
                 }
index b7668f3..d95616c 100644 (file)
@@ -27,7 +27,7 @@ int sci_swap_handles( char * fname, unsigned long fname_len )
 
   if ( firstHdlRow * firstHdlCol != 1 || secondHdlRow * secondHdlCol != 1 )
   {
-    Scierror(999,"%s : Routine can only swap two single handles.\r\n",fname);
+    Scierror(999,"%s : Routine can only swap two single handles.\n",fname);
     return 0 ;
   }
 
index cc2181a..3d38daa 100644 (file)
@@ -30,7 +30,7 @@ int sci_unglue(char *fname,unsigned long fname_len)
   pobj = sciGetPointerFromHandle(hdl);
   if (pobj == NULL)
   {
-    Scierror(999,"%s :the handle is not or no more valid\r\n",fname);
+    Scierror(999,"%s :the handle is not or no more valid\n",fname);
     return 0;
   }
   if (sciGetEntityType (pobj) == SCI_AGREG)
@@ -59,7 +59,7 @@ int sci_unglue(char *fname,unsigned long fname_len)
   }
   else
   {
-    Scierror(999,"%s: Object must be an Compound\r\n",fname);
+    Scierror(999,"%s: Object must be an Compound\n",fname);
   }
   return 0;
 }
index 4bfb0d4..bc03ea3 100644 (file)
@@ -31,12 +31,12 @@ int sci_xarcs(char *fname,unsigned long fname_len)
   GetRhsVar(1,MATRIX_OF_DOUBLE_DATATYPE,&m1,&n1,&l1);
   if ( strcmp(fname,"xarcs") == 0) {
     if (m1 != 6) {
-      Scierror(999,"%s: arcs has a wrong size (6,n) expected \r\n",fname);
+      Scierror(999,"%s: arcs has a wrong size (6,n) expected \n",fname);
       return 0;
     }
   } else {
     if (m1 != 4) {
-      Scierror(999,"%s: rects has a wrong size (4,n) expected \r\n",fname);
+      Scierror(999,"%s: rects has a wrong size (4,n) expected \n",fname);
       return 0;
     }
   }
@@ -49,7 +49,7 @@ int sci_xarcs(char *fname,unsigned long fname_len)
     GetRhsVar(2,MATRIX_OF_INTEGER_DATATYPE,&m2,&n2,&l2);
     CheckVector(2,m2,n2);
     if (m2 * n2 != n1) {
-      Scierror(999,"%s: first and second arguments have incompatible length\r\n",fname);
+      Scierror(999,"%s: first and second arguments have incompatible length\n",fname);
       return 0;
     }
   }
index 52cc917..dd23e76 100644 (file)
@@ -34,7 +34,7 @@ int sci_xarrows(char *fname,unsigned long fname_len)
     GetRhsVar(4,MATRIX_OF_INTEGER_DATATYPE,&m4,&n4,&l4); CheckVector(4,m4,n4);
     if (m4 * n4 == 1) dstyle = *istk(l4);
     if (m4 * n4 != 1 && m2 * n2 / 2 != m4 * n4) {
-      Scierror(999,"%s: style has a wrong size (%d), expecting (%d)\r\n",fname,m4*n4, m2 * n2 / 2 );
+      Scierror(999,"%s: style has a wrong size (%d), expecting (%d)\n",fname,m4*n4, m2 * n2 / 2 );
       return 0;
     }
   }
index 7041119..bdf5424 100644 (file)
@@ -33,7 +33,7 @@ int sci_xclea( char *fname,unsigned long fname_len )
     
     break;
   default :
-    Scierror(999,"%s: wrong number of rhs argumens (%d), rhs must be 1 or 4\r\n",fname,Rhs);
+    Scierror(999,"%s: wrong number of rhs argumens (%d), rhs must be 1 or 4\n",fname,Rhs);
   }
   LhsVar(1)=0;
   return 0;
index 7c02d1b..64685f5 100644 (file)
@@ -29,7 +29,7 @@ int sci_xfarcs( char * fname, unsigned long fname_len )
 
   GetRhsVar(1,MATRIX_OF_DOUBLE_DATATYPE,&m1,&n1,&l1);
   if (m1 != 6) {
-    Scierror(999,"%s: arcs has a wrong size (6,n) expected \r\n",fname);
+    Scierror(999,"%s: arcs has a wrong size (6,n) expected \n",fname);
     return 0;
   }
 
@@ -37,7 +37,7 @@ int sci_xfarcs( char * fname, unsigned long fname_len )
     GetRhsVar(2,MATRIX_OF_INTEGER_DATATYPE,&m2,&n2,&l2);
     CheckVector(2,m2,n2);
     if ( n1 != m2*n2) {
-      Scierror(999,"%s: arguments have incompatible size\r\n",fname);
+      Scierror(999,"%s: arguments have incompatible size\n",fname);
       return 0;
     }
   }
index aa120e5..906dd1c 100644 (file)
@@ -47,7 +47,7 @@ int sci_xfpolys( char *fname, unsigned long fname_len )
 
       if ( m3 != 3 && m3 != 4 ) 
       {
-        Scierror(999,"%s: interpolated shading only works for polygons of size 3 or 4\r\n",fname);
+        Scierror(999,"%s: interpolated shading only works for polygons of size 3 or 4\n",fname);
         return 0;
       }
     } else
index c1fecad..c014d3d 100644 (file)
@@ -44,7 +44,7 @@ int sci_xpoly( char * fname, unsigned long fname_len )
       strcpy(C2F(cha1).buf,"xmarks"); 
       mark=0; /* NG */
     } else {
-      Scierror(999,"%s:  dtype must be \"lines\" or \"marks\"\r\n",fname);
+      Scierror(999,"%s:  dtype must be \"lines\" or \"marks\"\n",fname);
       return 0;
     } 
   }
index 9c70e29..52378b6 100644 (file)
@@ -91,7 +91,7 @@ int sci_xrect( char *fname, unsigned long fname_len )
     }
     break;
   default :
-    Scierror(999,"%s: wrong number of rhs argumens (%d), rhs must be 1 or 4\r\n",fname,Rhs);
+    Scierror(999,"%s: wrong number of rhs argumens (%d), rhs must be 1 or 4\n",fname,Rhs);
     break ;
   }
 
index ee873dc..cac0121 100644 (file)
@@ -29,7 +29,7 @@ int sci_xrects( char *fname, unsigned long fname_len )
   GetRhsVar(1,MATRIX_OF_DOUBLE_DATATYPE,&m1,&n1,&l1);
 
   if (m1 != 4) {
-    Scierror(999,"%s: rects has a wrong size (4,n) expected \r\n",fname);
+    Scierror(999,"%s: rects has a wrong size (4,n) expected \n",fname);
     return 0;
   }
 
@@ -39,7 +39,7 @@ int sci_xrects( char *fname, unsigned long fname_len )
     GetRhsVar(2,MATRIX_OF_INTEGER_DATATYPE,&m2,&n2,&l2);
     CheckVector(2,m2,n2);
     if (m2 * n2 != n1) {
-      Scierror(999,"%s: first and second arguments have incompatible length\r\n",fname);
+      Scierror(999,"%s: first and second arguments have incompatible length\n",fname);
       return 0;
     }
   }
index dcb38ed..dfd41d2 100644 (file)
@@ -32,7 +32,7 @@ int sci_xs2bmp( char * fname, unsigned long fname_len )
     }
     else
     {
-      Scierror(999,"%s: First Argument. Must be >=0.\r\n",fname);
+      Scierror(999,"%s: First Argument. Must be >=0.\n",fname);
       return 0;
     }
 
@@ -41,18 +41,18 @@ int sci_xs2bmp( char * fname, unsigned long fname_len )
   {
     if ( IsAScalar(1) )
     {
-      Scierror(999,"%s: First Argument. Must be a integer scalar.\r\n",fname);
+      Scierror(999,"%s: First Argument. Must be a integer scalar.\n",fname);
       return 0;
     }
     if ( GetType(2) != sci_strings)
     {
-      Scierror(999,"%s: Second Argument. Must be a string.\r\n",fname);
+      Scierror(999,"%s: Second Argument. Must be a string.\n",fname);
       return 0;
     }
   }
 
 #else
-  sciprint("%s: Only for Windows.\r\n",fname);
+  sciprint("%s: Only for Windows.\n",fname);
   bOK=0;
 #endif
   return bOK;
index 394da55..446f630 100644 (file)
@@ -36,7 +36,7 @@ int sci_xs2emf( char * fname, unsigned long fname_len )
     }
     else
     {
-      Scierror(999,"%s: First Argument. Must be >=0.\r\n",fname);
+      Scierror(999,"%s: First Argument. Must be >=0.\n",fname);
       return 0;
     }
 
@@ -45,18 +45,18 @@ int sci_xs2emf( char * fname, unsigned long fname_len )
   {
     if ( IsAScalar(1) )
     {
-      Scierror(999,"%s: First Argument. Must be a integer scalar.\r\n",fname);
+      Scierror(999,"%s: First Argument. Must be a integer scalar.\n",fname);
       return 0;
     }
     if ( GetType(2) != sci_strings)
     {
-      Scierror(999,"%s: Second Argument. Must be a string.\r\n",fname);
+      Scierror(999,"%s: Second Argument. Must be a string.\n",fname);
       return 0;
     }
   }
 
 #else
-  sciprint("%s: Only for Windows.\r\n",fname);
+  sciprint("%s: Only for Windows.\n",fname);
   bOK=0;
 #endif
   return bOK;
index 4eb6b06..6e30e34 100644 (file)
@@ -36,7 +36,7 @@ int sci_xsegs(char *fname,unsigned long fname_len)
     GetRhsVar(3,MATRIX_OF_INTEGER_DATATYPE,&m3,&n3,&l3); CheckVector(3,m3,n3);
     if (m3 * n3 == 1) dstyle = *istk(l3 );
     if (m3 * n3 != 1 && m2 * n2 / 2 != m3 * n3) {
-      Scierror(999,"%s: style has a wrong size (%d), expecting (%d)\r\n",fname,m3 * n3, m2 * n2 / 2);
+      Scierror(999,"%s: style has a wrong size (%d), expecting (%d)\n",fname,m3 * n3, m2 * n2 / 2);
       return 0;
     }
   }
index 4bff60b..8f68d19 100644 (file)
@@ -63,7 +63,7 @@ int sci_xset( char *fname, unsigned long fname_len )
   /* Bloque la commande xset('window') sans numero de fenetre */
   if (Rhs == 1 && (strcmp(cstk(l1),"window") == 0) )
   {
-    sciprint("xset(\"window\",window-number): window-number must be set\r\n");
+    sciprint("xset(\"window\",window-number): window-number must be set\n");
     LhsVar(1)=0; return 0;
   }
 
@@ -307,7 +307,7 @@ int C2F(xsetg)(char * str,char * str1,integer lx0,integer lx1)
   }
   else 
   {
-    sciprint("xset(arg,<string>): Unrecognized arg: %s\r\n",str);
+    sciprint("xset(arg,<string>): Unrecognized arg: %s\n",str);
   }
   return 0;
 }
index 9ec12bc..9af1de4 100644 (file)
@@ -56,7 +56,7 @@ int sci_xstringb(char *fname,unsigned long fname_len)
     } 
     else
     {
-      Scierror(999,"%s: optional argument has a wrong value 'fill' expected\r\n",
+      Scierror(999,"%s: optional argument has a wrong value 'fill' expected\n",
         fname);
       return 0;
     }
index 46e0d89..cc355ef 100644 (file)
@@ -14,7 +14,7 @@
 /*-----------------------------------------------------------------------------------*/
 int sci_xtape( char *fname,unsigned long fname_len )
 {
-  Scierror(999,"xtape routine was only available with old graphic mode.\r\n");
+  Scierror(999,"xtape routine was only available with old graphic mode.\n");
   return -1 ;
 }
 /*-----------------------------------------------------------------------------------*/
index 3ce346a..9775e74 100644 (file)
@@ -140,7 +140,7 @@ void scig_loadsg(int win_num, char *filename)
   C2F(syncexec)(macroCall,&macroCallLength,&ierr,&seq, macroCallLength );
 
   FREE( macroCall ) ;
-  if(ierr != 0) { sciprint("Wrong plot file : %s\r\n",filename) ; }
+  if(ierr != 0) { sciprint("Wrong plot file : %s\n",filename) ; }
 
   sciSetUsedWindow(curFigId);
 
index 69c986e..d861999 100644 (file)
@@ -378,7 +378,7 @@ int C2F(contourif)(double *x, double *y, double *z, integer *n1, integer *n2, in
     {
       if ( ( zconst = MALLOC( (*nz) * sizeof(double) ) ) == 0 ) 
        {
-         sciprint("Running out of memory\r\n");
+         sciprint("Running out of memory\n");
          return 0;
        }
       for ( i =0 ; i < *nz ; i++) 
index 2275d01..e131685 100644 (file)
@@ -275,8 +275,8 @@ static void graduate1(double *xmi, double *xma, double *xi, double *xa, integer
       xma1 = *xmi+exp10((double) - iexp);
       if ( count > 1 ) 
        {
-         sciprint("Internal Error: Loop in graduate1 \r\n");
-         sciprint("Please send a Bug report to scilab@inria.fr\r\n");
+         sciprint("Internal Error: Loop in graduate1 \n");
+         sciprint("Please send a Bug report to scilab@inria.fr\n");
        }
       graduate1(&xmi1,&xma1,xi,xa,np1,np2,kminr,kmaxr,ar,count+1);
       return;
@@ -975,7 +975,7 @@ int ComputeC_format(sciPointObj * pobj, char * c_format)
     }
     break;
   default: 
-    sciprint("Sci_Axis: wrong type argument xy_type\r\n");
+    sciprint("Sci_Axis: wrong type argument xy_type\n");
   }
   switch (pos ) 
   {
index 34d5d9e..810de55 100644 (file)
@@ -31,7 +31,7 @@ int get_style_arg(char *fname,int pos, int n1,rhs_opts opts[], int ** style )
            GetRhsVar(pos,MATRIX_OF_INTEGER_DATATYPE, &m, &n, &l);
            if (m * n < n1)
       {
-             Scierror(999,"%s: style is too small (%d < %d)\r\n",fname,m*n,n1);
+             Scierror(999,"%s: style is too small (%d < %d)\n",fname,m*n,n1);
              return 0;
            }
            if ( n1 == 1 && m * n == 1 )
@@ -64,7 +64,7 @@ int get_style_arg(char *fname,int pos, int n1,rhs_opts opts[], int ** style )
     GetRhsVar(kopt,MATRIX_OF_INTEGER_DATATYPE, &m, &n, &l);
     if (m * n < n1)
     {
-      Scierror(999,"%s: style is too small (%d < %d)\r\n",fname,m*n,n1);
+      Scierror(999,"%s: style is too small (%d < %d)\n",fname,m*n,n1);
       return 0;
     }
     if (n1==1&&m*n==1)
@@ -105,14 +105,14 @@ int get_rect_arg(char *fname,int pos,rhs_opts opts[], double ** rect )
       if (VarType(pos)) {
        GetRhsVar(pos,MATRIX_OF_DOUBLE_DATATYPE, &m, &n, &l);
        if (m * n != 4) { 
-         Scierror(999,"%s: rect has wrong size (%d), 4 expected \r\n",fname,m*n); 
+         Scierror(999,"%s: rect has wrong size (%d), 4 expected \n",fname,m*n); 
          return 0;
        }
        *rect = stk(l);
        
        for(i=0;i<4;i++)
          if(finite((*rect)[i]) == 0){
-           Scierror(999,"%s: rect has Nan or Inf values, 4 finite values expected \r\n",fname,m*n); 
+           Scierror(999,"%s: rect has Nan or Inf values, 4 finite values expected \n",fname,m*n); 
            return 0;
          }
       }
@@ -127,14 +127,14 @@ int get_rect_arg(char *fname,int pos,rhs_opts opts[], double ** rect )
   else if ((kopt=FindOpt("rect",opts))) {/* named argument: rect=value */
     GetRhsVar(kopt,MATRIX_OF_DOUBLE_DATATYPE, &m, &n, &l);
     if (m * n != 4) { 
-      Scierror(999,"%s: rect has wrong size (%d), 4 expected \r\n",fname,m*n); 
+      Scierror(999,"%s: rect has wrong size (%d), 4 expected \n",fname,m*n); 
       return 0;
     }
     *rect = stk(l);
     
     for(i=0;i<4;i++)
       if(finite((*rect)[i]) == 0){
-       Scierror(999,"%s: rect has Nan or Inf values, 4 finite values expected \r\n",fname,m*n); 
+       Scierror(999,"%s: rect has Nan or Inf values, 4 finite values expected \n",fname,m*n); 
        return 0;
       }
   }
@@ -160,7 +160,7 @@ int get_strf_arg(char *fname,int pos,rhs_opts opts[], char ** strf )
            GetRhsVar(pos,STRING_DATATYPE, &m, &n, &l);
            if ( m * n != 3 )
       { 
-             Scierror(999,"%s: strf has wrong size (%d), 3 expected \r\n",fname,m*n); 
+             Scierror(999,"%s: strf has wrong size (%d), 3 expected \n",fname,m*n); 
              return 0;
            }
          *strf = cstk(l); 
@@ -177,7 +177,7 @@ int get_strf_arg(char *fname,int pos,rhs_opts opts[], char ** strf )
     GetRhsVar(kopt,STRING_DATATYPE, &m, &n, &l);
     if (m * n != 3)
     { 
-      Scierror(999,"%s: strf has wrong size (%d), 3 expected \r\n",fname,m*n); 
+      Scierror(999,"%s: strf has wrong size (%d), 3 expected \n",fname,m*n); 
       return 0;
     }
     *strf = cstk(l); 
@@ -326,7 +326,7 @@ int get_zminmax_arg(char *fname,int pos,rhs_opts opts[], double ** zminmax )
       if (VarType(pos)) {
         GetRhsVar(pos,MATRIX_OF_DOUBLE_DATATYPE, &m, &n, &l);
        if (m * n != 2) { 
-         Scierror(999,"%s: zminmax has wrong size (%d), 2 expected \r\n",fname,m*n); 
+         Scierror(999,"%s: zminmax has wrong size (%d), 2 expected \n",fname,m*n); 
          return 0;
        }
        *zminmax = stk(l); 
@@ -342,7 +342,7 @@ int get_zminmax_arg(char *fname,int pos,rhs_opts opts[], double ** zminmax )
   else if ((kopt=FindOpt("zminmax",opts))) {/* named argument: rect=value */
     GetRhsVar(kopt,MATRIX_OF_DOUBLE_DATATYPE, &m, &n, &l);
     if (m * n != 2) { 
-      Scierror(999,"%s: zminmax has wrong size (%d), 2 expected \r\n",fname,m*n); 
+      Scierror(999,"%s: zminmax has wrong size (%d), 2 expected \n",fname,m*n); 
       return 0;
     }
     *zminmax = stk(l); 
@@ -478,7 +478,7 @@ int get_logflags_arg(char *fname,int pos,rhs_opts opts[], char ** logFlags )
            GetRhsVar(pos,STRING_DATATYPE, &m, &n, &l);
            if ((m * n != 2)&&(m * n != 3))
       {
-             Scierror(999,"%s: logflag has wrong size (%d), expected 2 or 3\r\n",fname,m*n);
+             Scierror(999,"%s: logflag has wrong size (%d), expected 2 or 3\n",fname,m*n);
              return 0;
            }
            if (m * n == 2)
@@ -518,7 +518,7 @@ int get_logflags_arg(char *fname,int pos,rhs_opts opts[], char ** logFlags )
     GetRhsVar(kopt,STRING_DATATYPE, &m, &n, &l);
     if ((m * n != 2)&&(m * n != 3))
     {
-      Scierror(999,"%s: logflag has wrong size (%d), expected 2 or 3\r\n",fname,m * n);
+      Scierror(999,"%s: logflag has wrong size (%d), expected 2 or 3\n",fname,m * n);
       return 0;
     }
     if (m * n == 2)
index 901ead1..d77b4f6 100644 (file)
@@ -522,7 +522,7 @@ sciGetForegroundToDisplay (sciPointObj * pobj)
     case SCI_SBH:              /* pas de context graphics */
     case SCI_SBV:              /* pas de context graphics */
     default:
-      sciprint ("\r\nNo Foreground is associated with this Entity");
+      sciprint ("\nNo Foreground is associated with this Entity");
       return -1;
       break;
     }
@@ -688,7 +688,7 @@ sciGetBackgroundToDisplay (sciPointObj * pobj)
     case SCI_AGREG:
        case SCI_UIMENU:
     default:
-      sciprint ("\r\nNo Background is associated with this Entity");
+      sciprint ("\nNo Background is associated with this Entity");
       return -1;
       break;
     }
@@ -818,7 +818,7 @@ sciGetMarkForegroundToDisplay (sciPointObj * pobj)
     case SCI_SBV:              /* pas de context graphics */
        case SCI_UIMENU:
     default:
-      sciprint ("\r\nNo Mark Foreground is associated with this Entity");
+      sciprint ("\nNo Mark Foreground is associated with this Entity");
       return -1;
       break;
     }
@@ -951,7 +951,7 @@ sciGetMarkBackgroundToDisplay (sciPointObj * pobj)
     case SCI_SBH:              /* pas de context graphics */
     case SCI_SBV:              /* pas de context graphics */
     default:
-      sciprint ("\r\nNo Mark Background is associated with this Entity");
+      sciprint ("\nNo Mark Background is associated with this Entity");
       return -1;
       break;
     }
@@ -1861,7 +1861,7 @@ sciGetFontBackgroundToDisplay (sciPointObj * pobj)
     case SCI_AGREG:
        case SCI_UIMENU:
     default:
-       sciprint ("\r\nNo FontBackground is associated with this Entity");
+       sciprint ("\nNo FontBackground is associated with this Entity");
       return -1;
       break;
     }
@@ -1961,7 +1961,7 @@ sciGetFontForegroundToDisplay (sciPointObj * pobj)
     case SCI_AGREG:
        case SCI_UIMENU:
     default:
-      sciprint ("\r\nNo FontForeground is associated with this Entity");
+      sciprint ("\nNo FontForeground is associated with this Entity");
       return -1;
       break;
     }
@@ -2895,7 +2895,7 @@ sciGetZooming (sciPointObj * pobj)
        case SCI_UIMENU:
     case SCI_LABEL: /* F.Leray 28.05.04 */
     default:
-      sciprint ("\r\nThis object cannot be zoomed. \r\n");
+      sciprint ("\nThis object cannot be zoomed. \n");
       return FALSE;
       break;
     }
@@ -2940,7 +2940,7 @@ sciGetXorMode (sciPointObj * pobj)
     case SCI_LABEL: /* F.Leray 28.05.04 */
        case SCI_UIMENU:
     default:
-      sciprint ("\r\nNothing to do\n");
+      sciprint ("\nNothing to do\n");
       return FALSE;
       break;
     }
@@ -3718,7 +3718,7 @@ double *sciGetPoint(sciPointObj * pthis, int *numrow, int *numcol)
         }
       }
       else {
-       sciprint("Impossible case: champ object is now treated as a tlist. See set/getchampdata\r\n");
+       sciprint("Impossible case: champ object is now treated as a tlist. See set/getchampdata\n");
        return (double *) NULL;
       }
       return (double*)tab;
index 05dd3ef..583a5e5 100644 (file)
@@ -616,7 +616,7 @@ int sciRelocateHandles( unsigned long handles[], int nbHandles, unsigned long ne
   /* check parent */
   if ( parentObj == NULL )
   {
-    Scierror( 999,"The parent handle is not or no more valid.\r\n" ) ;
+    Scierror( 999,"The parent handle is not or no more valid.\n" ) ;
     return -1 ;
   }
 
@@ -624,7 +624,7 @@ int sciRelocateHandles( unsigned long handles[], int nbHandles, unsigned long ne
   movedObjs = MALLOC( nbHandles * sizeof(sciPointObj *) ) ;
   if ( movedObjs == NULL )
   {
-    Scierror(999,"Memory full, aborting operation.\r\n") ;
+    Scierror(999,"Memory full, aborting operation.\n") ;
     return -1 ;
   }
 
@@ -637,14 +637,14 @@ int sciRelocateHandles( unsigned long handles[], int nbHandles, unsigned long ne
     /* check handle validity */
     if ( movedObjs[i] == NULL )
     {
-       Scierror(999,"Handle number %d is not or no more valid.\r\n", i + 1  ) ;
+       Scierror(999,"Handle number %d is not or no more valid.\n", i + 1  ) ;
        FREE( movedObjs ) ;
        return -1 ;
     }
     /* check that handles can be inserted under the parent */
     if ( !sciCanBeSonOf( movedObjs[i], parentObj ) )
     {
-      Scierror(999,"Handle number %d is not compatible with the parent handle.\r\n", i + 1 ) ;
+      Scierror(999,"Handle number %d is not compatible with the parent handle.\n", i + 1 ) ;
       FREE( movedObjs ) ;
       return -1 ;
     }
@@ -712,13 +712,13 @@ int sciSwapObjects( sciPointObj * firstObject, sciPointObj * secondObject )
   /* check compatibility of the objects with new parents */
   if ( !sciCanBeSonOf( firstObject, sciGetParent( secondObject ) ) )
   {
-    Scierror(999,"First handle is not compatible with its new parent.\r\n" ) ;
+    Scierror(999,"First handle is not compatible with its new parent.\n" ) ;
     return -1 ;
   }
   
   if ( !sciCanBeSonOf( secondObject, sciGetParent( firstObject ) ) )
   {
-    Scierror(999,"Second handle is not compatible with its new parent.\r\n" ) ;
+    Scierror(999,"Second handle is not compatible with its new parent.\n" ) ;
     return -1 ;
   }
 
@@ -728,12 +728,12 @@ int sciSwapObjects( sciPointObj * firstObject, sciPointObj * secondObject )
   /* check if the sons are correct. This should always be true. */
   if ( firstSon == NULL )
   {
-    Scierror( 999,"First object is not correctly placed in the hierarchy.\r\n" ) ;
+    Scierror( 999,"First object is not correctly placed in the hierarchy.\n" ) ;
     return -1 ;
   }
   if ( secondSon == NULL )
   {
-    Scierror( 999,"Second object is not correctly placed in the hierarchy.\r\n" ) ;
+    Scierror( 999,"Second object is not correctly placed in the hierarchy.\n" ) ;
     return -1 ;
   }
 
@@ -766,13 +766,13 @@ int swapHandles( unsigned long firstHdl, unsigned long secondHdl )
   
   if ( firstObject == NULL )
   {
-    Scierror( 999,"First handle is not or no more valid.\r\n" ) ;
+    Scierror( 999,"First handle is not or no more valid.\n" ) ;
     return -1 ;
   }
 
   if ( secondObject == NULL )
   {
-     Scierror( 999,"Second handle is not or no more valid.\r\n" ) ;
+     Scierror( 999,"Second handle is not or no more valid.\n" ) ;
     return -1 ;
   }
 
index b72db9d..aa14d7e 100644 (file)
@@ -161,7 +161,7 @@ sciAddCallback (sciPointObj * pthis,char *code, int len, int mevent )
     case SCI_LABEL: /* F.Leray 28.05.04 */
        
     default:
-      sciprint ("\r\n No Callback is associated with this Entity");
+      sciprint ("\n No Callback is associated with this Entity");
       return -1;
       break;
     }
@@ -224,7 +224,7 @@ char *sciGetCallback(sciPointObj * pthis)
     case SCI_AGREG:
     case SCI_LABEL: /* F.Leray 28.05.04 */
     default:
-      sciprint ("\r\nNo Callback is associetad with this Entity");
+      sciprint ("\nNo Callback is associetad with this Entity");
       return (char *)NULL;
       break;
     }
@@ -282,7 +282,7 @@ int sciGetCallbackMouseEvent(sciPointObj * pthis)
     case SCI_AGREG:
     case SCI_LABEL: /* F.Leray 28.05.04 */
     default:
-      sciprint ("\r\nNo Callback is associated with this Entity");
+      sciprint ("\nNo Callback is associated with this Entity");
       return 100;
       break;
     }
@@ -340,7 +340,7 @@ int sciSetCallbackMouseEvent(sciPointObj * pthis, int mevent)
     case SCI_UIMENU:
     case SCI_LABEL: /* F.Leray 28.05.04 */
     default:
-      sciprint ("\r\nNo Callback is associated with this Entity");
+      sciprint ("\nNo Callback is associated with this Entity");
       return 100;
       break;
     }
@@ -398,7 +398,7 @@ sciGetCallbackLen (sciPointObj * pthis)
     case SCI_AGREG:
     case SCI_LABEL: /* F.Leray 28.05.04 */
     default:
-      sciprint ("\r\nNo Callback is associated with this Entity");
+      sciprint ("\nNo Callback is associated with this Entity");
       return -1;
       break;
     }
@@ -477,7 +477,7 @@ sciDelCallback (sciPointObj * pthis)
     case SCI_AGREG:
     case SCI_LABEL: /* F.Leray 28.05.04 */
     default:
-      sciprint ("\r\nNo Callback is associated with this Entity");
+      sciprint ("\nNo Callback is associated with this Entity");
       return -1;
       break;
     }
@@ -514,7 +514,7 @@ sciExecCallback (sciPointObj * pthis)
          LhsVar(1) = 0; 
          return 0;
        }
-      else sciprint ("\r\nNo Callback is associated with this Entity");
+      else sciprint ("\nNo Callback is associated with this Entity");
       return 0;
       break;
     case SCI_TEXT:
@@ -534,7 +534,7 @@ sciExecCallback (sciPointObj * pthis)
     case SCI_LABEL: /* F.Leray 28.05.04 */
     case SCI_UIMENU:
     default:
-      sciprint ("\r\nNo Callback is associated with this Entity");
+      sciprint ("\nNo Callback is associated with this Entity");
       return -1;
       break;
     }
@@ -704,7 +704,7 @@ int Objmove (long *hdl, double *d, int m,BOOL opt)
     case SCI_LEGEND:
     case SCI_UIMENU:
     default:
-      sciprint ("This object can not be moved\r\n");
+      sciprint ("This object can not be moved\n");
       return -1;
       break;
     }    
index 666a5f9..e66eef8 100644 (file)
@@ -383,13 +383,13 @@ static void show_scales __PARAMS((ScaleList *listptr));
 
 void ShowScales( void )
 { 
-  sciprint("-----------scales-------------\r\n");
+  sciprint("-----------scales-------------\n");
   show_scales(The_List);
-  sciprint("----------current scale-------\r\n");
-  sciprint("\tsubwin=[%5.2f,%5.2f,%5.2f,%5.2f], flag=%d\r\n",
+  sciprint("----------current scale-------\n");
+  sciprint("\tsubwin=[%5.2f,%5.2f,%5.2f,%5.2f], flag=%d\n",
           Cscale.subwin_rect[0],Cscale.subwin_rect[1],Cscale.subwin_rect[2],Cscale.subwin_rect[3],
           Cscale.flag);
-  sciprint("-----------end----------------\r\n");
+  sciprint("-----------end----------------\n");
 }
 
 static void show_scales(listptr)
@@ -398,10 +398,10 @@ static void show_scales(listptr)
   if (listptr != (ScaleList  *) NULL)
     { 
       WCScaleList *loc = listptr->scales;
-      sciprint("Window %d \r\n",listptr->Win);
+      sciprint("Window %d \n",listptr->Win);
       while ( loc != NULL) 
        {
-         sciprint("\tsubwin=[%5.2f,%5.2f,%5.2f,%5.2f], flag=%d\r\n",
+         sciprint("\tsubwin=[%5.2f,%5.2f,%5.2f,%5.2f], flag=%d\n",
                   loc->subwin_rect[0],loc->subwin_rect[1],loc->subwin_rect[2],loc->subwin_rect[3],
                   loc->flag);
          loc = loc->next ;
@@ -807,7 +807,7 @@ int C2F(xechelle2d)(double x[], integer x1[], integer *  n1,char dir[],integer l
       for ( i=0 ; i < (*n1) ; i++) x[i]= exp10(XPi2R( x1[i]));
   }
   else 
-    sciprint(" Wrong dir %s argument in echelle2d\r\n",dir);
+    sciprint(" Wrong dir %s argument in echelle2d\n",dir);
 
   return(0);
 }
@@ -832,7 +832,7 @@ int C2F(yechelle2d)(double y[], integer yy1[], integer * n2,char dir[], integer
       for ( i=0 ; i < (*n2) ; i++)  y[i]= exp10(YPi2R( yy1[i]));
   }
   else 
-    sciprint(" Wrong dir %s argument in echelle2d\r\n",dir); 
+    sciprint(" Wrong dir %s argument in echelle2d\n",dir); 
 
   return(0);
 }
@@ -897,7 +897,7 @@ void C2F(echelle2dl)( double    x[]  ,
        }
     }
   else 
-    sciprint(" Wrong dir %s argument in echelle2d\r\n",dir);
+    sciprint(" Wrong dir %s argument in echelle2d\n",dir);
 }
 
 /** meme chose mais pour transformer des ellipses **/
@@ -931,7 +931,7 @@ void C2F(ellipse2d)( double x[], integer x1[], integer * n, char * dir)
        }
     }
   else 
-    sciprint(" Wrong dir %s argument in echelle2d\r\n",dir);
+    sciprint(" Wrong dir %s argument in echelle2d\n",dir);
 }
 
 /** meme chose mais pour transformer des rectangles **/
@@ -995,7 +995,7 @@ void C2F(rect2d)( double x[], integer x1[], integer * n, char * dir)
        }
     }
   else 
-    sciprint(" Wrong dir %s argument in echelle2d\r\n",dir);
+    sciprint(" Wrong dir %s argument in echelle2d\n",dir);
 }
 
  
index 1b6cee1..fb1e80e 100644 (file)
@@ -2856,7 +2856,7 @@ int sciInitZooming( sciPointObj * pobj, BOOL value )
     case SCI_LABEL: /* F.Leray 28.05.04 */
     case SCI_UIMENU:
     default:
-      sciprint ("\r\nThis object cannot be zoomed\r\n");
+      sciprint ("\nThis object cannot be zoomed\n");
       return -1 ;
       break;
     }
@@ -2892,7 +2892,7 @@ sciSetDefaultValues (void)
       (sciInitGraphicMode (sciGetCurrentFigure()) == -1) ||
       (sciInitFontContext (sciGetCurrentFigure()) == -1)) /* Adding F.Leray 13.04.04 to have the completed init.*/
   {
-    sciprint("\r\n default values cant not be loaded !");
+    sciprint("\n default values cant not be loaded !");
     return -1 ;
   }
   return 0;
@@ -2929,7 +2929,7 @@ int sciInitXorMode( sciPointObj * pobj, int value )
     case SCI_LABEL: /* F.Leray 28.05.04 */
     case SCI_UIMENU:
     default:
-      sciprint ("\r\nNothing to do\n");
+      sciprint ("\nNothing to do\n");
       return -1 ;
       break;
     }
index c2a0a3c..06571ec 100644 (file)
@@ -32,7 +32,7 @@ AssignedList * createTlistForTicks( void )
     /* labels should also be an empty matrix */
     if ( !isListCurrentElementEmptyMatrix( tlist ) )
     {
-      sciprint( "Ticks location and label vectors must have the same size.\r\n" ) ;
+      sciprint( "Ticks location and label vectors must have the same size.\n" ) ;
       return NULL ;
     }  
   }
@@ -48,7 +48,7 @@ AssignedList * createTlistForTicks( void )
 
     if ( nbRowLoc != nbRowLab || nbColLoc != nbColLab )
     {
-      sciprint( "Ticks location and label vectors must have the same size.\r\n" ) ;
+      sciprint( "Ticks location and label vectors must have the same size.\n" ) ;
       return NULL ;
     }
   }
index 7223811..8fec248 100644 (file)
@@ -45,7 +45,7 @@ int setchampdata( sciPointObj * pobj, AssignedList * tlist )
   /* check dim */
   if ( nbCol[0] != 1 || nbCol[1] != 1 )
   {
-    sciprint("Inside the Tlist : the first argument must be columns vectors\r\n") ;
+    sciprint("Inside the Tlist : the first argument must be columns vectors\n") ;
     FREE( vx  ) ;
     FREE( vy  ) ;
     FREE( vfx ) ;
@@ -56,7 +56,7 @@ int setchampdata( sciPointObj * pobj, AssignedList * tlist )
 
   if ( nbRow[2] != nbRow[0] || nbCol[2] != nbRow[1] || nbRow[3] != nbRow[2] || nbCol[3] != nbCol[2] )
   {
-    sciprint( "Inside the Tlist : incompatible length in the third and/or fourth argument(s)\r\n" ) ;
+    sciprint( "Inside the Tlist : incompatible length in the third and/or fourth argument(s)\n" ) ;
     FREE( vx  ) ;
     FREE( vy  ) ;
     FREE( vfx ) ;
@@ -112,7 +112,7 @@ int setgrayplotdata( sciPointObj * pobj, AssignedList * tlist )
 
   if ( nbCol[0] != 1 || nbCol[1] != 1 )
   {
-    sciprint("the Tlist : the first argument must be columns vectors\r\n" ) ;
+    sciprint("the Tlist : the first argument must be columns vectors\n" ) ;
     FREE( pvecx ) ;
     FREE( pvecy ) ;
     FREE( pvecz ) ;
@@ -121,7 +121,7 @@ int setgrayplotdata( sciPointObj * pobj, AssignedList * tlist )
 
   if ( nbRow[2] != nbRow[0] || nbCol[2] != nbRow[1] )
   {
-    sciprint("the Tlist : incompatible length in the third argument\r\n" ) ;
+    sciprint("the Tlist : incompatible length in the third argument\n" ) ;
     FREE( pvecx ) ;
     FREE( pvecy ) ;
     FREE( pvecz ) ;
@@ -176,7 +176,7 @@ int set3ddata( sciPointObj * pobj, AssignedList * tlist )
   {
     if ( !(m1 == m2 && m2 == m3 && n1 == n2 && n2 == n3) )
     {
-      sciprint("Inside the Tlist (third argument): The three first arguments have incompatible length \r\n") ;
+      sciprint("Inside the Tlist (third argument): The three first arguments have incompatible length \n") ;
       return SET_PROPERTY_ERROR ;
     }
   }
@@ -184,17 +184,17 @@ int set3ddata( sciPointObj * pobj, AssignedList * tlist )
   {
     if ( m2 * n2 != n3 )
     {
-      sciprint( "Inside the Tlist (third argument): The second and third arguments have incompatible length\r\n" ) ;
+      sciprint( "Inside the Tlist (third argument): The second and third arguments have incompatible length\n" ) ;
       return SET_PROPERTY_ERROR ;
     }
     if ( m1 * n1 != m3 )
     {
-      sciprint( "Inside the Tlist (third argument): The first and third arguments have incompatible length\r\n");
+      sciprint( "Inside the Tlist (third argument): The first and third arguments have incompatible length\n");
       return SET_PROPERTY_ERROR ;
     }
     if ( m1 * n1 <= 1 || m2 * n2 <= 1 ) 
     {
-      sciprint( "Inside the Tlist (third argument):The first and second arguments should be of size >= 2\r\n");
+      sciprint( "Inside the Tlist (third argument):The first and second arguments should be of size >= 2\n");
       return SET_PROPERTY_ERROR ;
     }
   }
@@ -230,7 +230,7 @@ int set3ddata( sciPointObj * pobj, AssignedList * tlist )
   { /* case isfac=1;*/
     if( psurf->isfac != 1 )
     {
-      sciprint("Can not change the typeof3d of graphic object: its type is SCI_PLOT3D\r\n");
+      sciprint("Can not change the typeof3d of graphic object: its type is SCI_PLOT3D\n");
       return SET_PROPERTY_ERROR ;
     }
   }
@@ -239,7 +239,7 @@ int set3ddata( sciPointObj * pobj, AssignedList * tlist )
     /* case isfac=0;*/
     if(psurf->isfac != 0)
     {
-      sciprint("Can not change the typeof3d of graphic object: its type is SCI_FAC3D\r\n");
+      sciprint("Can not change the typeof3d of graphic object: its type is SCI_FAC3D\n");
       return SET_PROPERTY_ERROR ;
     }
   }
@@ -613,7 +613,7 @@ int set_data_property( sciPointObj * pobj, int stackPointer, int valueType, int
 
     if( !isParameterTlist( valueType ) )
     {
-      sciprint( "Incorrect argument, must be a Tlist!\r\n" ) ;
+      sciprint( "Incorrect argument, must be a Tlist!\n" ) ;
       return SET_PROPERTY_ERROR ;
     }
   
@@ -635,7 +635,7 @@ int set_data_property( sciPointObj * pobj, int stackPointer, int valueType, int
 
     if( !isParameterTlist( valueType ) )
     {
-      sciprint( "Incorrect argument, must be a Tlist!\r\n" ) ;
+      sciprint( "Incorrect argument, must be a Tlist!\n" ) ;
       return SET_PROPERTY_ERROR ;
     }
 
@@ -658,7 +658,7 @@ int set_data_property( sciPointObj * pobj, int stackPointer, int valueType, int
 
     if( !isParameterTlist( valueType ) )
     {
-      sciprint( "Incorrect argument, must be a Tlist!\r\n" ) ;
+      sciprint( "Incorrect argument, must be a Tlist!\n" ) ;
       return SET_PROPERTY_ERROR ;
     }
 
@@ -674,7 +674,7 @@ int set_data_property( sciPointObj * pobj, int stackPointer, int valueType, int
     }
     else
     {
-      sciprint("Error the tlist size must be equal to 4 or 5\r\n");
+      sciprint("Error the tlist size must be equal to 4 or 5\n");
       return SET_PROPERTY_ERROR ;
     }
 
index 73fd1ac..2d86fc1 100644 (file)
@@ -724,7 +724,7 @@ void Objplot3d ( char    * fname ,
   else
     {
       if ((hdltab = MALLOC (*n * sizeof (long))) == NULL) {
-       Scierror(999,"%s: No more memory available\r\n",fname);
+       Scierror(999,"%s: No more memory available\n",fname);
        return; 
       }
       for (i = 0; i < *n; ++i) { 
index e663ee0..e6f2e9d 100644 (file)
@@ -59,7 +59,7 @@ int scig_toPs( integer win_num, integer colored, char * bufname, char * driver )
 
   if( curFig == (sciPointObj *) NULL )
   {
-    Scierror(999,"No current graphic window %d found for exporting to %s\r\n",win_num,driver);
+    Scierror(999,"No current graphic window %d found for exporting to %s\n",win_num,driver);
     return ierr;
   }
 
index 0379873..863aa1b 100644 (file)
@@ -11,7 +11,7 @@
 /*-----------------------------------------------------------------------------------*/
 int C2F(gw_graphics)()
 {
-       Scierror(999,"Graphics interface not installed.\r\n");
+       Scierror(999,"Graphics interface not installed.\n");
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/
index f4f70c3..90031f4 100644 (file)
@@ -55,7 +55,7 @@ int C2F(sci_ClipBoard) _PARAMS((char *fname,unsigned long l))
                        }
                        else
                        {
-                               Scierror(999,"unknown first parameter.\r\n");
+                               Scierror(999,"unknown first parameter.\n");
                                return 0;
                        }
                }
@@ -296,10 +296,10 @@ int C2F(sci_ClipBoard) _PARAMS((char *fname,unsigned long l))
                }
                else
                {
-                       Scierror(999,"Only on Windows mode.\r\n");
+                       Scierror(999,"Only on Windows mode.\n");
                        return 0;
                }
-               Scierror(999,"Only on Windows mode.\r\n");
+               Scierror(999,"Only on Windows mode.\n");
                return 0;
        }
        return 0;
index 56bcf3c..95d640c 100644 (file)
@@ -57,7 +57,7 @@ int C2F(sci_setlookandfeel) _PARAMS((char *fname,unsigned long fname_len))
        }
        else
        {
-               Scierror(999,"invalid parameter.\r\n");
+               Scierror(999,"invalid parameter.\n");
        }
        return 0;
 }
index 7db7d6f..0c33f93 100644 (file)
@@ -12,7 +12,7 @@
 /*-----------------------------------------------------------------------------------*/
 int C2F(gw_gui)()
 {
-       Scierror(999,"GUI interface not installed.\r\n");
+       Scierror(999,"GUI interface not installed.\n");
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/
@@ -125,11 +125,11 @@ int XEvorgetchar(int interrupt){
 }
 /*-----------------------------------------------------------------------------------*/
 void main_sci (char *startup, int lstartup,int memory){
-       Scierror(999,"GUI interface not installed.\r\n");
+       Scierror(999,"GUI interface not installed.\n");
 }
 /*-----------------------------------------------------------------------------------*/
 void InitXsession(void){
-       Scierror(999,"GUI interface not installed.\r\n");
+       Scierror(999,"GUI interface not installed.\n");
 }
 /*-----------------------------------------------------------------------------------*/
 BOOL InitializeGUI(void)
index 864ef05..b426a92 100644 (file)
@@ -18,7 +18,7 @@ function ok = xmlfiletohtml(path,xsl,directory_language,default_language)
        if MSDOS then
          generate_cmd='sabcmd';
        else
-         generate_cmd='xsltproc';
+         generate_cmd='sabcmd';
        end
        
        [lhs,rhs] = argn(0);
index 8a8fb5a..86040a1 100644 (file)
@@ -111,7 +111,7 @@ msgid       "Dec"
 msgstr ""
 #
 # File: src/nohistory_manager/nohistory_manager.c, line: 14
-msgid  "history_manager interface not installed.\r\n"
+msgid  "history_manager interface not installed.\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_saveafterncommands.c, line: 48
index 537191d..0668685 100644 (file)
@@ -11,7 +11,7 @@
 /*-----------------------------------------------------------------------------------*/ 
 int C2F(gw_history_manager)()
 {
-       Scierror(999,"history_manager interface not installed.\r\n");
+       Scierror(999,"history_manager interface not installed.\n");
        return 0;
 }
 /*-----------------------------------------------------------------------------------*/ 
index f5bd2a5..0fbd891 100644 (file)
@@ -23,7 +23,7 @@ int ext14cI(char *fname)
   GetRhsVar( 3,MATRIX_OF_DOUBLE_DATATYPE, &m3, &n3, &l3);
   if ( m3*n3 != m2*n2) 
     {
-      sciprint("%s :Incompatible dimensions\r\n",fname);
+      sciprint("%s :Incompatible dimensions\n",fname);
       Error(999); return(0);
     }
   CreateVar( 4,MATRIX_OF_DOUBLE_DATATYPE, &m2, &n2, &l4);
index dbd46ac..815c1c3 100644 (file)
@@ -23,7 +23,7 @@ int intmatmul(fname)
   CreateVar(3,MATRIX_OF_DOUBLE_DATATYPE, &m1, &n2, &l3);   /* m1 and n2 are input parameters */
 
   /* Check dimensions    */
-  if (!(n1==m2)) { sciprint("%s: Incompatible inputs \r\n", "matmul");
+  if (!(n1==m2)) { sciprint("%s: Incompatible inputs \n", "matmul");
     Error(999);
     return 0;}
 
index e6ec8ed..73a9736 100644 (file)
@@ -43,11 +43,11 @@ void displ(a, ma, na, b, mb, nb, c, mc, nc)
      double *a; int *b; char *c;
      int ma, na, mb, nb, mc, nc;
 {
-  sciprint("First parameter (matrix) is %i x %i:\r\n",ma,na);
-  sciprint("its (1,1) entry is %e (double).\r\n", a[0]);
-  sciprint("Second parameter (matrix) is %i x %i:\r\n",mb,nb);
-  sciprint("its (1,1) entry is %i (int).\r\n", b[0]);
-  sciprint("Third parameter (string) is %i character long: it is the string \"%s\"\r\n",mc*nc, c);
+  sciprint("First parameter (matrix) is %i x %i:\n",ma,na);
+  sciprint("its (1,1) entry is %e (double).\n", a[0]);
+  sciprint("Second parameter (matrix) is %i x %i:\n",mb,nb);
+  sciprint("its (1,1) entry is %i (int).\n", b[0]);
+  sciprint("Third parameter (string) is %i character long: it is the string \"%s\"\n",mc*nc, c);
 }
 
 
index 01eacb7..155538b 100644 (file)
@@ -13,7 +13,7 @@ int as2osc(thechain)
 {
   static int k, l;
   l = strlen(thechain);
-  sciprint("character string length %d\r\n",l);
+  sciprint("character string length %d\n",l);
   for (k = 0 ; k < l; k++) 
     {
       if ( thechain[k] == 'a' ) thechain[k]='o';
index 27c8c79..fd3e33c 100644 (file)
@@ -75,7 +75,7 @@ int crestrc( a, m, ierr)
   else
     {
       *ierr=1;
-      sciprint("malloc : No more space \r\n");
+      sciprint("malloc : No more space \n");
     }
   return(0);
 }
index 032b6f8..833edf8 100644 (file)
@@ -22,7 +22,7 @@ int intex13c(fname)
   
   if (ierr > 0) 
     {
-      Scierror(999,"%s: Internal Error\r\n",fname);
+      Scierror(999,"%s: Internal Error\n",fname);
       return 0;
     }
   LhsVar(1) = 1;
index aaa289d..07871ea 100644 (file)
@@ -28,7 +28,7 @@ int intex15c(fname)
 
   ReadString("Mystr", &strl, str);
 
-  sciprint("Mystr= \"%s\", length %d \r\n", str, strl);
+  sciprint("Mystr= \"%s\", length %d \n", str, strl);
 
   /*    LhsVar(1) = 0; means "no output"   */
   LhsVar(1) = 0;
index 9aee1a3..80370ab 100644 (file)
@@ -89,7 +89,7 @@ int intex17c(fname)
 
   if (( returned_from_longjump = setjmp(ex17cenv)) != 0 )
     {
-      Scierror(999,"%s: Internal error \r\n",fname);
+      Scierror(999,"%s: Internal error \n",fname);
       return 0;
     } 
   
index 7a3d949..e7f279e 100644 (file)
@@ -67,7 +67,7 @@ int intex1c(fname)
   
   if (ierr > 0) 
     {
-      Scierror(999,"%s: Internal error \r\n",fname);
+      Scierror(999,"%s: Internal error \n",fname);
       return 0;
     }
   
index 41e1d70..f4f5aa2 100644 (file)
@@ -51,7 +51,7 @@ int intex2c(fname)
 
   if (ierr > 0) 
     {
-      Scierror(999,"%s: Internal error \r\n",fname);
+      Scierror(999,"%s: Internal error \n",fname);
       return 0;
     }
   /** return the first argument (unchanged ) then v1 and v2 **/
index 10d52a9..3b082bd 100644 (file)
@@ -39,7 +39,7 @@ int intex4c(char* fname)
   CheckRhs(0,0);
   CheckLhs(1,2);
   C2F(dblearray)( &l1,&m1,&n1,&ierr);
-  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \r\n",fname);  return 0;  }
+  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \n",fname);  return 0;  }
   /* first example : l1 was allocated inside dblearray */ 
   CreateVarFromPtr( 1,MATRIX_OF_DOUBLE_DATATYPE, &m1, &n1, &l1);
   
@@ -65,7 +65,7 @@ int intex4c_2(char* fname)
   CheckRhs(0,0);
   CheckLhs(1,1);
   C2F(intarray)( &l1, &m1, &n1, &ierr);
-  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \r\n",fname);  return 0 ;  }
+  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \n",fname);  return 0 ;  }
   CreateVarFromPtr( 1,MATRIX_OF_INTEGER_DATATYPE, &m1, &n1, &l1);
   free(l1);
   /* we can access and change data through VarPtr
@@ -89,7 +89,7 @@ int intex4c_3(char* fname)
   CheckRhs(0,0);
   CheckLhs(1,1);
   C2F(crestr)( &l1,&m1,&ierr);
-  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \r\n",fname);  return 0;  }
+  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \n",fname);  return 0;  }
   CreateVarFromPtr( 1,STRING_DATATYPE, &m1, &n1, &l1);
   free(l1);
   LhsVar(1) = 1;
@@ -114,7 +114,7 @@ int intex4c_4(char* fname)
   C2F(crestr)( &l1, &m1, &ierr);
   C2F(intarray)( &l2, &m2, &n2, &ierr);
   C2F(dblearray)( &l3, &m3, &n3, &ierr);
-  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \r\n",fname);  return 0;  }
+  if ( ierr > 0 )  { Scierror(999,"%s: Internal error \n",fname);  return 0;  }
   /* Creating variable #1 of type character and dimension m1 x n1 (m1=1) */
   CreateVarFromPtr( 1,STRING_DATATYPE, &m1, &n1, &l1);
   CreateVarFromPtr( 2,MATRIX_OF_INTEGER_DATATYPE, &m2, &n2, &l2);
@@ -200,7 +200,7 @@ int C2F(crestr)( a, m, ierr)
   else
     {
       *ierr=1;
-      printf("malloc : No more space \r\n");
+      printf("malloc : No more space \n");
     }
   return(0);
 }
index d0a4e2a..d67d65d 100644 (file)
@@ -21,7 +21,7 @@ int intex5c(fname)
   crestrc( &l1,&m1,&ierr);
   if ( ierr > 0 ) 
     {
-      Scierror(999,"%s: Internal error \r\n",fname);
+      Scierror(999,"%s: Internal error \n",fname);
       return 0;
     }
 
index c7c3c63..215863b 100644 (file)
@@ -24,7 +24,7 @@ int intex6c(fname)
 
   if ( ierr > 0 ) 
     {
-      Scierror(999,"%s: Internal error \r\n",fname);
+      Scierror(999,"%s: Internal error \n",fname);
       return 0;
     }
 
index a51096a..4d44f7f 100644 (file)
@@ -33,7 +33,7 @@ int intex8c(fname)
 
   if ( mrhs != 2 ) 
     {
-      Scierror(999,"%s: Third argument has an invalid rhs\r\n",fname);
+      Scierror(999,"%s: Third argument has an invalid rhs\n",fname);
       return 0;
     }
 
index 81e676c..98f270f 100644 (file)
@@ -29,43 +29,43 @@ msgstr      ""
 #
 # File: examples/gateway/intview.c, line: 46
 #, possible-c-format
-msgid  "First parameter (matrix) is %i x %i:\r\n"
+msgid  "First parameter (matrix) is %i x %i:\n"
 msgstr ""
 #
 # File: examples/gateway/intview.c, line: 47
 #, possible-c-format
-msgid  "its (1,1) entry is %e (double).\r\n"
+msgid  "its (1,1) entry is %e (double).\n"
 msgstr ""
 #
 # File: examples/gateway/intview.c, line: 48
 #, possible-c-format
-msgid  "Second parameter (matrix) is %i x %i:\r\n"
+msgid  "Second parameter (matrix) is %i x %i:\n"
 msgstr ""
 #
 # File: examples/gateway/intview.c, line: 49
 #, possible-c-format
-msgid  "its (1,1) entry is %i (int).\r\n"
+msgid  "its (1,1) entry is %i (int).\n"
 msgstr ""
 #
 # File: examples/gateway/intview.c, line: 50
 #, possible-c-format
 msgid  "Third parameter (string) is %i character long: it is the string \"%s"
-       "\"\r\n"
+       "\"\n"
 msgstr ""
 #
 # File: examples/gateway/intmatmul.c, line: 26
 #, possible-c-format
-msgid  "%s: Incompatible inputs \r\n"
+msgid  "%s: Incompatible inputs \n"
 msgstr ""
 #
 # File: examples/dynamic_links_c_and_fortran/ext14c.c, line: 26
 #, possible-c-format
-msgid  "%s :Incompatible dimensions\r\n"
+msgid  "%s :Incompatible dimensions\n"
 msgstr ""
 #
 # File: examples/interfaces/c/intex15c.c, line: 31
 #, possible-c-format
-msgid  "Mystr= \"%s\", length %d \r\n"
+msgid  "Mystr= \"%s\", length %d \n"
 msgstr ""
 #
 # File: examples/interfaces/c/intex17c.c, line: 92
@@ -78,12 +78,12 @@ msgstr      ""
 # File: examples/interfaces/c/intex4c.c, line: 117
 # File: examples/interfaces/c/intex6c.c, line: 27
 #, possible-c-format
-msgid  "%s: Internal error \r\n"
+msgid  "%s: Internal error \n"
 msgstr ""
 #
 # File: examples/interfaces/c/as2osc.c, line: 16
 #, possible-c-format
-msgid  "character string length %d\r\n"
+msgid  "character string length %d\n"
 msgstr ""
 #
 # File: examples/interfaces/c/intex16c.c, line: 13
@@ -98,12 +98,12 @@ msgstr      ""
 # File: examples/interfaces/c/crestrc.c, line: 78
 # File: examples/interfaces/c/intex4c.c, line: 203
 #, c-format
-msgid  "malloc : No more space \r\n"
+msgid  "malloc : No more space \n"
 msgstr ""
 #
 # File: examples/interfaces/c/intex8c.c, line: 36
 #, possible-c-format
-msgid  "%s: Third argument has an invalid rhs\r\n"
+msgid  "%s: Third argument has an invalid rhs\n"
 msgstr ""
 #
 # File: examples/call_dll_in_scilab/tdll.c, line: 27
index f31eedb..6871829 100644 (file)
@@ -17,32 +17,32 @@ msgstr      "Project-Id-Version: Scilab - integer\n"
        "Content-Transfer-Encoding: 8bit\n"
 #
 # File: src/c/mputi.c, line: 53
-msgid  "mputi : format is of 0 length  \r\n"
+msgid  "mputi : format is of 0 length  \n"
 msgstr ""
 #
 # File: src/c/mputi.c, line: 155
 # File: src/c/mputi.c, line: 161
 #, possible-c-format
-msgid  "mputi : %s format not recognized \r\n"
+msgid  "mputi : %s format not recognized \n"
 msgstr ""
 #
 # File: src/c/mputi.c, line: 168
 # File: src/c/mgeti.c, line: 180
-msgid  "No input file \r\n"
+msgid  "No input file \n"
 msgstr ""
 #
 # File: src/c/mgeti.c, line: 56
-msgid  "mgeti : format is of 0 length  \r\n"
+msgid  "mgeti : format is of 0 length  \n"
 msgstr ""
 #
 # File: src/c/mgeti.c, line: 163
 # File: src/c/mgeti.c, line: 169
 #, possible-c-format
-msgid  "mget : %s format not recognized \r\n"
+msgid  "mget : %s format not recognized \n"
 msgstr ""
 #
 # File: src/c/mgeti.c, line: 198
 #, possible-c-format
-msgid  "mgeti : unknown format %s  \r\n"
+msgid  "mgeti : unknown format %s  \n"
 msgstr ""
 
index 5ab06dc..8e1edd1 100644 (file)
@@ -53,7 +53,7 @@ void C2F(mgeti) (integer *fd,integer *res,integer *n,char type[],integer *ierr)
   nc=(int)strlen(type);
   if ( nc == 0) 
     {
-      sciprint("mgeti : format is of 0 length  \r\n",type);
+      sciprint("mgeti : format is of 0 length  \n",type);
       *ierr=1;
       return;
     }
@@ -160,24 +160,24 @@ void C2F(mgeti) (integer *fd,integer *res,integer *n,char type[],integer *ierr)
                }
              break;
            default :
-             sciprint("mget : %s format not recognized \r\n",type);
+             sciprint("mget : %s format not recognized \n",type);
              *ierr=1;
              return;
            }
          break;
        default :
-         sciprint("mget : %s format not recognized \r\n",type);
+         sciprint("mget : %s format not recognized \n",type);
          *ierr=1;
          return;
        }
       if ( items != -1 ) 
        {
          *ierr = -(items) -1 ;
-         /** sciprint("Read %d out of \r\n",items,*n); **/
+         /** sciprint("Read %d out of \n",items,*n); **/
        }
       return;
     }
-  sciprint("No input file \r\n");
+  sciprint("No input file \n");
   *ierr=1;
 }
 
@@ -195,7 +195,7 @@ int nc,swap;
       if (islittleendian()==1) swap=0;else swap=1; 
       break; 
     default:
-      sciprint("mgeti : unknown format %s  \r\n",type);
+      sciprint("mgeti : unknown format %s  \n",type);
       swap=-1;
     }
   }
index 3b15dae..dac1a95 100644 (file)
@@ -50,7 +50,7 @@ void C2F(mputi) (integer *fd,integer *res,integer *n,char type[],integer *ierr)
   nc=(int)strlen(type);
   if ( nc == 0) 
     {
-      sciprint("mputi : format is of 0 length  \r\n",type);
+      sciprint("mputi : format is of 0 length  \n",type);
       *ierr=1;
       return;
     }
@@ -152,19 +152,19 @@ void C2F(mputi) (integer *fd,integer *res,integer *n,char type[],integer *ierr)
                }
              break;
            default :
-             sciprint("mputi : %s format not recognized \r\n",type);
+             sciprint("mputi : %s format not recognized \n",type);
              *ierr=1;
              return;
            }
          break;
        default :
-         sciprint("mputi : %s format not recognized \r\n",type);
+         sciprint("mputi : %s format not recognized \n",type);
          *ierr=1;
          return;
        }
       *ierr = ferror(fa);
       return;
     }
-  sciprint("No input file \r\n");
+  sciprint("No input file \n");
   *ierr=1;
 }
index 5e92f00..ae79e42 100644 (file)
@@ -18,19 +18,19 @@ msgstr      "Project-Id-Version: Scilab - interpolation\n"
 #
 # File: src/c/interpolation.c, line: 97
 #, possible-c-format
-msgid  "Argument %d is not a real hypermatrix\r\n"
+msgid  "Argument %d is not a real hypermatrix\n"
 msgstr ""
 #
 # File: src/c/interpolation.c, line: 113
 #, possible-c-format
-msgid  "Argument %d is not a scalar string\r\n"
+msgid  "Argument %d is not a scalar string\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_interp.c, line: 39
 # File: sci_gateway/c/sci_interp2d.c, line: 48
 # File: sci_gateway/c/sci_splin2d.c, line: 50
 #, possible-c-format
-msgid  "%s: bad inputs \r\n"
+msgid  "%s: bad inputs \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_interp.c, line: 51
@@ -42,47 +42,47 @@ msgstr      ""
 # File: sci_gateway/c/sci_lsq_splin.c, line: 33
 #, possible-c-format
 msgid  "%s: arg 1 and 2 must be vectors of same size with at least %d "
-       "elements\r\n"
+       "elements\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_lsq_splin.c, line: 43
 #, possible-c-format
-msgid  "%s: bad input for arg 3\r\n"
+msgid  "%s: bad input for arg 3\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_lsq_splin.c, line: 51
 #, possible-c-format
-msgid  "%s: bad input for x \r\n"
+msgid  "%s: bad input for x \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_lsq_splin.c, line: 57
 #, possible-c-format
-msgid  "%s: elts of arg %d not (strictly) increasing or +-inf detected\r\n"
+msgid  "%s: elts of arg %d not (strictly) increasing or +-inf detected\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_lsq_splin.c, line: 76
 #, possible-c-format
-msgid  "%s: not enought points for the fit \r\n"
+msgid  "%s: not enought points for the fit \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_lsq_splin.c, line: 80
 #, possible-c-format
-msgid  "%s warning: rank deficiency of the least square matrix\r\n"
+msgid  "%s warning: rank deficiency of the least square matrix\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin.c, line: 42
 #, possible-c-format
-msgid  "%s: arg1 and arg2 must be 2 vectors with same size\r\n"
+msgid  "%s: arg1 and arg2 must be 2 vectors with same size\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin.c, line: 48
 #, possible-c-format
-msgid  "%s: the number of interpolation points must be >= 2\r\n"
+msgid  "%s: the number of interpolation points must be >= 2\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin.c, line: 54
 #, possible-c-format
-msgid  "%s: elts of arg 1 not (strictly) increasing or +-inf detected\r\n"
+msgid  "%s: elts of arg 1 not (strictly) increasing or +-inf detected\n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin.c, line: 64
@@ -125,44 +125,44 @@ msgstr    ""
 #
 # File: sci_gateway/c/sci_cshep2d.c, line: 32
 #, possible-c-format
-msgid  "%s: xyz must be a (n,3) real matrix with n >= 10 \r\n"
+msgid  "%s: xyz must be a (n,3) real matrix with n >= 10 \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_cshep2d.c, line: 73
 #, possible-c-format
-msgid  "%s: duplicate nodes or all nodes colinears (ier = %d) \r\n"
+msgid  "%s: duplicate nodes or all nodes colinears (ier = %d) \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_interp3d.c, line: 52
 # File: sci_gateway/c/sci_bsplin3val.c, line: 44
 #, possible-c-format
-msgid  "%s: xp, yp and zp must have the same dimensions \r\n"
+msgid  "%s: xp, yp and zp must have the same dimensions \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_interp3d.c, line: 74
 # File: sci_gateway/c/sci_bsplin3val.c, line: 67
 #, possible-c-format
-msgid  "%s: 4 th argument is not an tensbs3d tlist \r\n"
+msgid  "%s: 4 th argument is not an tensbs3d tlist \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_linear_interpn.c, line: 35
 #, possible-c-format
-msgid  "%s: too few arg \r\n"
+msgid  "%s: too few arg \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_linear_interpn.c, line: 53
 #, possible-c-format
-msgid  "%s: bad inputs for xp1, xp2, ...., \r\n"
+msgid  "%s: bad inputs for xp1, xp2, ...., \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_linear_interpn.c, line: 72
 #, possible-c-format
-msgid  "%s: bad arg number %d \r\n"
+msgid  "%s: bad arg number %d \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_linear_interpn.c, line: 80
 #, possible-c-format
-msgid  "%s: grid abscissae of dim %d not in strict increasing order \r\n"
+msgid  "%s: grid abscissae of dim %d not in strict increasing order \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_linear_interpn.c, line: 91
@@ -193,7 +193,7 @@ msgstr      ""
 # File: sci_gateway/c/sci_splin2d.c, line: 58
 #, possible-c-format
 msgid  "%s: x and/or y are not in strict increasing order (or +-inf "
-       "detected) \r\n"
+       "detected) \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin2d.c, line: 69
@@ -204,7 +204,7 @@ msgstr      ""
 #
 # File: sci_gateway/c/sci_splin3d.c, line: 44
 #, possible-c-format
-msgid  "%s: the x, y and z grids must have at least 3 points \r\n"
+msgid  "%s: the x, y and z grids must have at least 3 points \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin3d.c, line: 51
@@ -220,7 +220,7 @@ msgstr      ""
 #
 # File: sci_gateway/c/sci_splin3d.c, line: 65
 #, possible-c-format
-msgid  "%s: the 4 th arg must be a vector with 3 components \r\n"
+msgid  "%s: the 4 th arg must be a vector with 3 components \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_splin3d.c, line: 71
@@ -231,22 +231,22 @@ msgstr    ""
 #
 # File: sci_gateway/c/sci_splin3d.c, line: 111
 #, possible-c-format
-msgid  "%s: problem : flag = %d \r\n"
+msgid  "%s: problem : flag = %d \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_bsplin3val.c, line: 100
 #, possible-c-format
-msgid  "%s: bad 5 th argument \r\n"
+msgid  "%s: bad 5 th argument \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_eval_cshep2d.c, line: 38
 #, possible-c-format
-msgid  "%s: xp and yp must have the same dimension \r\n"
+msgid  "%s: xp and yp must have the same dimension \n"
 msgstr ""
 #
 # File: sci_gateway/c/sci_eval_cshep2d.c, line: 59
 #, possible-c-format
-msgid  "%s: Argument 2 is not an cshep2d tlist\r\n"
+msgid  "%s: Argument 2 is not an cshep2d tlist\n"
 msgstr ""
 #
 # File: demos/interp_demo.sci, line: 39
index e5b235c..6108ec1 100644 (file)
@@ -41,7 +41,7 @@ int intbsplin3val(char *fname,unsigned long fname_len)
   GetRhsVar(3,MATRIX_OF_DOUBLE_DATATYPE, &mzp, &nzp, &lzp); zp = stk(lzp);
   if ( mxp != myp  ||  nxp != nyp || mxp != mzp  ||  nxp != nzp) 
     { 
-      Scierror(999,"%s: xp, yp and zp must have the same dimensions \r\n", fname);
+      Scierror(999,"%s: xp, yp and zp must have the same dimensions \n", fname);
       return 0;
     }
   np = mxp * nxp;
@@ -64,7 +64,7 @@ int intbsplin3val(char *fname,unsigned long fname_len)
                  Str=NULL;
          }
 
-      Scierror(999,"%s: 4 th argument is not an tensbs3d tlist \r\n", fname);
+      Scierror(999,"%s: 4 th argument is not an tensbs3d tlist \n", fname);
       return 0;
   }
   /* Free Str */
@@ -97,7 +97,7 @@ int intbsplin3val(char *fname,unsigned long fname_len)
       || der[1] != floor(der[1]) || der[1] < 0.0 
       || der[2] != floor(der[2]) || der[2] < 0.0 )
     {
-      Scierror(999,"%s: bad 5 th argument \r\n", fname);
+      Scierror(999,"%s: bad 5 th argument \n", fname);
       return 0;
     }
   ox = (int) der[0];  oy = (int) der[1];  oz = (int) der[2];
index b729c0b..8091459 100644 (file)
@@ -29,7 +29,7 @@ int intcshep2d(char *fname,unsigned long fname_len)
   GetRhsVar(1,MATRIX_OF_DOUBLE_DATATYPE, &n, &dim, &lxyz);
   if ( dim != 3  ||  n < 10 ) 
     { 
-      Scierror(999,"%s: xyz must be a (n,3) real matrix with n >= 10 \r\n", fname);
+      Scierror(999,"%s: xyz must be a (n,3) real matrix with n >= 10 \n", fname);
       return 0;
     }
 
@@ -70,7 +70,7 @@ int intcshep2d(char *fname,unsigned long fname_len)
 
   if ( ier != 0 )
     {
-      Scierror(999,"%s: duplicate nodes or all nodes colinears (ier = %d) \r\n", fname, ier);
+      Scierror(999,"%s: duplicate nodes or all nodes colinears (ier = %d) \n", fname, ier);
       return 0;
     }
 
index 33ff9d3..fc127f7 100644 (file)
@@ -35,7 +35,7 @@ int inteval_cshep2d(char *fname,unsigned long fname_len)
   GetRhsVar(2,MATRIX_OF_DOUBLE_DATATYPE, &my, &ny, &ly);
   if ( mx != my  ||  nx != ny ) 
     { 
-      Scierror(999,"%s: xp and yp must have the same dimension \r\n", fname);
+      Scierror(999,"%s: xp and yp must have the same dimension \n", fname);
       return 0;
     }
 
@@ -56,7 +56,7 @@ int inteval_cshep2d(char *fname,unsigned long fname_len)
                        Str=NULL;
                }
 
-      Scierror(999,"%s: Argument 2 is not an cshep2d tlist\r\n", fname);
+      Scierror(999,"%s: Argument 2 is not an cshep2d tlist\n", fname);
       return 0;
     }
   /* Free Str */
index 8b9c1b7..ef03e60 100644 (file)
@@ -36,7 +36,7 @@ int intinterp1(char *fname,unsigned long fname_len)
 
   if ( mx != my  ||  nx != ny  ||  md != mx || nd != nx || (mx != 1  &&  nx != 1) || mx*nx < 2) 
     { 
-      Scierror(999,"%s: bad inputs \r\n", fname);
+      Scierror(999,"%s: bad inputs \n", fname);
       return 0;
     }
   n = mx*nx;    /* number of interpolation points */
index b0e4807..90cec59 100644 (file)
@@ -45,7 +45,7 @@ int intinterp2d(char *fname,unsigned long fname_len)
   if ( mxp != myp || nxp != nyp || mx != 1 || my != 1 || nc != 1 || nx < 2 || ny < 2
        || mc != 16*(nx-1)*(ny-1) )
     { 
-      Scierror(999,"%s: bad inputs \r\n", fname);
+      Scierror(999,"%s: bad inputs \n", fname);
       return 0;
     }
 
index 71bc4c3..1dedf89 100644 (file)
@@ -49,7 +49,7 @@ int intinterp3d(char *fname,unsigned long fname_len)
   GetRhsVar(3,MATRIX_OF_DOUBLE_DATATYPE, &mzp, &nzp, &lzp); zp = stk(lzp);
   if ( mxp != myp  ||  nxp != nyp || mxp != mzp  ||  nxp != nzp) 
     { 
-      Scierror(999,"%s: xp, yp and zp must have the same dimensions \r\n", fname);
+      Scierror(999,"%s: xp, yp and zp must have the same dimensions \n", fname);
       return 0;
     }
   np = mxp * nxp;
@@ -71,7 +71,7 @@ int intinterp3d(char *fname,unsigned long fname_len)
                        Str=NULL;
                }
 
-      Scierror(999,"%s: 4 th argument is not an tensbs3d tlist \r\n", fname);
+      Scierror(999,"%s: 4 th argument is not an tensbs3d tlist \n", fname);
       return 0;
     }
   /* Free Str */
index 4669c4b..f0f034b 100644 (file)
@@ -32,7 +32,7 @@ int intlinear_interpn(char *fname,unsigned long fname_len)
   n = (Rhs+1)/2 - 1;
   if ( n < 1 )
     { 
-      Scierror(999,"%s: too few arg \r\n", fname);
+      Scierror(999,"%s: too few arg \n", fname);
       return 0;
     }
 
@@ -50,7 +50,7 @@ int intlinear_interpn(char *fname,unsigned long fname_len)
       GetRhsVar(i,MATRIX_OF_DOUBLE_DATATYPE, &mxpn, &nxpn, &lxpn);
       if ( mxp != mxpn || nxp != nxpn )
        { 
-         Scierror(999,"%s: bad inputs for xp1, xp2, ...., \r\n", fname);
+         Scierror(999,"%s: bad inputs for xp1, xp2, ...., \n", fname);
          return 0;
        }
       xp[i-1] = stk(lxpn);
@@ -69,7 +69,7 @@ int intlinear_interpn(char *fname,unsigned long fname_len)
       GetRhsVar(n+i,MATRIX_OF_DOUBLE_DATATYPE, &mx, &nx, &lx);
       if ( (mx != 1 && nx != 1) && mx*nx < 2)
        { 
-         Scierror(999,"%s: bad arg number %d \r\n", fname, n+i);
+         Scierror(999,"%s: bad arg number %d \n", fname, n+i);
          return 0;
        }
       x[i-1] = stk(lx);
@@ -77,7 +77,7 @@ int intlinear_interpn(char *fname,unsigned long fname_len)
       /* verify strict increasing order  */
       if ( !good_order(x[i-1], mx*nx) )
        {
-         Scierror(999,"%s: grid abscissae of dim %d not in strict increasing order \r\n", fname, n+i);
+         Scierror(999,"%s: grid abscissae of dim %d not in strict increasing order \n", fname, n+i);
          return 0;
        }
     }
index 08b4ccb..4d85bbe 100644 (file)
@@ -30,7 +30,7 @@ int intlsq_splin(char *fname,unsigned long fname_len)
   ndata = mxd*nxd;  /* number of data points */
   if ( ndata < 4  ||  mxd != myd  || nxd != nyd  ||  (mxd != 1  &&  nxd != 1) ) 
     { 
-      Scierror(999,"%s: arg 1 and 2 must be vectors of same size with at least %d elements\r\n",
+      Scierror(999,"%s: arg 1 and 2 must be vectors of same size with at least %d elements\n",
               fname, 4);
       return 0;
     }
@@ -40,7 +40,7 @@ int intlsq_splin(char *fname,unsigned long fname_len)
       GetRhsVar(3,MATRIX_OF_DOUBLE_DATATYPE, &mwd, &nwd, &lwd);
       if ( mxd != mwd  ||  nxd != nwd )
        { 
-         Scierror(999,"%s: bad input for arg 3\r\n", fname);
+         Scierror(999,"%s: bad input for arg 3\n", fname);
          return 0;
        }
     }
@@ -48,13 +48,13 @@ int intlsq_splin(char *fname,unsigned long fname_len)
   n = mx*nx;
   if ( n < 2  ||  (mx != 1  &&  nx != 1) )
     { 
-      Scierror(999,"%s: bad input for x \r\n", fname);
+      Scierror(999,"%s: bad input for x \n", fname);
       return 0;
     }
   
   if (! good_order(stk(lx), n))   /* verify strict increasing abscissae */
     {
-      Scierror(999,"%s: elts of arg %d not (strictly) increasing or +-inf detected\r\n", fname, Rhs);
+      Scierror(999,"%s: elts of arg %d not (strictly) increasing or +-inf detected\n", fname, Rhs);
       return 0;
     }
 
@@ -73,11 +73,11 @@ int intlsq_splin(char *fname,unsigned long fname_len)
 
   if (ierr == -1)
     {
-      Scierror(999,"%s: not enought points for the fit \r\n", fname);
+      Scierror(999,"%s: not enought points for the fit \n", fname);
       return 0;
     }
   else if (ierr == 1)
-    sciprint("%s warning: rank deficiency of the least square matrix\r\n", fname);
+    sciprint("%s warning: rank deficiency of the least square matrix\n", fname);
 
   LhsVar(1) = Rhs+1;
   LhsVar(2) = Rhs+2;