Fix some GCC 4.9 warnings 35/14735/3
Clément DAVID [Wed, 25 Jun 2014 12:18:10 +0000 (14:18 +0200)]
Change-Id: I70e47a298ae27a41c7171609e79c686c3f44eb6d

148 files changed:
scilab/modules/api_scilab/includes/api_common.h
scilab/modules/api_scilab/src/cpp/api_common.cpp
scilab/modules/api_scilab/src/cpp/api_double.cpp
scilab/modules/api_scilab/src/cpp/api_list.cpp
scilab/modules/ast/includes/scilabexception.hxx
scilab/modules/ast/src/cpp/runvisitor.cpp
scilab/modules/ast/src/cpp/scilabexception.cpp
scilab/modules/call_scilab/src/c/SendScilabJobs.c
scilab/modules/call_scilab/src/c/call_scilab.c
scilab/modules/console/includes/ConsolePrintf.h
scilab/modules/console/includes/prompt.h
scilab/modules/console/src/c/prompt.c
scilab/modules/console/src/cpp/ConsolePrintf.cpp
scilab/modules/console/src/noconsole/noconsole.c
scilab/modules/core/sci_gateway/c/sci_getdebuginfo.c
scilab/modules/core/sci_gateway/cpp/sci_typename.cpp
scilab/modules/core/src/cpp/InitScilab.cpp
scilab/modules/core/src/cpp/runner.cpp
scilab/modules/data_structures/sci_gateway/cpp/sci_rlist.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_impl.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_ode.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_odedc.cpp
scilab/modules/dynamic_link/src/c/dl_genErrorMessage.c
scilab/modules/dynamic_link/src/c/dl_genErrorMessage.h
scilab/modules/elementary_functions/includes/elem_common.h
scilab/modules/elementary_functions/sci_gateway/c/sci_dec2base.c
scilab/modules/elementary_functions/sci_gateway/c/sci_round.c
scilab/modules/elementary_functions/sci_gateway/cpp/sci_cumprod.cpp
scilab/modules/elementary_functions/sci_gateway/cpp/sci_cumsum.cpp
scilab/modules/elementary_functions/sci_gateway/cpp/sci_prod.cpp
scilab/modules/elementary_functions/sci_gateway/cpp/sci_sum.cpp
scilab/modules/external_objects_java/src/cpp/ScilabJavaEnvironmentWrapper.cpp
scilab/modules/fileio/includes/do_xxscanf.h
scilab/modules/fileio/includes/findfiles.h
scilab/modules/fileio/includes/mopen.h
scilab/modules/fileio/sci_gateway/c/sci_chdir.c
scilab/modules/fileio/sci_gateway/c/sci_fscanfMat.c
scilab/modules/fileio/sci_gateway/c/sci_pwd.c
scilab/modules/fileio/sci_gateway/cpp/sci_mopen.cpp
scilab/modules/fileio/src/c/convert_tools.h
scilab/modules/fileio/src/c/do_xxscanf.c
scilab/modules/fileio/src/c/findfiles.c
scilab/modules/fileio/src/cpp/expandPathVariable.cpp
scilab/modules/fileio/src/cpp/mclose.cpp
scilab/modules/fileio/src/cpp/mgetl.cpp
scilab/modules/fileio/src/cpp/mopen.cpp
scilab/modules/functions/sci_gateway/cpp/sci_exec.cpp
scilab/modules/functions/sci_gateway/cpp/sci_functionlist.cpp
scilab/modules/functions_manager/src/cpp/funcmanager.cpp
scilab/modules/graphics/sci_gateway/c/sci_set.c
scilab/modules/graphics/sci_gateway/c/sci_zoom_rect.c
scilab/modules/graphics/src/c/getHandleProperty/SetHashTable.c
scilab/modules/graphics/src/c/getHandleProperty/SetHashTable.h
scilab/modules/graphics/src/c/getHandleProperty/getPropertyAssignedValue.c
scilab/modules/graphics/src/c/getHandleProperty/getPropertyAssignedValue.h
scilab/modules/graphics/src/c/getHandleProperty/get_ambient_color_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_auto_margins_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_border_property.cpp
scilab/modules/graphics/src/c/getHandleProperty/get_box_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_data_bounds_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_datatips_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_diffuse_color_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_direction_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_display_function_data_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_figure_closerequestfcn_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_grid_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_grid_style_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_grid_thickness_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_groupname_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_layout_options_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_layout_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_light_type_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_line_width_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_log_flags_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_mark_offset_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_marks_count_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_material_shininess_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_menubar_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_position_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_rect_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_scrollable_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_segs_color_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_specular_color_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_sub_tics_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_tabtitle_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_ticks_format_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_ticks_st_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_toolbar_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_triangles_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_use_color_material_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_xtics_coord_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_ytics_coord_property.c
scilab/modules/graphics/src/c/getHandleProperty/get_z_ticks_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_current_entity_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_xtics_coord_property.c
scilab/modules/graphics/src/nographics/nographics.c
scilab/modules/gui/includes/GetUicontrol.h
scilab/modules/gui/includes/SetUicontrol.h
scilab/modules/gui/sci_gateway/cpp/sci_uigetdir.cpp
scilab/modules/gui/src/cpp/GetUicontrolStyle.cpp
scilab/modules/hdf5/src/cpp/H5BasicData.hxx
scilab/modules/interpolation/sci_gateway/cpp/sci_cshep2d.cpp
scilab/modules/interpolation/sci_gateway/cpp/sci_splin3d.cpp
scilab/modules/io/includes/getenvc.h
scilab/modules/io/includes/setenvc.h
scilab/modules/io/sci_gateway/cpp/sci_file.cpp
scilab/modules/io/sci_gateway/cpp/sci_genlib.cpp
scilab/modules/io/src/c/getenvc.c
scilab/modules/io/src/c/setenvc.c
scilab/modules/jvm/includes/system_getproperty.h
scilab/modules/jvm/src/c/system_getproperty.c
scilab/modules/localization/includes/setgetlanguage.h
scilab/modules/localization/sci_gateway/cpp/sci_setlanguage.cpp
scilab/modules/localization/src/c/InitializeLocalization.c
scilab/modules/localization/src/c/setdefaultlanguage.c
scilab/modules/localization/src/c/setgetlanguage.c
scilab/modules/localization/src/c/tableslanguages.h
scilab/modules/mexlib/src/cpp/mexlib.cpp
scilab/modules/optimization/sci_gateway/cpp/sci_fsolve.cpp
scilab/modules/optimization/sci_gateway/cpp/sci_lsqrsolve.cpp
scilab/modules/output_stream/includes/scilabWrite.hxx
scilab/modules/output_stream/includes/scilab_sprintf.hxx
scilab/modules/output_stream/includes/sciprint.h
scilab/modules/output_stream/src/c/sciprint.c
scilab/modules/output_stream/src/cpp/scilab_sprintf.cpp
scilab/modules/parameters/src/c/parameters.c
scilab/modules/randlib/sci_gateway/cpp/sci_grand.cpp
scilab/modules/sound/sci_gateway/c/sci_beep.c
scilab/modules/spreadsheet/sci_gateway/cpp/sci_xls_open.cpp
scilab/modules/startup/src/cpp/scilab.cpp
scilab/modules/string/src/c/pcre_error.c
scilab/modules/string/src/c/pcre_error.h
scilab/modules/system_env/includes/configvariable.hxx
scilab/modules/system_env/includes/sci_mode.h
scilab/modules/system_env/src/cpp/sci_mode.cpp
scilab/modules/types/includes/callable.hxx
scilab/modules/types/includes/inspector.hxx
scilab/modules/types/includes/internal.hxx
scilab/modules/types/includes/polynom.hxx
scilab/modules/types/includes/string.hxx
scilab/modules/types/includes/tostring_common.hxx
scilab/modules/types/sci_gateway/cpp/sci_tlist_or_mlist.hxx
scilab/modules/types/src/cpp/function.cpp
scilab/modules/types/src/cpp/sparse.cpp
scilab/modules/types/src/cpp/string.cpp
scilab/modules/types/src/cpp/tlist.cpp
scilab/modules/ui_data/includes/ui_data.h
scilab/modules/ui_data/src/c/PutScilabVariable.c

index c83f96b..4d7e57a 100644 (file)
@@ -184,7 +184,7 @@ extern "C" {
 #endif
 #define OverLoad(x) callOverloadFunction(pvApiCtx, x, fname, (unsigned int)strlen(fname))
 
-    int callScilabFunction(void* _pvCtx, char* _pstName, int _iStart, int _iLhs, int _iRhs);
+    int callScilabFunction(void* _pvCtx, const char* _pstName, int _iStart, int _iLhs, int _iRhs);
 
     /**
      * Get the memory address of a variable from the variable position
index f669cbf..a6b6527 100644 (file)
@@ -73,13 +73,13 @@ int* getNbInputArgument(void* _pvCtx)
     if (pStr == NULL)
     {
         std::cout << "pStr == NULL" << std::endl;
-        return 0;
+        return NULL;
     }
 
     if (pStr->m_pIn == NULL)
     {
         std::cout << "pStr->m_pin == NULL" << std::endl;
-        return 0;
+        return NULL;
     }
 
     return &pStr->m_iIn;;
@@ -231,7 +231,7 @@ int checkOutputArgumentAtMost(void* _pvCtx, int _iMax)
 }
 
 /*--------------------------------------------------------------------------*/
-int callScilabFunction(void* _pvCtx, char* _pstName, int _iStart, int _iLhs, int _iRhs)
+int callScilabFunction(void* _pvCtx, char const* _pstName, int _iStart, int _iLhs, int _iRhs)
 {
     GatewayStruct* pStr = (GatewayStruct*)_pvCtx;
     Function::ReturnValue callResult;
@@ -731,7 +731,8 @@ SciErr getProcessMode(void *_pvCtx, int _iPos, int *_piAddRef, int *_piMode)
     else if (iType2 == sci_strings)
     {
         int iLen = 0;
-        char *pstMode[1] = { "" };
+        char initialValue = '\0';
+        char *pstMode[1] = { &initialValue };
 
         sciErr = getVarDimension(_pvCtx, piAddr2, &iRows2, &iCols2);
         if (sciErr.iErr)
@@ -1574,6 +1575,7 @@ int decreaseValRef(void* _pvCtx, int* _piAddress)
     return 0;
 }
 /*--------------------------------------------------------------------------*/
+static char eostr = '\0';
 SciErr sciErrInit()
 {
     int i = 0 ;
@@ -1583,7 +1585,7 @@ SciErr sciErrInit()
 
     for (; i < MESSAGE_STACK_SIZE ; i++)
     {
-        sciErr.pstMsg[i] = "";
+        sciErr.pstMsg[i] = &eostr;
     }
 
     return sciErr;
index 7b8ea5d..66addb4 100644 (file)
@@ -249,7 +249,7 @@ SciErr allocCommonMatrixOfDouble(void* _pvCtx, int _iVar, char _cType, int _iCom
             }
         }
     }
-    catch (ast::ScilabError se)
+    catch (const ast::ScilabError& se)
     {
         addErrorMessage(&sciErr, API_ERROR_NO_MORE_MEMORY, _("%s: %ls"), _iComplex ? "allocComplexMatrixOfDouble" : "allocMatrixOfDouble", se.GetErrorMessage().c_str());
         return sciErr;
index c5325bd..c53a78e 100644 (file)
@@ -259,7 +259,7 @@ static int getDepthNamedList(std::string _stNamedList)
     return (int)it->second->size();
 }
 
-char* getListTypeName(int _iType)
+const char* getListTypeName(int _iType)
 {
     switch (_iType)
     {
@@ -465,7 +465,7 @@ static SciErr createCommonList(void* _pvCtx, int _iVar, int _iListType, int _iNb
             pL = new TList();
         }
     }
-    catch (ast::ScilabError se)
+    catch (const ast::ScilabError& se)
     {
         addErrorMessage(&sciErr, API_ERROR_NO_MORE_MEMORY, _("%s: %ls"), "createCommonList", se.GetErrorMessage().c_str());
         return sciErr;
index 3d12f7a..a814b89 100644 (file)
@@ -19,7 +19,9 @@
 #include "dynlib_ast_tools.hxx"
 
 //disable warnings about exports STL items
+#ifdef _MSC_VER
 #pragma warning (disable : 4251)
+#endif
 
 namespace ast
 {
@@ -34,13 +36,13 @@ public :
     virtual ~ScilabException() throw() {};
 
     void            SetErrorMessage(std::wstring _wstErrorMesssage);
-    std::wstring    GetErrorMessage(void);
+    std::wstring    GetErrorMessage(void) const;
 
     void            SetErrorNumber(int _iErrorNumber);
-    int             GetErrorNumber(void);
+    int             GetErrorNumber(void) const;
 
     void            SetErrorLocation(const Location& _ErrorLocation);
-    Location&       GetErrorLocation(void);
+    const Location& GetErrorLocation(void) const;
 protected :
     std::wstring    m_wstErrorMessage;
 
index 30e1261..7e5e055 100644 (file)
@@ -103,7 +103,7 @@ void RunVisitorT<T>::visitprivate(const FieldExp &e)
     {
         e.head_get()->accept(*this);
     }
-    catch (ScilabError error)
+    catch (const ScilabError& error)
     {
         throw error;
     }
@@ -787,7 +787,7 @@ void RunVisitorT<T>::visitprivate(const SeqExp  &e)
                 break;
             }
         }
-        catch (ScilabMessage sm)
+        catch (const ScilabMessage& sm)
         {
             scilabErrorW(sm.GetErrorMessage().c_str());
 
@@ -813,7 +813,7 @@ void RunVisitorT<T>::visitprivate(const SeqExp  &e)
 
             throw ScilabMessage((*itExp)->location_get());
         }
-        catch (ScilabError se)
+        catch (const ScilabError& se)
         {
             // check on error number because error message can be empty.
             if (ConfigVariable::getLastErrorNumber() == 0)
@@ -1182,7 +1182,7 @@ void RunVisitorT<T>::visitprivate(const ListExp &e)
         os_swprintf(szError, bsiz, _W("%ls: Wrong type for argument %d: Real scalar expected.\n"), L"':'", iPos);
         throw ScilabError(szError, 999, e.location_get());
     }
-    catch (ScilabError error)
+    catch (const ScilabError& error)
     {
         //TODO YaSp : Overloading
         throw error;
index 2d21858..317b814 100644 (file)
@@ -65,7 +65,7 @@ void ScilabException::SetErrorMessage(std::wstring _wstErrorMesssage)
     m_wstErrorMessage = _wstErrorMesssage;
 }
 
-std::wstring ScilabException::GetErrorMessage(void)
+std::wstring ScilabException::GetErrorMessage(void) const
 {
     return m_wstErrorMessage;
 }
@@ -75,7 +75,7 @@ void ScilabException::SetErrorNumber(int _iErrorNumber)
     m_iErrorNumber = _iErrorNumber;
 }
 
-int ScilabException::GetErrorNumber(void)
+int ScilabException::GetErrorNumber(void) const
 {
     return m_iErrorNumber;
 }
@@ -85,7 +85,7 @@ void ScilabException::SetErrorLocation(const Location& _ErrorLocation)
     m_ErrorLocation = _ErrorLocation;
 }
 
