| 55 | } |
| 56 | |
| 57 | void cmCommonTargetGenerator::AppendFortranFormatFlags( |
| 58 | std::string& flags, cmSourceFile const& source) |
| 59 | { |
| 60 | std::string const srcfmt = source.GetSafeProperty("Fortran_FORMAT"); |
| 61 | cmOutputConverter::FortranFormat format = |
| 62 | cmOutputConverter::GetFortranFormat(srcfmt); |
| 63 | if (format == cmOutputConverter::FortranFormatNone) { |
| 64 | std::string const& tgtfmt = |
| 65 | this->GeneratorTarget->GetSafeProperty("Fortran_FORMAT"); |
| 66 | format = cmOutputConverter::GetFortranFormat(tgtfmt); |
| 67 | } |
| 68 | char const* var = nullptr; |
| 69 | switch (format) { |
| 70 | case cmOutputConverter::FortranFormatFixed: |
| 71 | var = "CMAKE_Fortran_FORMAT_FIXED_FLAG"; |
| 72 | break; |
| 73 | case cmOutputConverter::FortranFormatFree: |
| 74 | var = "CMAKE_Fortran_FORMAT_FREE_FLAG"; |
| 75 | break; |
| 76 | default: |
| 77 | break; |
| 78 | } |
| 79 | if (var) { |
| 80 | this->LocalCommonGenerator->AppendFlags( |
| 81 | flags, this->Makefile->GetSafeDefinition(var)); |
| 82 | } |
| 83 | } |
| 84 | |
| 85 | void cmCommonTargetGenerator::AppendFortranPreprocessFlags( |
| 86 | std::string& flags, cmSourceFile const& source, |
no test coverage detected