diff options
| author | Brad King <brad.king@kitware.com> | 2019-07-08 15:33:02 (GMT) |
|---|---|---|
| committer | Brad King <brad.king@kitware.com> | 2019-07-08 15:33:02 (GMT) |
| commit | 1555837ccbdee95cedb9a5ba0e617a62fe74b9a3 (patch) | |
| tree | 45ef4f3d62349d86d4103f5bac0b8f8059d57355 /Source | |
| parent | 12e46dc413193c42589918bc588b5a41774329a8 (diff) | |
| parent | b0bcd4d7d2cb9defb790514375b78efbf60cc2e8 (diff) | |
| download | CMake-1555837ccbdee95cedb9a5ba0e617a62fe74b9a3.zip CMake-1555837ccbdee95cedb9a5ba0e617a62fe74b9a3.tar.gz CMake-1555837ccbdee95cedb9a5ba0e617a62fe74b9a3.tar.bz2 | |
Merge branch 'fortran-submodule-cray' into release-3.15
Merge-request: !3504
Diffstat (limited to 'Source')
| -rw-r--r-- | Source/cmFortranParserImpl.cxx | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/Source/cmFortranParserImpl.cxx b/Source/cmFortranParserImpl.cxx index 18e3c10..e8b1da8 100644 --- a/Source/cmFortranParserImpl.cxx +++ b/Source/cmFortranParserImpl.cxx @@ -79,7 +79,13 @@ std::string cmFortranParser_s::ModName(std::string const& mod_name) const std::string cmFortranParser_s::SModName(std::string const& mod_name, std::string const& sub_name) const { - return mod_name + this->Compiler.SModSep + sub_name + this->Compiler.SModExt; + std::string const& SModExt = + this->Compiler.SModExt.empty() ? ".mod" : this->Compiler.SModExt; + // An empty separator means that the compiler does not use a prefix. + if (this->Compiler.SModSep.empty()) { + return sub_name + SModExt; + } + return mod_name + this->Compiler.SModSep + sub_name + SModExt; } bool cmFortranParser_FilePush(cmFortranParser* parser, const char* fname) |