Salome HOME
Integrate developments from N. Toukourou at INRIA (OAR and CooRM support)
[modules/yacs.git] / src / Basics / Basics_Utils.cxx
index 77eaacc1962a41feb31412974193eead9eccebee..8d7ee78c53aff4fb656ec6a4eff5f78d8046bf43 100644 (file)
@@ -1,4 +1,4 @@
-// Copyright (C) 2007-2012  CEA/DEN, EDF R&D, OPEN CASCADE
+// Copyright (C) 2007-2013  CEA/DEN, EDF R&D, OPEN CASCADE
 //
 // This library is free software; you can redistribute it and/or
 // modify it under the terms of the GNU Lesser General Public
@@ -123,6 +123,18 @@ namespace Kernel_Utils
 
     free (strings);
   }
+#else
+  #if (_MSC_VER >= 1400) // Visual Studio 2005
+  #include <sstream>
+  int setenv(const char *name, const char *value, int rewrite)\r
+  {\r
+    std::stringstream sstr;\r
+    sstr<<name<<'='<<value;\r
+    if(rewrite || std::string(getenv(name)).length() == 0)\r
+      return _putenv(sstr.str().c_str());\r
+    else return -1;\r
+  }
+  #endif
 #endif
 
 }