kolan/CMake
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

BUG: We need to test the compiler for the case of the mod file names. For now this is a temporary hack to use upper case on SGI and lower case on Sun.

Browse Source
This commit is contained in:
Brad King 2005-03-02 09:02:36 -05:00
parent 749b80c7ed
commit ba6f07b10c
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Source/cmDependsFortran.cxx
View File

@ -23,6 +23,10 @@
#include <assert.h> #include <assert.h>
#include <stack> #include <stack>
// TODO: Test compiler for the case of the mod file. Some always
// use lower case and some always use upper case. I do not know if any
// use the case from the source code.
//---------------------------------------------------------------------------- //----------------------------------------------------------------------------
// Parser methods not included in generated interface. // Parser methods not included in generated interface.
@ -139,7 +143,12 @@ bool cmDependsFortran::WriteDependencies(std::ostream& os)
// Require only modules not provided in the same source. // Require only modules not provided in the same source.
if(parser.Provides.find(*i) == parser.Provides.end()) if(parser.Provides.find(*i) == parser.Provides.end())
{ {
// Temporary hack for Fortran: choose case depending on platform
#if defined(__sgi)
std::string m = cmSystemTools::UpperCase(*i);
#else
std::string m = cmSystemTools::LowerCase(*i); std::string m = cmSystemTools::LowerCase(*i);
#endif
os << m_TargetFile.c_str() << ": " << m.c_str() << ".mod.stamp" os << m_TargetFile.c_str() << ": " << m.c_str() << ".mod.stamp"
<< std::endl; << std::endl;
os << m_TargetFile.c_str() << ".requires: " << i->c_str() << ".mod.proxy" os << m_TargetFile.c_str() << ".requires: " << i->c_str() << ".mod.proxy"
@ -173,7 +182,12 @@ bool cmDependsFortran::WriteDependencies(std::ostream& os)
for(std::set<cmStdString>::const_iterator i = parser.Provides.begin(); for(std::set<cmStdString>::const_iterator i = parser.Provides.begin();
i != parser.Provides.end(); ++i) i != parser.Provides.end(); ++i)
{ {
// Temporary hack for Fortran: choose case depending on platform
#if defined(__sgi)
std::string m = cmSystemTools::UpperCase(*i);
#else
std::string m = cmSystemTools::LowerCase(*i); std::string m = cmSystemTools::LowerCase(*i);
#endif
os << "\t@$(CMAKE_COMMAND) -E copy_if_different " os << "\t@$(CMAKE_COMMAND) -E copy_if_different "
<< m.c_str() << ".mod " << m.c_str() << ".mod.stamp\n"; << m.c_str() << ".mod " << m.c_str() << ".mod.stamp\n";
} }