cleaning
Allan CORNET [Tue, 15 Sep 2009 07:53:29 +0000 (09:53 +0200)]
scilab/modules/io/includes/setenvc.h
scilab/modules/io/src/c/GetenvB.c
scilab/modules/io/src/c/setenvc.c

index d9f7bc4..7146059 100644 (file)
  */
 IO_IMPEXP BOOL setenvc(char *string,char *value);
 
-/**
- * TODO : comment 
- * @return 
- */
-IO_IMPEXP int getUpdateEnvVar(void);
-
-/**
- * TODO : comment 
- * @param val
- */
-IO_IMPEXP void setUpdateEnvVar(int val);
-
 #endif /* __SETENVC_H__ */
 /*--------------------------------------------------------------------------*/
index dc5f700..1942237 100644 (file)
  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
  *
  */
+/*--------------------------------------------------------------------------*/ 
 #include "GetenvB.h"
 #include "getenvc.h"
-
+/*--------------------------------------------------------------------------*/
 void GetenvB(char *name, char *env, int len)
 {
-  int ierr,un=1;
-  C2F(getenvc)(&ierr,name,env,&len,&un);
-  if( ierr == 0) 
-    {
-      char *last = &env[len-1];
-      while ( *last == ' ' ) { last = '\0' ; } 
-         last--;
-    }
-  else 
-    {
-      env[0] = '\0' ;
-    }  
+       int ierr = 0, one = 1;
+       C2F(getenvc)(&ierr,name,env,&len,&one);
+       if (ierr == 0) 
+       {
+               char *last = &env[len-1];
+               while ( *last == ' ' ) { last = '\0' ; } 
+               last--;
+       }
+       else 
+       {
+               env[0] = '\0' ;
+       }  
 }
+/*--------------------------------------------------------------------------*/
index a834d92..cd38453 100644 (file)
 #include "MALLOC.h" /* MALLOC */
 #include "charEncoding.h"
 /*--------------------------------------------------------------------------*/
-static int UpdateEnvVar = 0;
-/*--------------------------------------------------------------------------*/
 BOOL setenvc(char *stringIn,char *valueIn)
 {
        BOOL ret = TRUE;
 
-       
-
 #ifdef _MSC_VER
        {
                int len_env = 0;
@@ -45,8 +41,6 @@ BOOL setenvc(char *stringIn,char *valueIn)
                wchar_t* wstringIn = to_wide_string(stringIn);
                wchar_t* wvalueIn = to_wide_string(valueIn);
 
-
-
                if (SetEnvironmentVariableW(wstringIn,wvalueIn) == 0)
                {
                        ret = FALSE;
@@ -78,20 +72,9 @@ BOOL setenvc(char *stringIn,char *valueIn)
 
        if(ret)
        {
-               setUpdateEnvVar(1);
                setenvtcl(stringIn,valueIn);
        }
 
        return ret;
 }
 /*--------------------------------------------------------------------------*/
-int getUpdateEnvVar(void)
-{
-       return UpdateEnvVar;
-}
-/*--------------------------------------------------------------------------*/
-void setUpdateEnvVar(int val)
-{
-       UpdateEnvVar = val;
-}
-/*--------------------------------------------------------------------------*/