setenvc returns a BOOL
Allan Cornet [Fri, 19 Sep 2008 06:09:03 +0000 (06:09 +0000)]
scilab/modules/io/includes/setenvc.h
scilab/modules/io/src/c/setenvc.c

index 8c1a18a..1d41a04 100644 (file)
 #ifndef __SETENVC_H__
 #define __SETENVC_H__
 
+#include "BOOL.h"
+
 /**
  * Set in the system environment a variable to a value
  * @param[in] string the name of the variable
  * @param[in] value the value of the variable "string"
- * @return 0 if there is a problem otherwise 1 
+ * @return FALSE if there is a problem otherwise TRUE
  */
-int setenvc(char *string,char *value);
+BOOL setenvc(char *string,char *value);
 
 /**
  * TODO : comment 
index 8a38c5f..da28046 100644 (file)
 #include "setenvc.h"
 #include "../../tclsci/includes/setenvtcl.h"
 #include "MALLOC.h" /* MALLOC */
-#include "BOOL.h"
 
 #ifdef _MSC_VER
 #define putenv _putenv
 static char *env = NULL;
 #endif
 
-static int UpdateEnvVar=0;
+static int UpdateEnvVar = 0;
 /*--------------------------------------------------------------------------*/
-int setenvc(char *string,char *value)
+BOOL setenvc(char *string,char *value)
 {
-       int ret=0;
-       char* env;
+       int ret = 0;
+       char *env = NULL;
 
        /* @TODO Check where stands Mac OS X */
 #ifdef LINUX
-       if ( setenv(string,value,1) ) ret=FALSE;
+       if ( setenv(string,value,1) ) return FALSE;
        else 
        {
-               ret = TRUE;
                UpdateEnvVar = 1;
+               return TRUE;
     }
 #else /* others HP Solaris WIN32*/
        env = (char*)MALLOC((strlen(string)+strlen(value)+2)*sizeof(char));
@@ -63,7 +62,7 @@ int setenvc(char *string,char *value)
        else 
        {
                setenvtcl(string,value);
-               ret=TRUE;
+               ret = TRUE;
                UpdateEnvVar=1;
        }
        #ifdef _MSC_VER
@@ -85,6 +84,6 @@ int getUpdateEnvVar(void)
 /*--------------------------------------------------------------------------*/
 void setUpdateEnvVar(int val)
 {
-       UpdateEnvVar=val;
+       UpdateEnvVar = val;
 }
 /*--------------------------------------------------------------------------*/