-Location& ScilabException::GetErrorLocation(void)
+const Location& ScilabException::GetErrorLocation(void) const
 {
     return m_ErrorLocation;
 }
index 1e96c5f..c858d5d 100644 (file)
@@ -61,7 +61,7 @@ int SendScilabJob(char *job)
         SetLastJob(command);
 
         /* Creation of a temp variable in Scilab which contains the command */
-        sciErr = createNamedMatrixOfString(NULL, "TMP_EXEC_STRING", 1, 1, &command);
+        sciErr = createNamedMatrixOfString(NULL, "TMP_EXEC_STRING", 1, 1, (char const* const*) &command);
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
index 260ec1f..3b25c7d 100644 (file)
@@ -44,7 +44,7 @@
 
 extern char *getCmdLine(void);
 
-static void TermPrintf(char *text)
+static void TermPrintf(const char *text)
 {
     //std::cout << text;
     printf("%s", text);
index b42404e..2b77f62 100644 (file)
@@ -20,7 +20,7 @@
 * @param a string to display
 * @return total number of characters written is returned.
 */
-CONSOLE_IMPEXP int ConsolePrintf(char *line);
+CONSOLE_IMPEXP int ConsolePrintf(const char *line);
 /*--------------------------------------------------------------------------*/
 #endif /* __CONSOLEPRINTF_H__ */
 
index a01477e..6f1db5d 100644 (file)
@@ -45,7 +45,7 @@ CONSOLE_IMPEXP void C2F(setprlev) (int *pause);
 
 CONSOLE_IMPEXP void GetCurrentPrompt(char *CurrentPrompt);
 
-CONSOLE_IMPEXP void SetTemporaryPrompt(char *tempPrompt);
+CONSOLE_IMPEXP void SetTemporaryPrompt(const char *tempPrompt);
 
 CONSOLE_IMPEXP char *GetTemporaryPrompt(void);
 
index c040bc2..5648b95 100644 (file)
@@ -72,7 +72,7 @@ void GetCurrentPrompt(char *CurrentPrompt)
     }
 }
 /*------------------------------------------------------------------------*/
-void SetTemporaryPrompt(char *tempPrompt)
+void SetTemporaryPrompt(const char *tempPrompt)
 {
     ClearTemporaryPrompt();
     temporaryPrompt = os_strdup(tempPrompt);
index 05d5b96..cb3b845 100644 (file)
@@ -22,7 +22,7 @@ extern "C" {
 
 using namespace  org_scilab_modules_gui_bridge;
 
-int ConsolePrintf(char *line)
+int ConsolePrintf(const char *line)
 {
     JavaVM *vm = getScilabJavaVM();
     if (vm == NULL)
index 9fba85a..189be66 100644 (file)
@@ -33,7 +33,7 @@ char *ConsoleRead(void)
     return NULL;
 }
 /*--------------------------------------------------------------------------*/
-int ConsolePrintf(char *line)
+int ConsolePrintf(const char *line)
 {
     int len = 0;
     return len;
index 2ef6315..b961977 100644 (file)
@@ -43,7 +43,7 @@ int sci_getdebuginfo(char *fname, void* pvApiCtx)
     outputStaticList = getStaticDebugInfo(&m2);
 #endif
 
-    sciErr = createMatrixOfString(pvApiCtx, Rhs + 1, m1, n1, outputDynamicList);
+    sciErr = createMatrixOfString(pvApiCtx, Rhs + 1, m1, n1, (char const* const*) outputDynamicList);
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
@@ -54,7 +54,7 @@ int sci_getdebuginfo(char *fname, void* pvApiCtx)
 
     if (Lhs == 2)
     {
-        sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, m2, n2, outputStaticList);
+        sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, m2, n2, (char const* const*) outputStaticList);
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
index 7344bad..3a73c94 100644 (file)
@@ -27,7 +27,7 @@ extern "C"
 types::Function::ReturnValue sci_typename(types::typed_list &in, int _iRetCount, types::typed_list &out)
 {
     int iOne = 1;
-    wchar_t* pstShortTypeName[NB_OF_TYPE] = {L"s", L"p", L"b", L"sp", L"spb", L"msp", L"i", L"h", L"c",
+    const wchar_t* pstShortTypeName[NB_OF_TYPE] = {L"s", L"p", L"b", L"sp", L"spb", L"msp", L"i", L"h", L"c",
                                             L"m", L"mc", L"f", L"l", L"tl", L"ml", L"ptr", L"ip", L"fptr"
                                             };
     double pstShortTypeNum[NB_OF_TYPE] = {1, 2, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 128, 129, 130};
index d0754a6..108c808 100644 (file)
@@ -103,24 +103,10 @@ using namespace ast;
 
 ScilabEngineInfo* InitScilabEngineInfo()
 {
-    ScilabEngineInfo* pSEI = (ScilabEngineInfo*)MALLOC(sizeof(ScilabEngineInfo));
-    pSEI->iParseTrace   = 0;
-    pSEI->iPrintAst     = 0;
+    // Disable all but AST parsing.
+    ScilabEngineInfo* pSEI = (ScilabEngineInfo*)CALLOC(1, sizeof(ScilabEngineInfo));
     pSEI->iExecAst      = 1;
-    pSEI->iDumpAst      = 0;
-    pSEI->iDumpStack    = 0;
-    pSEI->iTimed        = 0;
-    pSEI->iAstTimed     = 0;
-    pSEI->iExecVerbose  = 0;
-    pSEI->iConsoleMode  = 0;
-    pSEI->iNoJvm        = 0;
-    pSEI->iNoStart      = 0;
-    pSEI->iShowVersion  = 0;
-
-    pSEI->pstParseFile  = NULL;
-    pSEI->pstFile       = NULL;
-    pSEI->pstExec       = NULL;
-    pSEI->pstLang       = NULL;
+
     return pSEI;
 }
 
@@ -258,7 +244,7 @@ int StartScilabEngine(ScilabEngineInfo* _pSEI)
             _pSEI->pstFile = NULL;
         }
     }
-    catch (ast::ScilabException se)
+    catch (const ast::ScilabException& se)
     {
         scilabErrorW(se.GetErrorMessage().c_str());
     }
index 8f533f7..f5145fa 100644 (file)
@@ -39,7 +39,7 @@ void *Runner::launch(void *args)
         me->getProgram()->accept(*(me->getVisitor()));
         //ConfigVariable::clearLastError();
     }
-    catch (ast::ScilabException se)
+    catch (const ast::ScilabException& se)
     {
         // remove the last call from where in case pause/abort
         ConfigVariable::where_end();
@@ -114,7 +114,7 @@ void Runner::execAndWait(ast::Exp* _theProgram, ast::ExecVisitor *_visitor)
             __WaitThreadDie(threadId);
         }
     }
-    catch (ast::ScilabException se)
+    catch (const ast::ScilabException& se)
     {
         throw se;
     }
index de6f107..22cbd86 100644 (file)
@@ -39,7 +39,7 @@ types::Function::ReturnValue sci_rlist(types::typed_list &in, int _iRetCount, ty
     }
 
     types::TList* pTLOut = new types::TList();
-    wchar_t* wcsFields[4] = {L"r", L"num", L"den", L"dt"};
+    const wchar_t * wcsFields[4] = {L"r", L"num", L"den", L"dt"};
     types::String* pStr = new types::String(1, 4, wcsFields);
     pTLOut->set(0, pStr);
 
