Browse Source

Borland: No S_IWGRP is available

Brad King 15 years ago
parent
commit
cae85c9f65
2 changed files with 4 additions and 0 deletions
  1. 2 0
      Source/cmFileCommand.cxx
  2. 2 0
      Source/cmWriteFileCommand.cxx

+ 2 - 0
Source/cmFileCommand.cxx

@@ -191,6 +191,8 @@ bool cmFileCommand::HandleWriteCommand(std::vector<std::string> const& args,
     cmSystemTools::SetPermissions(fileName.c_str(),
     cmSystemTools::SetPermissions(fileName.c_str(),
 #if defined( _MSC_VER ) || defined( __MINGW32__ )
 #if defined( _MSC_VER ) || defined( __MINGW32__ )
       mode | S_IWRITE
       mode | S_IWRITE
+#elif defined( __BORLANDC__ )
+      mode | S_IWUSR
 #else
 #else
       mode | S_IWUSR | S_IWGRP
       mode | S_IWUSR | S_IWGRP
 #endif
 #endif

+ 2 - 0
Source/cmWriteFileCommand.cxx

@@ -62,6 +62,8 @@ bool cmWriteFileCommand
     cmSystemTools::SetPermissions(fileName.c_str(),
     cmSystemTools::SetPermissions(fileName.c_str(),
 #if defined( _MSC_VER ) || defined( __MINGW32__ )
 #if defined( _MSC_VER ) || defined( __MINGW32__ )
       mode | S_IWRITE
       mode | S_IWRITE
+#elif defined( __BORLANDC__ )
+      mode | S_IWUSR
 #else
 #else
       mode | S_IWUSR | S_IWGRP
       mode | S_IWUSR | S_IWGRP
 #endif
 #endif