diff options
| author | Sebastian Ehlert <28669218+awvwgk@users.noreply.github.com> | 2021-07-31 12:19:25 +0200 |
|---|---|---|
| committer | Sebastian Ehlert <28669218+awvwgk@users.noreply.github.com> | 2021-07-31 12:19:25 +0200 |
| commit | 6a90ad52837c2287d7d92d4cac6249f504c75135 (patch) | |
| tree | ada65d29dc1b76af0cb22e9da29d30b41a8b0c23 /src/fpm_compiler.f90 | |
| parent | 41d6c7b40aaf59cc6d403add22167a81c2f8b494 (diff) | |
| download | fpm-6a90ad52837c2287d7d92d4cac6249f504c75135.tar.gz fpm-6a90ad52837c2287d7d92d4cac6249f504c75135.zip | |
Also detect MPI compiler for mpif90 and mpif77 wrappers
Diffstat (limited to 'src/fpm_compiler.f90')
| -rw-r--r-- | src/fpm_compiler.f90 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/fpm_compiler.f90 b/src/fpm_compiler.f90 index 77c94c4..32dfe33 100644 --- a/src/fpm_compiler.f90 +++ b/src/fpm_compiler.f90 @@ -453,7 +453,9 @@ function get_compiler_id(compiler) result(id) integer :: stat, io ! Check whether we are dealing with an MPI compiler wrapper first - if (check_compiler(compiler, "mpifort")) then + if (check_compiler(compiler, "mpifort") & + & .or. check_compiler(compiler, "mpif90") & + & .or. check_compiler(compiler, "mpif77")) then output = get_temp_filename() call run(compiler//" -showme:command > "//output//" 2>&1", & & echo=.false., exitstat=stat) |