index 3b04162..f093740 100644 (file)
@@ -37,7 +37,7 @@ types::Function::ReturnValue sci_impl(types::typed_list &in, int _iRetCount, typ
 {
     // Methode
     types::String* pStrType     = NULL;
-    wchar_t* wcsType            = L"lsoda";
+    const wchar_t * wcsType     = L"lsoda";
     int meth                    = 2;// default methode is stiff
 
     // y0
index df235d1..093f990 100644 (file)
@@ -39,7 +39,7 @@ types::Function::ReturnValue sci_ode(types::typed_list &in, int _iRetCount, type
 {
     // Methode
     types::String* pStrType     = NULL;
-    wchar_t* wcsType            = L"lsoda";
+    const wchar_t* wcsType            = L"lsoda";
     int meth                    = 0;
 
     // y0
index c06ed60..0aa083c 100644 (file)
@@ -39,7 +39,7 @@ types::Function::ReturnValue sci_odedc(types::typed_list &in, int _iRetCount, ty
 {
     // Methode
     types::String* pStrType     = NULL;
-    wchar_t* wcsType            = L"lsoda";
+    const wchar_t* wcsType            = L"lsoda";
     int meth                    = 0;
 
     // y0
index 4490b5c..99e5491 100644 (file)
@@ -18,7 +18,7 @@
 #include "localization.h"
 #include "sci_malloc.h"
 /*---------------------------------------------------------------------------*/
-void dl_genErrorMessage(wchar_t* _pwstCallerName, int _iErr, wchar_t* _pwstLibraryName)
+void dl_genErrorMessage(const wchar_t * _pwstCallerName, int _iErr, const wchar_t * _pwstLibraryName)
 {
     char* pstCaller = wide_string_to_UTF8(_pwstCallerName);
     char* pstLibName = wide_string_to_UTF8(_pwstLibraryName);
index d3cf124..19a3971 100644 (file)
@@ -19,5 +19,5 @@
  * @param errorCode the code of error
  * @param SharedLibraryName name of the library
  */
-DYNAMIC_LINK_IMPEXP void dl_genErrorMessage(wchar_t* _pwstCallerName, int _iErr, wchar_t* _pwstLibraryName);
+DYNAMIC_LINK_IMPEXP void dl_genErrorMessage(const wchar_t* _pwstCallerName, int _iErr, const wchar_t* _pwstLibraryName);
 /*--------------------------------------------------------------------------*/
index 5c13220..0a578dd 100644 (file)
@@ -57,7 +57,7 @@
 #define getOverflowThreshold()                                 C2F(dlamch)((char*)"o", 1L)
 #define isEqual(x,y)                                                                           fabs((double)x - (double)y) <= getRelativeMachinePrecision()
 
-extern double C2F(dlamch) (char *_pszCommand, unsigned long int);
+extern double C2F(dlamch) (const char *_pszCommand, unsigned long int);
 extern double C2F(logp1) (double *_pdblVal);
 extern int C2F(dgemm) (char *_pstTransA, char *_pstTransB, int *_piN, int *_piM, int *_piK, double *_pdblAlpha, double *_pdblA, int *_piLdA,
                        double *_pdblB, int *_piLdB, double *_pdblBeta, double *_pdblC, int *_piLdC);
index c710f3b..193e4bb 100644 (file)
@@ -187,7 +187,7 @@ int sci_dec2base(char *fname, void* pvApiCtx)
         }
     }
 
-    sciErr = createMatrixOfString(pvApiCtx, nbInputArgument(pvApiCtx) + 1, m, n, convertedValues);
+    sciErr = createMatrixOfString(pvApiCtx, nbInputArgument(pvApiCtx) + 1, m, n, (char const* const*) convertedValues);
     freeArrayOfString(convertedValues, m * n);
     convertedValues = NULL;
 
index 159fe41..e4fd0c8 100644 (file)
@@ -196,7 +196,7 @@ SciErr round_poly(void* pvApiCtx, int* _piAddress)
             }
         }
 
-        sciErr = createComplexMatrixOfPoly(pvApiCtx, Rhs + 1, pstVarName, iRows, iCols, piCoeff, pdblRealRet, pdblImgRet);
+        sciErr = createComplexMatrixOfPoly(pvApiCtx, Rhs + 1, pstVarName, iRows, iCols, piCoeff, (const double * const*) pdblRealRet, (const double * const*) pdblImgRet);
         if (sciErr.iErr)
         {
             return sciErr;
@@ -240,7 +240,7 @@ SciErr round_poly(void* pvApiCtx, int* _piAddress)
             }
         }
 
-        sciErr = createMatrixOfPoly(pvApiCtx, Rhs + 1, pstVarName, iRows, iCols, piCoeff, pdblRealRet);
+        sciErr = createMatrixOfPoly(pvApiCtx, Rhs + 1, pstVarName, iRows, iCols, piCoeff, (const double * const*) pdblRealRet);
         if (sciErr.iErr)
         {
             return sciErr;
index 1ebf872..62d91ed 100644 (file)
@@ -225,7 +225,7 @@ types::Function::ReturnValue sci_cumprod(types::typed_list &in, int _iRetCount,
             }
             else
             {
-                char* pstrExpected = NULL;
+                const char* pstrExpected = NULL;
                 if (in.size() == 2)
                 {
                     pstrExpected = "\"*\",\"r\",\"c\",\"m\",\"native\",\"double\"";
index 7daf024..874c96c 100644 (file)
@@ -225,7 +225,7 @@ types::Function::ReturnValue sci_cumsum(types::typed_list &in, int _iRetCount, t
             }
             else
             {
-                char* pstrExpected = NULL;
+                const char* pstrExpected = NULL;
                 if (in.size() == 2)
                 {
                     pstrExpected = "\"*\",\"r\",\"c\",\"m\",\"native\",\"double\"";
index bb5f276..6a3a91a 100644 (file)
@@ -227,7 +227,7 @@ types::Function::ReturnValue sci_prod(types::typed_list &in, int _iRetCount, typ
             }
             else
             {
-                char* pstrExpected = NULL;
+                const char* pstrExpected = NULL;
                 if (in.size() == 2)
                 {
                     pstrExpected = "\"*\",\"r\",\"c\",\"m\",\"native\",\"double\"";
index ab67d06..fdde78f 100644 (file)
@@ -228,7 +228,7 @@ types::Function::ReturnValue sci_sum(types::typed_list &in, int _iRetCount, type
             }
             else
             {
-                char* pstrExpected = NULL;
+                const char* pstrExpected = NULL;
                 if (in.size() == 2)
                 {
                     pstrExpected = "\"*\",\"r\",\"c\",\"m\",\"native\",\"double\"";
index b96e83e..fe7af56 100644 (file)
@@ -645,7 +645,7 @@ void ScilabJavaEnvironmentWrapper::unwraprowstring(int id, const ScilabStringSta
     jboolean isCopy = JNI_FALSE;
     char ** addr = new char*[lenRow];
     jstring * resString = new jstring[lenRow];
-    char * empty = "";
+    char empty = '\0';
 
     for (jsize i = 0; i < lenRow; i++)
     {
@@ -656,7 +656,7 @@ void ScilabJavaEnvironmentWrapper::unwraprowstring(int id, const ScilabStringSta
         }
         else
         {
-            addr[i] = empty;
+            addr[i] = &empty;
         }
     }
 
@@ -698,7 +698,7 @@ void ScilabJavaEnvironmentWrapper::unwrapmatstring(int id, const ScilabStringSta
     jint lenCol = curEnv->GetArrayLength(oneDim);
     char ** addr = new char*[lenRow * lenCol];
     jstring * resString = new jstring[lenRow * lenCol];
-    char * empty = "";
+    char empty = '\0';
 
     for (int i = 0; i < lenRow; i++)
     {
@@ -715,7 +715,7 @@ void ScilabJavaEnvironmentWrapper::unwrapmatstring(int id, const ScilabStringSta
                 }
                 else
                 {
-                    addr[pos] = empty;
+                    addr[pos] = &empty;
                 }
             }
         }
@@ -731,7 +731,7 @@ void ScilabJavaEnvironmentWrapper::unwrapmatstring(int id, const ScilabStringSta
                 }
                 else
                 {
-                    addr[pos] = empty;
+                    addr[pos] = &empty;
                 }
             }
         }
index 8f1e9a3..6c5b0db 100644 (file)
@@ -51,6 +51,6 @@ typedef union
 } entry;
 typedef enum {SF_C, SF_S, SF_LUI, SF_SUI, SF_UI, SF_LI, SF_SI, SF_I, SF_LF, SF_F} sfdir;
 
-FILEIO_IMPEXP int do_xxscanf (wchar_t *fname, FILE *fp, wchar_t *format, int *nargs, wchar_t *strv, int *retval, rec_entry *buf, sfdir *type);
+FILEIO_IMPEXP int do_xxscanf (const wchar_t *fname, FILE *fp, const wchar_t *format, int *nargs, wchar_t *strv, int *retval, rec_entry *buf, sfdir *type);
 #endif /* __DO_XXSCANF_H__ */
 
index 30a2bdc..265bbe1 100644 (file)
@@ -27,8 +27,8 @@
 * @return all the files except '.' & '..'
 */
 
-FILEIO_IMPEXP char** findfiles(char* path, char* filespec, int *sizeListReturned, BOOL warning);
-FILEIO_IMPEXP wchar_t** findfilesW(wchar_t* path, wchar_t* filespec, int *sizeListReturned, BOOL warning);
+FILEIO_IMPEXP char** findfiles(const char* path, const char* filespec, int *sizeListReturned, BOOL warning);
+FILEIO_IMPEXP wchar_t** findfilesW(const wchar_t* path, const wchar_t* filespec, int *sizeListReturned, BOOL warning);
 
 #endif /* __FINDFILES_H__ */
 /*--------------------------------------------------------------------------*/
index a459f31..c623e34 100644 (file)
@@ -37,7 +37,7 @@ typedef enum
     MOPEN_INVALID_STATUS = 5
 } mopenError;
 
-FILEIO_IMPEXP int mopen(wchar_t* _pstFilename, wchar_t* _pstMode, int _iSwap, int* _piID);
+FILEIO_IMPEXP int mopen(const wchar_t* _pstFilename, const wchar_t* _pstMode, int _iSwap, int* _piID);
 
 #endif  /* __MOPEN_H__ */
 /*--------------------------------------------------------------------------*/
index fccdf55..be989e8 100644 (file)
@@ -143,7 +143,7 @@ int sci_chdir(char *fname, void* pvApiCtx)
             wchar_t *currentDir = scigetcwdW(&ierr);
             if ( (ierr == 0) && currentDir)
             {
-                sciErr = createMatrixOfWideString(pvApiCtx, Rhs + 1, 1, 1, &currentDir);
+                sciErr = createMatrixOfWideString(pvApiCtx, Rhs + 1, 1, 1, (wchar_t const* const*) &currentDir);
             }
             else
             {
index 2a1215d..745d866 100644 (file)
@@ -204,7 +204,7 @@ int sci_fscanfMat(char *fname, void* pvApiCtx)
             {
                 if (results->text)
                 {
-                    sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, results->sizeText, 1, results->text);
+                    sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, results->sizeText, 1, (char const* const*) results->text);
                     if (sciErr.iErr)
                     {
                         FREE(filename);
index d5af14b..c179326 100644 (file)
@@ -46,7 +46,7 @@ int sci_pwd(char *fname, void* pvApiCtx)
         int m1 = (int)strlen(path);
 
         n1 = 1;
-        sciErr = createMatrixOfString(pvApiCtx, Rhs + 1, 1, 1, &path);
+        sciErr = createMatrixOfString(pvApiCtx, Rhs + 1, 1, 1, (char const* const*) &path);
         if (sciErr.iErr)
         {
             printError(&sciErr, 0);
index 875da9a..47e14f2 100644 (file)
@@ -35,7 +35,7 @@ Function::ReturnValue sci_mopen(typed_list &in, int _iRetCount, typed_list &out)
     int iErr                = 0;
     int iID                 = 0;
     wchar_t* pstFilename    = NULL;
-    wchar_t* pstMode        = L"rb";
+    const wchar_t* pstMode        = L"rb";
     int iSwap               = 0;
 
     //check output parameters
index 9463676..d582e0c 100644 (file)
 #define SIGNED          -1
 #define UNSIGNED        1
 
+#ifdef LITTLE_ENDIAN
+#undef LITTLE_ENDIAN
+#endif
 #define LITTLE_ENDIAN   1
+#ifdef BIG_ENDIAN
+#undef BIG_ENDIAN
+#endif
 #define BIG_ENDIAN      -1
 
 #define TYPE_LONG_LONG  8
@@ -44,4 +50,4 @@ int readChar(FILE* _pF, int _iEndian, unsigned char* val);
 int checkEndian(char _endian);
 int checkType(char _type);
 
-#endif /* !__CONVERT_TOOLS_H__ */
\ No newline at end of file
+#endif /* !__CONVERT_TOOLS_H__ */
index 15e991d..9ac4594 100644 (file)
@@ -44,7 +44,7 @@ static void set_xxscanf(FILE * fp, XXSCANF * xxscanf, wchar_t **target, wchar_t
 }
 
 /*--------------------------------------------------------------------------*/
-int do_xxscanf (wchar_t *fname, FILE *fp, wchar_t *format, int *nargs, wchar_t *strv, int *retval, rec_entry *buf, sfdir *type)
+int do_xxscanf (const wchar_t *fname, FILE *fp, const wchar_t *format, int *nargs, wchar_t *strv, int *retval, rec_entry *buf, sfdir *type)
 {
     int nc[MAXSCAN];
     int n_directive_count = 0;
index 1b3c421..d3ea23e 100644 (file)
@@ -116,7 +116,7 @@ char** findfiles(char *path, char *filespec, int *sizeListReturned, BOOL warning
 }
 #else
 /*--------------------------------------------------------------------------*/
-char **findfiles(char *path, char *filespec, int *sizeListReturned, BOOL warning)
+char **findfiles(const char *path, const char *filespec, int *sizeListReturned, BOOL warning)
 {
     char **ListFiles = NULL;
     int nbElements = 0;
@@ -161,7 +161,7 @@ char **findfiles(char *path, char *filespec, int *sizeListReturned, BOOL warning
     return ListFiles;
 }
 /*--------------------------------------------------------------------------*/
-wchar_t** findfilesW(wchar_t* path, wchar_t* filespec, int* sizeListReturned, BOOL warning)
+wchar_t** findfilesW(const wchar_t* path, const wchar_t* filespec, int* sizeListReturned, BOOL warning)
 {
     int i = 0;
     char* pstPath = wide_string_to_UTF8(path);
index 6c21b1a..5026a45 100644 (file)
@@ -33,8 +33,8 @@ extern "C"
 /*--------------------------------------------------------------------------*/
 struct VARIABLEALIAS
 {
-    wchar_t *Alias;
-    wchar_t *VariableName;
+    const wchar_t *Alias;
+    const wchar_t *VariableName;
     symbol::Variable* var;
 };
 /*--------------------------------------------------------------------------*/
index a6e97dd..404ff21 100644 (file)
@@ -24,7 +24,7 @@ extern "C"
 #include "warningmode.h"
 #include "charEncoding.h"
 
-extern int C2F(clunit)(int* , char*, int*, int);
+extern int C2F(clunit)(int* , const char*, int*, int);
 }
 /*--------------------------------------------------------------------------*/
 int mcloseCurrentFile()
@@ -68,7 +68,7 @@ int mclose(int _iID)
         if(pFile->getFileType() == 1)
         {
             int iFileNum = -_iID; // -_iID to close file _iID
-            char* stFilename = ""; // file will be closed by this num
+            const char* stFilename = ""; // file will be closed by this num
             int iMode = 0; // not used in close mode
             return C2F(clunit)(&iFileNum, stFilename, &iMode, 1L);
         }
index a39311d..7cee344 100644 (file)
@@ -33,7 +33,12 @@ extern "C"
 #include <iostream>
 #include <fstream>
 /*--------------------------------------------------------------------------*/
+// we do not want to depend on the OS specific LINE_MAX setting
+#ifdef LINE_MAX
+#undef LINE_MAX
+#endif
 #define LINE_MAX 4096
+
 #define CR L'\r'
 #define LF L'\n'
 #define EMPTYSTRW L""
index c219218..d66e06a 100644 (file)
@@ -28,7 +28,7 @@ extern "C"
 #include "os_wfopen.h"
 }
 /*--------------------------------------------------------------------------*/
-int mopen(wchar_t* _pstFilename, wchar_t* _pstMode, int _iSwap, int* _piID)
+int mopen(const wchar_t* _pstFilename, const wchar_t* _pstMode, int _iSwap, int* _piID)
 {
     int lenChar = 0, testRep = 1;
 
index 88a5ba5..53de798 100644 (file)
@@ -365,7 +365,7 @@ types::Function::ReturnValue sci_exec(types::typed_list &in, int _iRetCount, typ
                 }
             }
         }
-        catch (ScilabMessage sm)
+        catch (const ScilabMessage& sm)
         {
             scilabErrorW(sm.GetErrorMessage().c_str());
 
@@ -407,7 +407,7 @@ types::Function::ReturnValue sci_exec(types::typed_list &in, int _iRetCount, typ
             mclose(iID);
             throw ast::ScilabMessage((*j)->location_get());
         }
-        catch (ast::ScilabError se)
+        catch (const ast::ScilabError& se)
         {
             if (ConfigVariable::getLastErrorNumber() == 0)
             {
index 5b006c8..45193e9 100644 (file)
@@ -21,13 +21,13 @@ using namespace types;
 Function::ReturnValue sci_funclist(types::typed_list &in, int _iRetCount, types::typed_list &out)
 {
     symbol::Context* pContext = symbol::Context::getInstance();
-
-    wchar_t* pstLibName = NULL;
+;
     if (in.size() > 1)
     {
         return Function::Error;
     }
 
+    std::wstring pstLibName;
     if (in.size() == 1)
     {
         InternalType* pIT = in[0];
index 1fc075a..97dab51 100644 (file)
@@ -412,11 +412,11 @@ bool FuncManager::ExecuteStartFile(wstring _stModule)
         parser.getTree()->accept(execStart);
 
     }
-    catch (ast::ScilabMessage sm)
+    catch (const ast::ScilabMessage& sm)
     {
         scilabWriteW(sm.GetErrorMessage().c_str());
     }
-    catch (ast::ScilabError se)
+    catch (const ast::ScilabError& se)
     {
         scilabWriteW(se.GetErrorMessage().c_str());
     }
index 7d4ca76..d24fd83 100644 (file)
@@ -197,7 +197,7 @@ int sci_set(char *fname, void *pvApiCtx)
 
         if (iPropertyFound)
         {
-            callSetProperty(pvApiCtx, NULL, pvData, iType2, iRows2, iCols2, pstProperty);
+            callSetProperty(pvApiCtx, 0, pvData, iType2, iRows2, iCols2, pstProperty);
             if (iType2 == sci_strings)
             {
                 //free allocated data
index dc5bc1e..22fed9b 100644 (file)
@@ -188,7 +188,7 @@ int sci_zoom_rect(char *fname, void *pvApiCtx)
         if (checkInputArgumentType(pvApiCtx, 1, sci_handles))
         {
             int iZoomedObject = getZoomedObject(pvApiCtx, fname);
-            if (iZoomedObject == NULL)
+            if (iZoomedObject == 0)
             {
                 return -1;
             }
index 87d1ab2..f99f6ca 100755 (executable)
@@ -288,14 +288,14 @@ SetPropertyHashTable *createScilabSetHashTable(void)
 }
 
 /*--------------------------------------------------------------------------*/
-int callSetProperty(void* _pvCtx, int iObjUID, void* _pvData, int valueType, int nbRow, int nbCol, char *propertyName)
+int callSetProperty(void* _pvCtx, int iObjUID, void* _pvData, int valueType, int nbRow, int nbCol, const char *propertyName)
 {
     setPropertyFunc accessor = searchSetHashtable(setHashTable, propertyName);
 
     if (accessor == NULL)
     {
         Scierror(999, _("Unknown property: %s.\n"), propertyName);
-        return -1;
+        return NULL;
     }
     return accessor(_pvCtx, iObjUID, _pvData, valueType, nbRow, nbCol);
 }
index de2dfb7..df286d6 100644 (file)
@@ -39,6 +39,6 @@ GRAPHICS_IMPEXP void destroyScilabSetHashTable(void);
  *         -1 if an error occurred in the get function
  *          1 if the property was not found
  */
-GRAPHICS_IMPEXP int callSetProperty(void* _pvCtx, int iObjUID, void* _pvData, int valueType, int nbRow, int nbCol, char * propertyName);
+GRAPHICS_IMPEXP int callSetProperty(void* _pvCtx, int iObjUID, void* _pvData, int valueType, int nbRow, int nbCol, const char * propertyName);
 
 #endif /* _SET_HASH_TABLE_H_ */
index 9b0fbcb..2b5412e 100644 (file)
@@ -56,7 +56,7 @@ char ** createCopyStringMatrixFromStack(void* _pvData, int _iNbItem)
 
 }
 /*--------------------------------------------------------------------------*/
-int tryGetBooleanValueFromStack(void* _pvData, int _iType, int _iRows, int _iCols, char* _pstPropertyName)
+int tryGetBooleanValueFromStack(void* _pvData, int _iType, int _iRows, int _iCols, char const* _pstPropertyName)
 {
     if (_iType == sci_strings)
     {
index 9b53e1b..05beee8 100644 (file)
@@ -43,7 +43,7 @@ GRAPHICS_IMPEXP char ** createCopyStringMatrixFromStack(void* _pvData, int nbEle
  *         FALSE if the given parameter is 'off', %F, 'F', 0, ...
  *         NOT_A_BOOLEAN_VALUE otherwise
  */
-GRAPHICS_IMPEXP int tryGetBooleanValueFromStack(void* _pvData, int valueType, int nbRow, int nbCol, char* propertyName);
+GRAPHICS_IMPEXP int tryGetBooleanValueFromStack(void* _pvData, int valueType, int nbRow, int nbCol, const char* propertyName);
 // with that we are sure to be nether equal to TRUE nor FALSE
 #define NOT_A_BOOLEAN_VALUE (2*FALSE) - TRUE
 
index d52c77f..fb6e96b 100644 (file)
@@ -31,7 +31,7 @@ void* get_ambient_color_property(void* _pvCtx, int iObjUID)
     if (color == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "ambient_color");
-        return -1;
+        return NULL;
     }
 
     return sciReturnMatrix(color, 1, 3);
index 260e191..66822b9 100644 (file)
@@ -36,7 +36,7 @@ void* get_auto_margins_property(void* _pvCtx, int iObjUID)
     if (piAutoMargins == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "auto_margins");
-        return -1;
+        return NULL;
     }
 
     if (iAutoMargins)
index 1f2af37..17ea0bf 100644 (file)
@@ -153,7 +153,7 @@ void* getLineBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
     int* piRounded      = &iRounded;
     int iListSize       = 4;
 
-    wchar_t* pstFieldList[] = {L"LineBorder", L"color", L"thickness", L"rounded"};
+    const wchar_t * pstFieldList[] = {L"LineBorder", L"color", L"thickness", L"rounded"};
 
     getGraphicObjectProperty(_iObjUID, __GO_UI_FRAME_BORDER_COLOR__, jni_string, (void **)&pstColor);
     if (pstColor == NULL)
@@ -212,24 +212,24 @@ void* getSoftBevelBorder(types::InternalType* _pITParent, int _iPos, int _iObjUI
 /*------------------------------------------------------------------------*/
 void* getCommonBevelBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID, int _iBevel)
 {
-    wchar_t* pstFieldList1[]       = {L"BevelBorder", L"type", L"hlouter", L"hlinner", L"shadowouter", L"shadowinner"};
-    wchar_t* pstFieldList2[]       = {L"BevelBorder", L"type", L"hlouter", L"shadowouter"};
-    wchar_t** pstFieldList         = pstFieldList1;
+    const wchar_t * pstFieldList1[]     = {L"BevelBorder", L"type", L"hlouter", L"hlinner", L"shadowouter", L"shadowinner"};
+    const wchar_t * pstFieldList2[]     = {L"BevelBorder", L"type", L"hlouter", L"shadowouter"};
+    wchar_t const* const* pstFieldList  = pstFieldList1;
 
-    wchar_t* pstSoftFieldList1[]   = {L"SoftBevelBorder", L"type", L"hlouter", L"hlinner", L"shadowouter", L"shadowinner"};
-    wchar_t* pstSoftFieldList2[]   = {L"SoftBevelBorder", L"type", L"hlouter", L"shadowouter"};
-    wchar_t** pstSoftFieldList     = pstSoftFieldList1;
+    const wchar_t * pstSoftFieldList1[] = {L"SoftBevelBorder", L"type", L"hlouter", L"hlinner", L"shadowouter", L"shadowinner"};
+    const wchar_t * pstSoftFieldList2[] = {L"SoftBevelBorder", L"type", L"hlouter", L"shadowouter"};
+    wchar_t const* const* pstSoftFieldList = pstSoftFieldList1;
 
     int iListSize = 6;
 
     // properties
-    int iType               = 0;
-    int* piType             = &iType;
-    wchar_t* pstType[]      = {L"raised", L"lowered"};
-    char* pstHlOutColor     = NULL;
-    char* pstHlInColor      = NULL;
-    char* pstShadowOutColor = NULL;
-    char* pstShadowInColor  = NULL;
+    int iType                   = 0;
+    int* piType                 = &iType;
+    const wchar_t * pstType[]   = {L"raised", L"lowered"};
+    char* pstHlOutColor         = NULL;
+    char* pstHlInColor          = NULL;
+    char* pstShadowOutColor     = NULL;
+    char* pstShadowInColor      = NULL;
 
     getGraphicObjectProperty(_iObjUID, __GO_UI_FRAME_BORDER_TYPE__, jni_int, (void **)&piType);
     if (piType == NULL)
@@ -296,17 +296,17 @@ void* getCommonBevelBorder(types::InternalType* _pITParent, int _iPos, int _iObj
 /*------------------------------------------------------------------------*/
 void* getEtchedBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 {
-    wchar_t* pstFieldList1[]    = {L"EtchedBorder", L"type", L"hl", L"shadow"};
-    wchar_t* pstFieldList2[]    = {L"EtchedBorder", L"hl", L"shadow"};
-    wchar_t** pstFieldList      = pstFieldList1;
-    int iListSize               = 4;
+    const wchar_t * pstFieldList1[] = {L"EtchedBorder", L"type", L"hl", L"shadow"};
+    const wchar_t * pstFieldList2[] = {L"EtchedBorder", L"hl", L"shadow"};
+    wchar_t const* const* pstFieldList = pstFieldList1;
+    int iListSize                   = 4;
 
     // properties
-    int iType               = 0;
-    int* piType             = &iType;
-    wchar_t* pstType[]      = {L"raised", L"lowered"};
-    char* pstHlOutColor     = NULL;
-    char* pstShadowOutColor = NULL;
+    int iType                   = 0;
+    int* piType                 = &iType;
+    const wchar_t * pstType[]   = {L"raised", L"lowered"};
+    char* pstHlOutColor         = NULL;
+    char* pstShadowOutColor     = NULL;
 
     getGraphicObjectProperty(_iObjUID, __GO_UI_FRAME_BORDER_TYPE__, jni_int, (void **)&piType);
     getGraphicObjectProperty(_iObjUID, __GO_UI_FRAME_BORDER_HIGHLIGHT_OUT__, jni_string, (void **)&pstHlOutColor);
@@ -363,11 +363,11 @@ void* getEtchedBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 /*------------------------------------------------------------------------*/
 void* getTitledBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 {
-    wchar_t* pstFieldList1[]    = {L"TitledBorder", L"border", L"title", L"justification", L"position", L"font", L"color"};
-    wchar_t* pstFieldList2[]    = {L"TitledBorder", L"title"};
-    wchar_t** pstFieldList      = pstFieldList1;
-    wchar_t* pstJustification[] = {L"leading" , L"left" , L"center" , L"right" , L"trailing"};
-    wchar_t* pstPosition[]      = {L"top" , L"above_top" , L"below_top" , L"bottom" , L"above_bottom", L"below_bottom"};
+    const wchar_t * pstFieldList1[]     = {L"TitledBorder", L"border", L"title", L"justification", L"position", L"font", L"color"};
+    const wchar_t * pstFieldList2[]     = {L"TitledBorder", L"title"};
+    wchar_t const* const* pstFieldList  = pstFieldList1;
+    const wchar_t * pstJustification[]  = {L"leading" , L"left" , L"center" , L"right" , L"trailing"};
+    const wchar_t * pstPosition[]       = {L"top" , L"above_top" , L"below_top" , L"bottom" , L"above_bottom", L"below_bottom"};
 
     int iListSize = 7;
 
@@ -486,7 +486,7 @@ void* getTitledBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 /*------------------------------------------------------------------------*/
 void* getEmptyBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 {
-    wchar_t* pstFieldList[] = {L"EmptyBorder", L"top", L"left", L"bottom", L"right"};
+    const wchar_t * pstFieldList[] = {L"EmptyBorder", L"top", L"left", L"bottom", L"right"};
     int iListSize           = 5;
     double* pdblPosition    = NULL;
 
@@ -521,7 +521,7 @@ void* getEmptyBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 /*------------------------------------------------------------------------*/
 void* getCompoundBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 {
-    wchar_t* pstFieldList[] = {L"CompoundBorder", L"outer", L"inner"};
+    const wchar_t * pstFieldList[] = {L"CompoundBorder", L"outer", L"inner"};
     int iListSize           = 3;
 
     // properties
@@ -568,7 +568,7 @@ void* getCompoundBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID
 /*------------------------------------------------------------------------*/
 void* getMatteBorder(types::InternalType* _pITParent, int _iPos, int _iObjUID)
 {
-    wchar_t* pstFieldList[] = {L"MatteBorder", L"top", L"left", L"bottom", L"right", L"color"};
+    const wchar_t * pstFieldList[] = {L"MatteBorder", L"top", L"left", L"bottom", L"right", L"color"};
     int iListSize           = 6;
 
     // properties
index b5e6447..6bbb4c3 100644 (file)
@@ -42,7 +42,7 @@ void* get_box_property(void* _pvCtx, int iObjUID)
     if (piType == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "type");
-        return -1;
+        return NULL;
     }
 
 
index 41bbf30..41d20cc 100644 (file)
@@ -47,7 +47,7 @@ void* get_data_bounds_property(void* _pvCtx, int iObjUID)
     if (piView == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "view");
-        return -1;
+        return NULL;
     }
 
     /**DJ.Abdemouche 2003**/
index 795af54..17d26f0 100644 (file)
@@ -30,7 +30,7 @@
 void* get_datatips_property(void* _pvCtx, int iObjUID)
 {
     int i = 0;
-    int status = 0;
+    void* status = 0;
     int iDatatipCount = 0;
     int* piDatatipCount = &iDatatipCount;
     int* piDatatip = NULL;
index 4ecea82..10b8c1a 100644 (file)
@@ -31,7 +31,7 @@ void* get_diffuse_color_property(void* _pvCtx, int iObjUID)
     if (color == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "diffuse_color");
-        return -1;
+        return NULL;
     }
 
     return sciReturnMatrix(color, 1, 3);
index b673bd3..af68d52 100644 (file)
@@ -31,7 +31,7 @@ void* get_direction_property(void* _pvCtx, int iObjUID)
     if (direction == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "direction");
-        return -1;
+        return NULL;
     }
 
     return sciReturnRowVector(direction, 3);
index 5d4663e..aa58a8f 100644 (file)
@@ -25,7 +25,7 @@ void* get_display_function_data_property(void* _pvCtx, int iObjUID)
     int *piDisplayDataSize = &iDisplayDataSize;
     int *piDisplayData = NULL;
 
-    int status = 0;
+    void* status = NULL;
 
     getGraphicObjectProperty(iObjUID, __GO_DATA_MODEL_DISPLAY_FUNCTION_SIZE__, jni_int, (void **)&piDisplayDataSize);
     getGraphicObjectProperty(iObjUID, __GO_DATA_MODEL_DISPLAY_FUNCTION__, jni_int_vector, (void **)&piDisplayData);
index e43576d..98cde02 100644 (file)
@@ -32,7 +32,7 @@ void* get_figure_closerequestfcn_property(void* _pvCtx, int iObjUID)
     if (piType == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "type");
-        return -1;
+        return NULL;
     }
     if (iType != __GO_FIGURE__)
     {
index 0b52957..e1baa4c 100644 (file)
@@ -53,7 +53,7 @@ void* get_grid_property(void* _pvCtx, int iObjUID)
     if (piGridColor == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid");
-        return -1;
+        return NULL;
     }
 
     grid[1] = (double) iGridColor;
@@ -62,7 +62,7 @@ void* get_grid_property(void* _pvCtx, int iObjUID)
     if (piGridColor == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid");
-        return -1;
+        return NULL;
     }
 
     grid[2] = (double) iGridColor;
index 772199a..5169365 100644 (file)
@@ -40,7 +40,7 @@ void* get_grid_style_property(void* _pvCtx, int iObjUID)
     if (piGridStyle == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid_style");
-        return -1;
+        return NULL;
     }
 
     grid[0] = (double) iGridStyle;
@@ -49,7 +49,7 @@ void* get_grid_style_property(void* _pvCtx, int iObjUID)
     if (piGridStyle == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid_style");
-        return -1;
+        return NULL;
     }
 
     grid[1] = (double) iGridStyle;
@@ -58,7 +58,7 @@ void* get_grid_style_property(void* _pvCtx, int iObjUID)
     if (piGridStyle == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid_style");
-        return -1;
+        return NULL;
     }
 
     grid[2] = (double) iGridStyle;
index 83a09ca..d54d7a9 100644 (file)
@@ -40,7 +40,7 @@ void* get_grid_thickness_property(void* _pvCtx, int iObjUID)
     if (pdGridThickness == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid_thickness");
-        return -1;
+        return NULL;
     }
 
     grid[0] = dGridThickness;
@@ -49,7 +49,7 @@ void* get_grid_thickness_property(void* _pvCtx, int iObjUID)
     if (pdGridThickness == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid");
-        return -1;
+        return NULL;
     }
 
     grid[1] = dGridThickness;
@@ -58,7 +58,7 @@ void* get_grid_thickness_property(void* _pvCtx, int iObjUID)
     if (pdGridThickness == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "grid");
-        return -1;
+        return NULL;
     }
 
     grid[2] = dGridThickness;
index ee2a8b6..ac5be06 100644 (file)
@@ -33,7 +33,7 @@ void* get_groupname_property(void* _pvCtx, int iObjUID)
     if (pstGroupName == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "groupname");
-        return -1;
+        return NULL;
     }
 
     return sciReturnString(pstGroupName);
index 64481b9..828347b 100644 (file)
@@ -39,7 +39,7 @@ void* get_layout_options_property(void* _pvCtx, int iObjUID)
     if (piLayout == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "layout_options");
-        return -1;
+        return NULL;
     }
 
     switch (iLayout)
@@ -65,14 +65,14 @@ void* get_layout_options_property(void* _pvCtx, int iObjUID)
             if (piGrid == NULL)
             {
                 Scierror(999, _("'%s' property does not exist for this handle.\n"), "layout_options");
-                return -1;
+                return NULL;
             }
 
             getGraphicObjectProperty(iObjUID, __GO_GRID_OPT_PADDING__, jni_int_vector, (void **)&piPadding);
             if (piPadding == NULL)
             {
                 Scierror(999, _("'%s' property does not exist for this handle.\n"), "layout_options");
-                return -1;
+                return NULL;
             }
 
             //convert to double
@@ -99,7 +99,7 @@ void* get_layout_options_property(void* _pvCtx, int iObjUID)
             if (piPadding == NULL)
             {
                 Scierror(999, _("'%s' property does not exist for this handle.\n"), "layout_options");
-                return -1;
+                return NULL;
             }
 
             //convert to double
index 4bcc2f0..0a25eab 100644 (file)
@@ -34,7 +34,7 @@ void* get_layout_property(void* _pvCtx, int iObjUID)
     if (piLayout == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "layout");
-        return -1;
+        return NULL;
     }
 
     switch (iLayout)
index 2e22f9b..d130cb1 100644 (file)
@@ -33,7 +33,7 @@ void* get_light_type_property(void* _pvCtx, int iObjUID)
     if (piType == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "light_type");
-        return -1;
+        return NULL;
     }
 
     if (type == 0)
index 52405c9..a395a9c 100644 (file)
@@ -36,7 +36,7 @@ void* get_line_width_property(void* _pvCtx, int iObjUID)
     if (pdblLineWidth == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "line_width");
-        return -1;
+        return NULL;
     }
 
     return sciReturnDouble(dblLineWidth);
index 3d290f1..b3a3d5e 100644 (file)
@@ -51,7 +51,7 @@ void* get_log_flags_property(void* _pvCtx, int iObjUID)
     if (piLogFlag == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "log_flag");
-        return -1;
+        return NULL;
     }
 
     logFlags[1] = iLogFlag;
@@ -60,7 +60,7 @@ void* get_log_flags_property(void* _pvCtx, int iObjUID)
     if (piLogFlag == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "log_flag");
-        return -1;
+        return NULL;
     }
 
     logFlags[2] = iLogFlag;
index b98eb5d..9c64d57 100644 (file)
@@ -36,7 +36,7 @@ void* get_mark_offset_property(void* _pvCtx, int iObjUID)
     if (piMarkOffset == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "mark_offset");
-        return -1;
+        return NULL;
     }
 
     return sciReturnDouble(iMarkOffset);
index 1082f44..893b40f 100644 (file)
@@ -38,7 +38,7 @@ void* get_marks_count_property(void* _pvCtx, int iObjUID)
     if (piMarksCount == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "marks_count");
-        return -1;
+        return NULL;
     }
 
     return sciReturnDouble(iMarksCount);
index f56c219..4a81a92 100644 (file)
@@ -33,7 +33,7 @@ void* get_material_shininess_property(void* _pvCtx, int iObjUID)
     if (pShininess == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "material_shininess");
-        return -1;
+        return NULL;
     }
 
     return sciReturnDouble(shininess);
index 5c33615..c284a25 100644 (file)
@@ -28,7 +28,7 @@ void* get_menubar_property(void* _pvCtx, int iObjUID)
     if (piMenu == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "menubar");
-        return -1;
+        return NULL;
     }
 
     switch (iMenu)
@@ -50,7 +50,7 @@ void* get_menubar_visible_property(void* _pvCtx, int iObjUID)
     if (piVisible == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "menubar_visible");
-        return FALSE;
+        return NULL;
     }
 
     if (iVisible == 0)
index 0b3c239..e25f6c1 100644 (file)
@@ -43,7 +43,7 @@ void* get_position_property(void* _pvCtx, int iObjUID)
     if (piType == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "type");
-        return -1;
+        return NULL;
     }
 
     /* Special figure case */
@@ -96,7 +96,7 @@ void* get_position_property(void* _pvCtx, int iObjUID)
         if (position == NULL)
         {
             Scierror(999, _("'%s' property does not exist for this handle.\n"), "position");
-            return -1;
+            return NULL;
         }
 
         return sciReturnRowVector(position, 3);
index 876ea66..610f9d0 100644 (file)
@@ -37,7 +37,7 @@ void* get_rect_property(void* _pvCtx, int iObjUID)
     if (rect == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "rect");
-        return -1;
+        return NULL;
     }
 
     _rect[0] = rect[0];
index 01c0852..91e80c7 100644 (file)
@@ -27,7 +27,7 @@ void* get_scrollable_property(void* _pvCtx, int iObjUID)
     if (piScrollable == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "scrollable");
-        return -1;
+        return NULL;
     }
 
     if (iScrollable)
index ebe44e7..f002917 100644 (file)
@@ -50,7 +50,7 @@ void* get_segs_color_property(void* _pvCtx, int iObjUID)
     if (piNbSegs == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "segs_color");
-        return -1;
+        return NULL;
     }
 
     return sciReturnRowIntVector(segsColors, iNbSegs);
index 0490dfb..5a56a44 100644 (file)
@@ -31,7 +31,7 @@ void* get_specular_color_property(void* _pvCtx, int iObjUID)
     if (color == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "specular_color");
-        return -1;
+        return NULL;
     }
 
     return sciReturnMatrix(color, 1, 3);
index 6984df3..7fd38b9 100644 (file)
@@ -46,7 +46,7 @@ void* get_sub_tics_property(void* _pvCtx, int iObjUID)
     if (piType == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "type");
-        return -1;
+        return NULL;
     }
 
     /*
@@ -84,7 +84,7 @@ void* get_sub_tics_property(void* _pvCtx, int iObjUID)
         if (piSubTicks == NULL)
         {
             Scierror(999, _("'%s' property does not exist for this handle.\n"), "sub_ticks");
-            return -1;
+            return NULL;
         }
 
         sub_ticks[1] = iSubTicks;
@@ -93,7 +93,7 @@ void* get_sub_tics_property(void* _pvCtx, int iObjUID)
         if (piSubTicks == NULL)
         {
             Scierror(999, _("'%s' property does not exist for this handle.\n"), "sub_ticks");
-            return -1;
+            return NULL;
         }
 
         sub_ticks[2] = iSubTicks;
@@ -102,7 +102,7 @@ void* get_sub_tics_property(void* _pvCtx, int iObjUID)
         if (piView == NULL)
         {
             Scierror(999, _("'%s' property does not exist for this handle.\n"), "view");
-            return -1;
+            return NULL;
         }
 
         if (iView == 1)
index 81caf04..c65d286 100644 (file)
@@ -51,7 +51,7 @@ void* get_title_position_property(void* _pvCtx, int iObjUID)
     if (piPos == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "title_position");
-        return -1;
+        return NULL;
     }
 
     switch (iPos)
index eed4d0d..a44b771 100644 (file)
@@ -38,7 +38,7 @@ void* get_ticks_format_property(void* _pvCtx, int iObjUID)
         if (fmts[i] == NULL)
         {
             Scierror(999, _("'%s' property does not exist for this handle.\n"), "ticks_format");
-            return -1;
+            return NULL;
         }
     }
 
index 5da497b..595e1ee 100644 (file)
@@ -38,7 +38,7 @@ void* get_ticks_st_property(void* _pvCtx, int iObjUID)
         if (dbls == NULL)
         {
             Scierror(999, _("'%s' property does not exist for this handle.\n"), "ticks_st");
-            return -1;
+            return NULL;
         }
         factors[2 * i] = dbls[0];
         factors[2 * i + 1] = dbls[1];
index 03990c6..3de3055 100644 (file)
@@ -28,7 +28,7 @@ void* get_toolbar_property(void* _pvCtx, int iObjUID)
     if (pitool == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "toolbar");
-        return -1;
+        return NULL;
     }
 
     switch (itool)
index 6820b34..5f3e2eb 100644 (file)
@@ -48,7 +48,7 @@ void* get_triangles_property(void* _pvCtx, int iObjUID)
     if (piNumTriangles == NULL)
     {
         Scierror(999, _("Wrong value for '%s' property.\n"), "triangles");
-        return -1;
+        return NULL;
     }
 
     return sciReturnMatrix(triangles, numTriangles , 5);
index e87334e..56f0c15 100644 (file)
@@ -33,7 +33,7 @@ void* get_use_color_material_property(void* _pvCtx, int iObjUID)
     if (piColorMaterial == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "use_color_material");
-        return -1;
+        return NULL;
     }
 
     if (iColorMaterial)
index 9781705..520a2e8 100644 (file)
@@ -47,7 +47,7 @@ void* get_xtics_coord_property(void* _pvCtx, int iObjUID)
     if (xNumberTicks == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "xtics_coord");
-        return -1;
+        return NULL;
     }
 
     return sciReturnRowVector(xTicksCoords, *xNumberTicks);
index d8078ca..9332ddf 100644 (file)
@@ -47,7 +47,7 @@ void* get_ytics_coord_property(void* _pvCtx, int iObjUID)
     if (piYNumberTicks == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "ytics_coord");
-        return -1;
+        return NULL;
     }
 
     return sciReturnRowVector(yTicksCoords, iYNumberTicks);
index c4d7bcb..645713c 100644 (file)
@@ -53,7 +53,7 @@ void* get_z_ticks_property(void* _pvCtx, int iObjUID)
     if (piView == NULL)
     {
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "view");
-        return -1;
+        return NULL;
     }
 
     if (iNbTicks == 0 || iView == 0)
index 640f7c9..dc016e7 100644 (file)
@@ -39,7 +39,7 @@ int set_current_entity_property(void* _pvCtx, int iObjUID, void* _pvData, int va
     {
         /* This property should not be called on an handle */
         Scierror(999, _("'%s' property does not exist for this handle.\n"), "current_entity");
-        return -1;
+        return SET_PROPERTY_ERROR;
     }
 
     if (valueType != sci_handles)
index 05f4a5f..b938a9d 100644 (file)
@@ -107,14 +107,14 @@ int set_xtics_coord_property(void* _pvCtx, int iObjUID, void* _pvData, int value
     {
         /* Something wrong happened */
         FREE(vector);
-        return -1;
+        return SET_PROPERTY_ERROR;
     }
 
     if (ComputeC_format(iObjUID, c_format) != 0)
     {
         /* Something wrong happened */
         FREE(vector);
-        return -1;
+        return SET_PROPERTY_ERROR;
     }
 
     stringVector = copyFormatedArray(vector, N, c_format, 256);
index ababafc..209ecb8 100644 (file)
@@ -85,7 +85,7 @@ unsigned long getHandleFromStack(size_t stackPointer)
 }
 
 /*--------------------------------------------------------------------------*/
-int callSetProperty(void* _pvCtx, int pObjUID, void* _pvData, int valueType, int nbRow, int nbCol, char * propertyName)
+int callSetProperty(void* _pvCtx, int pObjUID, void* _pvData, int valueType, int nbRow, int nbCol, const char * propertyName)
 {
     return -1;
 }
index deeb774..09ea786 100644 (file)
@@ -56,6 +56,6 @@ GUI_IMPEXP void* GetUicontrolRelief(void* _pvCtx, int iObjUID);
 GUI_IMPEXP void* GetConsoleUseDeprecatedLF(void* _pvCtx, int iObjUID);
 GUI_IMPEXP void* GetUicontrolTooltipString(void* _pvCtx, int iObjUID);
 
-char *IntToStyle(int _iStyle);
+const char *IntToStyle(int _iStyle);
 
 #endif /* __GET_UICONTROL_H__ */
index be961ac..394beaf 100644 (file)
@@ -58,5 +58,5 @@ GUI_IMPEXP int SetConsoleShowHiddenHandles(void* _pvCtx, int iObjUID, void* _pvD
 GUI_IMPEXP int SetConsoleShowHiddenProperties(void* _pvCtx, int iObjUID, void* _pvData, int valueType, int nbRow, int nbCol ) ;
 GUI_IMPEXP int SetConsoleUseDeprecatedLF(void* _pvCtx, int iObjUID, void* _pvData, int valueType, int nbRow, int nbCol);
 
-char *IntToStyle(int _iStyle);
+const char *IntToStyle(int _iStyle);
 #endif /* __SET_UICONTROL_H__ */
index f44f82e..0a5ac3b 100644 (file)
@@ -172,7 +172,7 @@ int sci_uigetdir(char *fname, void* pvApiCtx)
     }
     else
     {
-        char* empty = "";
+        const char * empty = "";
         /* The user canceled the selection --> returns an empty string */
         sciErr = createMatrixOfString(pvApiCtx, nbInputArgument(pvApiCtx) + 1, 1, 1, &empty);
         if (sciErr.iErr)
index 414097b..2bdd896 100644 (file)
@@ -20,7 +20,7 @@ extern "C"
  ** \brief Get the style of an uicontrol object
  */
 
-char *IntToStyle(int _iStyle)
+const char *IntToStyle(int _iStyle)
 {
     switch (_iStyle)
     {
index b7ecfd3..85a6f09 100644 (file)
@@ -18,7 +18,7 @@
 #include "H5Object.hxx"
 #include "H5DataConverter.hxx"
 
-#define __SCILAB_STACK_CREATOR__(U,NAME) static void create(void * pvApiCtx, const int position, const int rows, const int cols, U * ptr, int * list, const int listPosition) \
+#define __SCILAB_STACK_CREATOR__(U,NAME) static void create(void * pvApiCtx, const int position, const int rows, const int cols, U const* ptr, int * list, const int listPosition) \
     {                                                                   \
         SciErr err;                                                     \
         if (list)                                                       \
index 814761b..46e9f1e 100644 (file)
@@ -34,7 +34,7 @@ types::Function::ReturnValue sci_cshep2d(types::typed_list &in, int _iRetCount,
     //output
     types::TList* pTListCoef = NULL;
 
-    wchar_t* wcsStr[] = {L"cshep2d", L"xyz", L"lcell", L"lnext", L"grdim", L"rmax", L"rw", L"a"};
+    const wchar_t * wcsStr[] = {L"cshep2d", L"xyz", L"lcell", L"lnext", L"grdim", L"rmax", L"rw", L"a"};
 
     // *** check the minimal number of input args. ***
     if (in.size() != 1)
index 5a8e8e9..cf4643c 100644 (file)
@@ -36,7 +36,7 @@ types::Function::ReturnValue sci_splin3d(types::typed_list &in, int _iRetCount,
     // output
     types::TList* pTListOut = NULL;
 
-    wchar_t* wcsStr[] = {L"tensbs3d", L"tx", L"ty", L"tz", L"order", L"bcoef", L"xyzminmax"};
+    const wchar_t * wcsStr[] = {L"tensbs3d", L"tx", L"ty", L"tz", L"order", L"bcoef", L"xyzminmax"};
 
     // *** check the minimal number of input args. ***
     if (in.size() < 4 || in.size() > 5)
index d5d347e..82caa3a 100644 (file)
@@ -26,7 +26,7 @@
  * @param[out] buflen  the length of the variable
  * @param[in] iflag
  */
-IO_IMPEXP void getenvc(int *ierr, char *var, char *buf, int *buflen, int *iflag);
+IO_IMPEXP void getenvc(int *ierr, const char *var, char *buf, int *buflen, int *iflag);
 
 /**
 * Searches for a file using environment paths
index 7607ed1..ad23b75 100644 (file)
@@ -25,7 +25,7 @@
  * @return FALSE if there is a problem otherwise TRUE
  */
 IO_IMPEXP BOOL setenvc(const char *string, const char *value);
-IO_IMPEXP BOOL setenvcW(wchar_t *string, wchar_t *value);
+IO_IMPEXP BOOL setenvcW(const wchar_t *string, const wchar_t *value);
 
 #endif /* __SETENVC_H__ */
 /*--------------------------------------------------------------------------*/
index e8ca98a..3d3f284 100644 (file)
@@ -31,10 +31,10 @@ extern "C"
 #include "mclose.h"
 #include "mseek.h"
 
-    extern int C2F(clunit)(int* , char*, int*, int);
+    extern int C2F(clunit)(int* , char const*, int*, int);
     extern int C2F(rewindinter)(int*);
     extern int C2F(backspaceinter)(int*);
-    extern int C2F(readinter)(int*, char*, int);
+    extern int C2F(readinter)(int*, char const*, int);
 }
 /*--------------------------------------------------------------------------*/
 types::Function::ReturnValue sci_file_no_rhs(types::typed_list &in, int _iRetCount, types::typed_list &out);
index dfc8bbd..9b2c270 100644 (file)
@@ -282,7 +282,7 @@ xmlTextWriterPtr openXMLFile(const wchar_t *_pstFilename, const wchar_t* _pstLib
     iLen = xmlTextWriterWriteAttribute(pWriter, (xmlChar*)"name", (xmlChar*)pstLibName);
     if (iLen < 0)
     {
-        return false;
+        return NULL;
     }
 
     FREE(pstFilename);
index 23e7acf..dda2f36 100644 (file)
@@ -32,7 +32,7 @@ static void searchenv_others(const char *filename, const char *varname,
                              char *pathname);
 #endif
 /*--------------------------------------------------------------------------*/
-void getenvc(int *ierr, char *var, char *buf, int *buflen, int *iflag)
+void getenvc(int *ierr, const char *var, char *buf, int *buflen, int *iflag)
 {
 #ifdef _MSC_VER
     wchar_t* wbuf = NULL;
index 56ffad8..fba88ff 100644 (file)
@@ -61,7 +61,7 @@ BOOL setenvc(const char *stringIn, const char *valueIn)
 #endif
 }
 /*--------------------------------------------------------------------------*/
-BOOL setenvcW(wchar_t *wstringIn, wchar_t *wvalueIn)
+BOOL setenvcW(const wchar_t *wstringIn, const wchar_t *wvalueIn)
 {
     BOOL ret = TRUE;
     int len_env = 0;
index 70a4c44..38fb7ee 100644 (file)
@@ -20,7 +20,7 @@
 * @param property name
 * @return property value
 */
-char * system_getproperty(char *property, char *defaultproperty);
+char * system_getproperty(const char * property, const char * defaultproperty);
 
 #endif /* __SYSTEM_GETPROPERTY_H__ */
 /*--------------------------------------------------------------------------*/
index 4380d01..6e535d1 100644 (file)
@@ -18,7 +18,7 @@
 #include "sci_malloc.h"
 #include "os_strdup.h"
 /*--------------------------------------------------------------------------*/
-char * system_getproperty(char *property, char *defaultproperty)
+char * system_getproperty(const char * property, const char * defaultproperty)
 {
     char *retValue = NULL;
     JNIEnv * currentENV = getScilabJNIEnv();
index 132aacb..4738c3b 100644 (file)
  * change language
  * @param lang
  */
-BOOL setlanguage(wchar_t *lang);
+BOOL setlanguage(const wchar_t *lang);
 
 
 /**
  * returns current language
  * @return
  */
-wchar_t *getlanguage(void);
+const wchar_t *getlanguage(void);
 
 /**
  * returns current alias
  * example : en_US --> en
  * @return
  */
-wchar_t *getlanguagealias(void);
+const wchar_t *getlanguagealias(void);
 
 /**
  * return internal code associated with a language
@@ -49,28 +49,28 @@ int getcurrentlanguagecode(void);
  * @param code
  * @return
  */
-wchar_t *getlanguagefromcode(int code);
+const wchar_t *getlanguagefromcode(int code);
 
 /**
  * get code of a language
  * @param language
  * @return
  */
-int getcodefromlanguage(wchar_t *language);
+int getcodefromlanguage(const wchar_t *language);
 
 /**
 * try to convert strlanguage (alias) to a good language string
 * @param language
 * @return
 */
-wchar_t *convertlanguagealias(wchar_t *strlanguage);
+const wchar_t *convertlanguagealias(const wchar_t *strlanguage);
 
 /**
 * test if lang is defined language
 * @param lang
 * @return TRUE or FALSE
 */
-BOOL LanguageIsOK(wchar_t *lang);
+BOOL LanguageIsOK(const wchar_t *lang);
 
 /**
  * Check if the current language is the same we are trying to switch to
@@ -78,7 +78,7 @@ BOOL LanguageIsOK(wchar_t *lang);
  * @param language The language we want to switch to
  * @return If we need to change the language or not
  */
-BOOL needtochangelanguage(wchar_t *language);
+BOOL needtochangelanguage(const wchar_t *language);
 
 
 /**
@@ -87,19 +87,19 @@ BOOL needtochangelanguage(wchar_t *language);
  * @param the locale we want to export
  * @return if is worked
  */
-BOOL exportLocaleToSystem(wchar_t *locale);
+BOOL exportLocaleToSystem(const wchar_t *locale);
 
 /**
  * Set the default language and save it in the registry (Windows)
  * @param lang the new language
  */
-void setdefaultlanguage(char * lang);
+void setdefaultlanguage(const char * lang);
 
 /**
  * Get the default language from the registry (Windows)
  * @return the default language
  */
-char * getdefaultlanguage();
+const char * getdefaultlanguage();
 
 
 #endif /* __SETGETLANGUAGE_H__ */
index e49d6f8..abf44c0 100644 (file)
@@ -49,7 +49,7 @@ Function::ReturnValue sci_setlanguage(typed_list &in, int _piRetCount, typed_lis
     }
 
     wchar_t *param = in[0]->getAs<types::String>()->get(0);
-    wchar_t *newlanguage = convertlanguagealias(param);
+    const wchar_t *newlanguage = convertlanguagealias(param);
 
     if ( !LanguageIsOK(param) && (newlanguage == NULL) )
     {
index d42707b..f1298e6 100644 (file)
@@ -79,7 +79,7 @@ BOOL InitializeLocalization(void)
             textdomain(NAMELOCALIZATIONDOMAIN);
             bind_textdomain_codeset (NAMELOCALIZATIONDOMAIN, "UTF-8");
 #ifndef _MSC_VER
-            setlanguage("");
+            setlanguage(L"");
 #else
             /* We look if registry value LANGUAGE exists */
             /* If not exists the "" means that we will try to use the language of the system.*/
index a0f2282..fd03af6 100644 (file)
@@ -18,7 +18,7 @@
 #endif
 
 /*--------------------------------------------------------------------------*/
-void setdefaultlanguage(char * lang)
+void setdefaultlanguage(const char * lang)
 {
 
 #ifdef _MSC_VER
@@ -35,7 +35,7 @@ void setdefaultlanguage(char * lang)
 
 }
 /*--------------------------------------------------------------------------*/
-char * getdefaultlanguage(void)
+const char* getdefaultlanguage(void)
 {
 
 #ifdef _MSC_VER
index c5779ff..2b0bcef 100644 (file)
 static wchar_t CURRENTLANGUAGESTRING[LengthAlphacode] = L"en_US";
 static int  CURRENTLANGUAGECODE = SCILABDEFAULTLANGUAGECODE;
 /*--------------------------------------------------------------------------*/
-static int FindLanguageCode(wchar_t *lang);
-static BOOL setlanguagecode(wchar_t *lang);
-static wchar_t *FindAlias(wchar_t *lang);
-static wchar_t *GetLanguageFromAlias(wchar_t *langAlias);
+static int FindLanguageCode(const wchar_t *lang);
+static BOOL setlanguagecode(const wchar_t *lang);
+static const wchar_t *FindAlias(const wchar_t *lang);
+static const wchar_t *GetLanguageFromAlias(const wchar_t *langAlias);
 /*--------------------------------------------------------------------------*/
-BOOL setlanguage(wchar_t *lang)
+BOOL setlanguage(const wchar_t *lang)
 {
     if (lang)
     {
@@ -218,7 +218,7 @@ BOOL setlanguage(wchar_t *lang)
     return FALSE;
 }
 /*--------------------------------------------------------------------------*/
-wchar_t *getlanguage(void)
+const wchar_t *getlanguage(void)
 {
     return CURRENTLANGUAGESTRING;
 }
@@ -228,7 +228,7 @@ int getcurrentlanguagecode(void)
     return CURRENTLANGUAGECODE;
 }
 /*--------------------------------------------------------------------------*/
-wchar_t *getlanguagefromcode(int code)
+const wchar_t *getlanguagefromcode(int code)
 {
     int i = 0;
 
@@ -242,12 +242,12 @@ wchar_t *getlanguagefromcode(int code)
     return NULL;
 }
 /*--------------------------------------------------------------------------*/
-int getcodefromlanguage(wchar_t *language)
+int getcodefromlanguage(const wchar_t *language)
 {
     return FindLanguageCode(language);
 }
 /*--------------------------------------------------------------------------*/
-BOOL LanguageIsOK(wchar_t *lang)
+BOOL LanguageIsOK(const wchar_t *lang)
 {
     int i = 0;
 
@@ -268,7 +268,7 @@ BOOL LanguageIsOK(wchar_t *lang)
     return FALSE;
 }
 /*--------------------------------------------------------------------------*/
-static int FindLanguageCode(wchar_t *lang)
+static int FindLanguageCode(const wchar_t *lang)
 {
     int i = 0;
 
@@ -282,7 +282,7 @@ static int FindLanguageCode(wchar_t *lang)
     return -1;
 }
 /*--------------------------------------------------------------------------*/
-static BOOL setlanguagecode(wchar_t *lang)
+static BOOL setlanguagecode(const wchar_t *lang)
 {
     int tmpCode = FindLanguageCode(lang);
 
@@ -294,7 +294,7 @@ static BOOL setlanguagecode(wchar_t *lang)
     return FALSE;
 }
 /*--------------------------------------------------------------------------*/
-static wchar_t *FindAlias(wchar_t *lang)
+static const wchar_t *FindAlias(const wchar_t *lang)
 {
     int i = 0;
     for (i = 0 ; i < NumberLanguagesAlias ; i++)
@@ -307,7 +307,7 @@ static wchar_t *FindAlias(wchar_t *lang)
     return NULL;
 }
 /*--------------------------------------------------------------------------*/
-static wchar_t *GetLanguageFromAlias(wchar_t *langAlias)
+static const wchar_t *GetLanguageFromAlias(const wchar_t *langAlias)
 {
     int i = 0;
     for (i = 0 ; i < NumberLanguagesAlias ; i++)
@@ -320,14 +320,14 @@ static wchar_t *GetLanguageFromAlias(wchar_t *langAlias)
     return NULL;
 }
 /*--------------------------------------------------------------------------*/
-wchar_t *getlanguagealias(void)
+const wchar_t *getlanguagealias(void)
 {
     return FindAlias(CURRENTLANGUAGESTRING);
 }
 /*--------------------------------------------------------------------------*/
-BOOL needtochangelanguage(wchar_t *language)
+BOOL needtochangelanguage(const wchar_t *language)
 {
-    wchar_t *currentlanguage = getlanguage();
+       const wchar_t *currentlanguage = getlanguage();
 
     if (wcscmp(language, currentlanguage))
     {
@@ -337,9 +337,9 @@ BOOL needtochangelanguage(wchar_t *language)
     return FALSE;
 }
 /*--------------------------------------------------------------------------*/
-wchar_t *convertlanguagealias(wchar_t *strlanguage)
+const wchar_t *convertlanguagealias(const wchar_t *strlanguage)
 {
-    wchar_t *correctlanguage = NULL;
+       const wchar_t *correctlanguage = NULL;
 
     if ( (wcslen(strlanguage) == 2) || (wcscmp(strlanguage, L"en_US") == 0) ) /* If the user wants to change to en_US ... use the default locale */
     {
@@ -368,7 +368,7 @@ wchar_t *convertlanguagealias(wchar_t *strlanguage)
  *
  * @param locale the locale (ex : fr_FR or en_US)
  */
-BOOL exportLocaleToSystem(wchar_t *locale)
+BOOL exportLocaleToSystem(const wchar_t *locale)
 {
 
     if (locale == NULL)
index f482ca1..f83cea0 100644 (file)
 typedef struct languages_struct
 {
     int code;
-    wchar_t alphacode[LengthAlphacode];
-    wchar_t languagedescription[LengthLanguage];
+    const wchar_t *alphacode;
+    const wchar_t *languagedescription;
 
 } LanguagesTable;
 /*--------------------------------------------------------------------------*/
 typedef struct languagesalias_struct
 {
-    wchar_t alias[LengthAlphacode];
-    wchar_t alphacode[LengthAlphacode];
+    const wchar_t *alias;
+    const wchar_t *alphacode;
 
 } LanguagesTableAlias;
 /*--------------------------------------------------------------------------*/
@@ -314,7 +314,7 @@ static LanguagesTable LANGUAGE_COUNTRY_TAB[NumberLanguages] =
 // These two charsets are currently supported by Scilab, this is why there are
 // no other ones.
 #define NumberOfCharsets 2
-static char* CHARSETS[NumberOfCharsets] =
+static const char* CHARSETS[NumberOfCharsets] =
 {
     "UTF-8",
     "ISO-8859-1"
index 0339d01..6d0adee 100644 (file)
@@ -343,13 +343,13 @@ int mxGetM(const mxArray *ptr)
     types::InternalType *pIT = (types::InternalType *) ptr;
     if (pIT == NULL)
     {
-        return NULL;
+        return 0;
     }
 
     types::GenericType *pGT = pIT->getAs<types::GenericType>();
     if (pGT == NULL)
     {
-        return NULL;
+        return 0;
     }
     return pGT->getRows();
 }
@@ -403,13 +403,13 @@ int mxGetN(const mxArray *ptr)
     types::InternalType * pIT = (types::InternalType *) ptr;
     if (pIT == NULL)
     {
-        return NULL;
+        return 0;
     }
 
     types::GenericType * pGT = pIT->getAs<types::GenericType>();
-    if (pGT == NULL)
+    if (pGT == 0)
     {
-        return NULL;
+        return 0;
     }
     return pGT->getCols();
 }
index 77bf469..746b2bb 100644 (file)
@@ -267,7 +267,7 @@ types::Function::ReturnValue sci_fsolve(types::typed_list &in, int _iRetCount, t
     // alloc output data
     pDblV = new types::Double(pDblX->getDims(), pDblX->getDimsArray());
 
-    char* pstrFunc = "fct";
+    char const * pstrFunc = "fct";
     try
     {
         if (bJac)
index 96d099b..19c7450 100644 (file)
@@ -340,7 +340,7 @@ types::Function::ReturnValue sci_lsqrsolve(types::typed_list &in, int _iRetCount
     // alloc output data
     pDblV = new types::Double(iM, 1);
 
-    char* pstrFunc = "fct";
+    char const* pstrFunc = "fct";
     try
     {
         if (bJac)
index bff4ef7..7a111fc 100644 (file)
@@ -20,7 +20,7 @@ extern "C"
 {
 #endif
 
-    typedef void (*SCILAB_OUTPUT_METHOD)(char *text);
+    typedef void (*SCILAB_OUTPUT_METHOD)(const char *text);
 
     OUTPUT_STREAM_IMPEXP void setScilabOutputMethod(SCILAB_OUTPUT_METHOD writer);
 
index f230ae0..0c7c0b4 100644 (file)
@@ -31,7 +31,7 @@ typedef struct
     types::InternalType::ScilabType type;
 } ArgumentPosition;
 
-OUTPUT_STREAM_IMPEXP_GW wchar_t** scilab_sprintf(char* _pstName, wchar_t* _pwstInput, types::typed_list &in, ArgumentPosition* _pArgs, int _iArgsCount, int* _piOutputRows, int* piNewLine);
+OUTPUT_STREAM_IMPEXP_GW wchar_t** scilab_sprintf(const char* _pstName, const wchar_t* _pwstInput, types::typed_list &in, ArgumentPosition* _pArgs, int _iArgsCount, int* _piOutputRows, int* piNewLine);
 
 
 #endif /* !__SCILAB_SPRINTF_HXX__ */
index 279ef5a..8e8b9d0 100644 (file)
@@ -27,7 +27,7 @@ extern "C" {
      * @param fmt Format of the format string
      * @param ...
      */
-    void sciprint(char *fmt, ...);
+    void sciprint(const char *fmt, ...);
     //void sciprintW(wchar_t* fmt, ...);
 
 
@@ -40,7 +40,7 @@ extern "C" {
     * @return nb characters
     */
 
-    int scivprint(char* fmt, va_list args);
+    int scivprint(const char* fmt, va_list args);
     //int scivprintW(wchar_t* fmt, va_list args);
 
 #ifdef __cplusplus
index 618d46d..a2a8c2e 100644 (file)
 * print a string
 * @param[in] buffer to disp
 */
-static void printf_scilab(char* buffer);
-static void printf_scilabW(wchar_t* buffer);
+static void printf_scilab(const char* buffer);
+static void printf_scilabW(const wchar_t* buffer);
 /*--------------------------------------------------------------------------*/
-void sciprint(char* fmt, ...)
+void sciprint(const char* fmt, ...)
 {
     va_list ap;
 
@@ -82,7 +82,7 @@ void sciprint(char* fmt, ...)
 //     return count;
 //}
 /*--------------------------------------------------------------------------*/
-int scivprint(char *fmt, va_list args)
+int scivprint(const char *fmt, va_list args)
 {
     static char s_buf[MAXPRINTF];
     int count = 0;
@@ -108,7 +108,7 @@ int scivprint(char *fmt, va_list args)
     return count;
 }
 /*--------------------------------------------------------------------------*/
-static void printf_scilabW(wchar_t* buffer)
+static void printf_scilabW(const wchar_t* buffer)
 {
     if (buffer)
     {
@@ -136,7 +136,7 @@ static void printf_scilabW(wchar_t* buffer)
     }
 }
 /*--------------------------------------------------------------------------*/
-static void printf_scilab(char *buffer)
+static void printf_scilab(const char *buffer)
 {
     if (buffer)
     {
index a710212..e598e0d 100644 (file)
@@ -30,9 +30,9 @@ extern "C"
 #include "os_wcsdup.h"
 }
 
-static wchar_t* replaceAndCountLines(wchar_t* _pwstInput, int* _piLines, int* _piNewLine);
+static wchar_t* replaceAndCountLines(const wchar_t* _pwstInput, int* _piLines, int* _piNewLine);
 
-wchar_t** scilab_sprintf(char* _pstName, wchar_t* _pwstInput, typed_list &in, ArgumentPosition* _pArgs, int _iArgsCount, int* _piOutputRows, int* _piNewLine)
+wchar_t** scilab_sprintf(const char* _pstName, const wchar_t* _pwstInput, typed_list &in, ArgumentPosition* _pArgs, int _iArgsCount, int* _piOutputRows, int* _piNewLine)
 {
     /* Force Windows display to have two-digit exponent. */
 #ifdef _MSC_VER
@@ -360,7 +360,7 @@ wchar_t** scilab_sprintf(char* _pstName, wchar_t* _pwstInput, typed_list &in, Ar
 // replace "\\n" "\\r" "\\t" "\\r\\n" by '\n' '\r' '\t' '\n'
 // count number of lines
 // indicate if one '\n' is at the end of string
-static wchar_t* replaceAndCountLines(wchar_t* _pwstInput, int* _piLines, int* _piNewLine)
+static wchar_t* replaceAndCountLines(const wchar_t* _pwstInput, int* _piLines, int* _piNewLine)
 {
     size_t iInputLen = wcslen(_pwstInput);
     wchar_t* pwstFirstOutput = (wchar_t*)MALLOC(sizeof(wchar_t) * (iInputLen + 1));
index 13dc031..c057138 100644 (file)
@@ -928,7 +928,7 @@ SciErr createPList(void* _pvCtx, int _iVar, int ** _piAddress, char ** _pstLabel
         label_list[i] = os_strdup(_pstLabelNames[i - 1]);
     }
 
-    _SciErr = createMatrixOfStringInList(_pvCtx, _iVar, *_piAddress, 1, 1, _iNbParams + 1, label_list);
+    _SciErr = createMatrixOfStringInList(_pvCtx, _iVar, *_piAddress, 1, 1, _iNbParams + 1, (char const* const*) label_list);
 
     if (label_list)
     {
@@ -996,7 +996,7 @@ SciErr createStringInPList(void* _pvCtx, int _iVar, int * _piAddress, char * _ps
 #endif
 
     tmp_val[0] = os_strdup(_pstValue);
-    _SciErr = createMatrixOfStringInList(_pvCtx, _iVar, _piAddress, itemPos, 1, 1, tmp_val);
+    _SciErr = createMatrixOfStringInList(_pvCtx, _iVar, _piAddress, itemPos, 1, 1, (char const* const*) tmp_val);
 
     if (tmp_val[0])
     {
index 88c6e76..a57ab5d 100644 (file)
@@ -36,7 +36,7 @@ types::Function::ReturnValue sci_grand(types::typed_list &in, int _iRetCount, ty
     };
 
     //  names at the scilab level
-    wchar_t* names_gen[6] = {L"mt", L"kiss", L"clcg4", L"clcg2", L"urand", L"fsultra"};
+    const wchar_t* names_gen[6] = {L"mt", L"kiss", L"clcg4", L"clcg2", L"urand", L"fsultra"};
 
     types::String* pStrMethod   = NULL;
     types::String* pStrGenOrPhr = NULL;
index 92fe27d..662298c 100644 (file)
@@ -138,7 +138,7 @@ int sci_beep(char *fname, void* pvApiCtx)
         output = os_strdup(BEEP_OFF);
     }
 
-    sciErr = createMatrixOfString(pvApiCtx, nbInputArgument(pvApiCtx) + 1, m_out, n_out, &output);
+    sciErr = createMatrixOfString(pvApiCtx, nbInputArgument(pvApiCtx) + 1, m_out, n_out, (const char* const*) &output);
     if (sciErr.iErr)
     {
         printError(&sciErr, 0);
index d9e0cf7..2c2ab41 100644 (file)
@@ -194,7 +194,6 @@ types::Function::ReturnValue sci_xls_open(types::typed_list &in, int _iRetCount,
             Scierror(999, _("%s: invalid status.\n"), "xls_open");
         }
 
-        FREE(TMP);
         FREE(filename_IN);
         return types::Function::Error;
     }
index 66e7eb4..9c9bbc3 100644 (file)
@@ -191,10 +191,10 @@ extern "C"
 #include <unistd.h>
 #endif
     extern char *getCmdLine(void);
-    extern void ConsolePrintf(char *);
+    extern void ConsolePrintf(const char *);
 }
 
-static void TermPrintf(char *text)
+static void TermPrintf(const char *text)
 {
     //std::cout << text;
     printf("%s", text);
index 9e46b17..40da57a 100644 (file)
@@ -20,7 +20,7 @@
 #include "Scierror.h"
 #include "pcre_error.h"
 
-void pcre_error(char *fname, int errorCode)
+void pcre_error(char const * fname, int errorCode)
 {
     switch (errorCode)
     {
index 5b49b92..247951d 100644 (file)
@@ -23,7 +23,7 @@
  * @param fname the name of the Scilab function
  * @param errorCode the error code returned by the pcre function
  */
-STRING_IMPEXP void pcre_error(char *fname, int errorCode);
+STRING_IMPEXP void pcre_error(char const * fname, int errorCode);
 
 #endif
 
index 716f32e..3731295 100644 (file)
@@ -14,7 +14,9 @@
 #define __CONFIGVARIABLE_HXX__
 
 //disable warnings about exports STL items
+#ifdef _MSC_VER
 #pragma warning (disable : 4251)
+#endif
 
 #include <list>
 #include <map>
index a31543b..817afcd 100644 (file)
@@ -33,10 +33,10 @@ extern "C"
 
     EXTERN_SYSTEM_ENV void setScilabMode(scilabMode newmode);
 
-    EXTERN_SYSTEM_ENV char * getScilabModeString(void);
+    EXTERN_SYSTEM_ENV const char * getScilabModeString(void);
 
 #ifdef __cplusplus
 }
 #endif
 
-#endif /* ! __SCI_MODE_H__ */
\ No newline at end of file
+#endif /* ! __SCI_MODE_H__ */
index 7b75f28..67f48e2 100644 (file)
@@ -24,7 +24,7 @@ void setScilabMode(scilabMode newmode)
     ConfigVariable::setScilabMode(static_cast<int>(newmode));
 }
 
-char * getScilabModeString(void)
+const char * getScilabModeString(void)
 {
     scilabMode smMode = getScilabMode();
     switch (smMode)
index 574589f..0d7770a 100644 (file)
@@ -21,7 +21,9 @@
 #include "dynlib_types.h"
 
 //disable warnings about exports STL items
+#ifdef _MSC_VER
 #pragma warning (disable : 4251)
+#endif
 
 namespace types
 {
index e997afb..e1e05fd 100644 (file)
@@ -14,7 +14,9 @@
 #define __INSPECTOR_HXX__
 
 //disable warnings about exports STL items
+#ifdef _MSC_VER
 #pragma warning (disable : 4251)
+#endif
 
 #include <vector>
 #include <string>
@@ -50,4 +52,4 @@ public :
 };
 #endif
 }
-#endif /* !__INSPECTOR_HXX__ */
\ No newline at end of file
+#endif /* !__INSPECTOR_HXX__ */
index 1c297a1..484afb8 100644 (file)
@@ -157,7 +157,7 @@ public :
     };
 
 protected :
-    InternalType() : m_iRef(0), m_bAllowDelete(true), m_bPrintFromStart(true), m_iSavePrintState(0), m_iRows1PrintState(0), m_iRows2PrintState(0), m_iCols1PrintState(0), m_iCols2PrintState(0) {}
+    InternalType() : m_iRef(0), m_bAllowDelete(true), m_bPrintFromStart(true), m_iSavePrintState(0), m_iRows1PrintState(0), m_iCols1PrintState(0), m_iRows2PrintState(0), m_iCols2PrintState(0) {}
 
 public :
     virtual                         ~InternalType() {};
index e50009d..5529690 100644 (file)
@@ -29,7 +29,9 @@
 #include "dynlib_types.h"
 
 //disable warnings about exports STL items
+#ifdef _MSC_VER
 #pragma warning (disable : 4251)
+#endif
 
 namespace types
 {
index 093f587..fcb54d2 100644 (file)
@@ -38,7 +38,7 @@ namespace types
     public :
         String(int _iRows, int _iCols);
         String(int _iDims, int* _piDims);
-        String(int _iRows, int _iCols, wchar_t** _pstData);
+        String(int _iRows, int _iCols, wchar_t const* const* _pstData);
         String(const wchar_t *_pstData);
         String(const char *_pstData);
         virtual                 ~String();
index a1cad8e..015446d 100644 (file)
@@ -101,7 +101,7 @@ void getSignedIntFormat(T _TVal, int *_piWidth)
 template <typename T>
 void addUnsignedIntValue(std::wostringstream *_postr, T _TVal, int _iWidth, bool bPrintPlusSign = false, bool bPrintOne = true)
 {
-    wchar_t* pwstSign = NULL;
+    const wchar_t * pwstSign = PLUS_STRING;
     wchar_t pwstFormat[32];
     wchar_t pwstOutput[32];
     if (bPrintPlusSign == true)
index cf724bb..91a4df6 100644 (file)
@@ -28,7 +28,7 @@ extern "C"
 using namespace types;
 
 template <typename TorMList>
-Function::ReturnValue sci_tlist_or_mlist(typed_list &in, int _piRetCount, typed_list &out, wchar_t *_pstrFunName)
+Function::ReturnValue sci_tlist_or_mlist(typed_list &in, int _piRetCount, typed_list &out, const wchar_t *_pstrFunName)
 {
     TorMList* pRetVal = NULL;
 
index b785d64..bf2e1e8 100644 (file)
@@ -368,8 +368,10 @@ DynamicFunction::DynamicFunction(std::wstring _wstName, std::wstring _wstEntryPo
     m_bLoaded               = false;
     m_iType                 = _iType;
     m_pFunc                 = NULL;
+    m_pOptFunc              = NULL;
     m_pOldFunc              = NULL;
     m_pMexFunc              = NULL;
+    m_pFunction             = NULL;
     m_hLib                  = NULL;
 }
 
@@ -385,8 +387,10 @@ DynamicFunction::DynamicFunction(std::wstring _wstName, std::wstring _wstEntryPo
     m_bLoaded               = false;
     m_iType                 = _iType;
     m_pFunc                 = NULL;
+    m_pOptFunc              = NULL;
     m_pOldFunc              = NULL;
     m_pMexFunc              = NULL;
+    m_pFunction             = NULL;
     m_hLib                  = NULL;
 }
 
index da7bed9..d2ef25f 100644 (file)
 
 #include <sstream>
 #include <math.h>
-#include "sparse.hxx"
+#include <Eigen/Sparse>
 #include <complex>
 #include <iterator>
 #include <algorithm>
+
+#include "sparse.hxx"
 #include "types.hxx"
 #include "tostring_common.hxx"
 #include "double.hxx"
index 9466824..9ddca76 100644 (file)
@@ -82,7 +82,7 @@ String::String(int _iRows, int _iCols)
 #endif
 }
 
-String::String(int _iRows, int _iCols, wchar_t** _pstData)
+String::String(int _iRows, int _iCols, wchar_t const* const* _pstData)
 {
     wchar_t** pwsData = NULL;
     int piDims[] = {_iRows, _iCols};
index a0d6053..f1a1e58 100644 (file)
@@ -195,7 +195,7 @@ bool TList::toString(std::wostringstream& ostr)
              wcscmp((*m_plData)[0]->getAs<types::String>()->get(0), L"lss") == 0)
     {
         int iPosition = 1;
-        wchar_t* wcsDesc[7] = {L"  (state-space system:)", L"= A matrix =", L"= B matrix =", L"= C matrix =", L"= D matrix =", L"= X0 (initial state) =", L"= Time domain ="};
+        const wchar_t * wcsDesc[7] = {L"  (state-space system:)", L"= A matrix =", L"= B matrix =", L"= C matrix =", L"= D matrix =", L"= X0 (initial state) =", L"= Time domain ="};
         std::vector<InternalType *>::iterator itValues;
         for (itValues = m_plData->begin() ; itValues != m_plData->end() ; ++itValues, ++iPosition)
         {
index f533a34..db0eb20 100644 (file)
@@ -18,7 +18,7 @@
 extern "C" {
 #endif
     /*------------------------------------------------------------------------*/
-    void putScilabVariable(char * name, char ** lines, int rows, int cols);
+    void putScilabVariable(const char * name, const char* const* lines, int rows, int cols);
     char * getUnnamedVariable();
     /*------------------------------------------------------------------------*/
 #ifdef __cplusplus
index 2430df3..f1310cc 100644 (file)
@@ -18,7 +18,7 @@
 #include "os_strdup.h"
 
 
-void putScilabVariable(char * name, char ** lines, int rows, int cols)
+void putScilabVariable(const char* name, const char* const* lines, int rows, int cols)
 {
     SciErr sciErr;