aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorinit current directory[i] <urbanjost@comcast.net>2020-12-04 21:34:52 -0500
committerinit current directory[i] <urbanjost@comcast.net>2020-12-04 21:34:52 -0500
commitbe8f4d228ccd939e381abe4e0cb50cd0178645a9 (patch)
treeb4c6aa07abac656c142ed229c5145b50c3faf79f
parent5de92b8dcf4b27f7701ed941e153763196545374 (diff)
downloadfpm-be8f4d228ccd939e381abe4e0cb50cd0178645a9.tar.gz
fpm-be8f4d228ccd939e381abe4e0cb50cd0178645a9.zip
add coarray and less verbose warnings for intel ifort
-rw-r--r--fpm/src/fpm_compiler.f9014
1 files changed, 8 insertions, 6 deletions
diff --git a/fpm/src/fpm_compiler.f90 b/fpm/src/fpm_compiler.f90
index c3e2cfe..081c1f7 100644
--- a/fpm/src/fpm_compiler.f90
+++ b/fpm/src/fpm_compiler.f90
@@ -1,5 +1,5 @@
module fpm_compiler
-use fpm_model, only: fpm_model_t
+use fpm_model, only: fpm_model_t
use fpm_filesystem, only: join_path
public add_compile_flag_defaults
@@ -9,9 +9,9 @@ subroutine add_compile_flag_defaults(build_name,compiler,model)
character(len=*),intent(in) :: build_name, compiler
type(fpm_model_t), intent(inout) :: model
-! could just be a function to return a string instead of passing model
+! could just be a function to return a string instead of passing model
! but likely to change other components like matching C compiler
-
+
character(len=:),allocatable :: fflags
character(len=:),allocatable :: module_path_switch
@@ -43,7 +43,7 @@ character(len=:),allocatable :: module_path_switch
select case(build_name//'_'//compiler)
- case('release_caf')
+ case('release_caf')
module_path_switch='-J '
fflags='&
& -O3&
@@ -65,7 +65,7 @@ character(len=:),allocatable :: module_path_switch
& -fcheck-array-temporaries&
& -fbacktrace&
&'
- case('release_gfortran')
+ case('release_gfortran')
module_path_switch='-J '
fflags='&
& -O3&
@@ -137,6 +137,7 @@ character(len=:),allocatable :: module_path_switch
& -fp-model precise&
& -pc 64&
& -align all&
+ & -coarray&
& -error-limit 1&
& -reentrancy threaded&
& -nogen-interfaces&
@@ -147,7 +148,8 @@ character(len=:),allocatable :: module_path_switch
module_path_switch='-module '
fflags = '&
& -warn all&
- & -check all&
+ & -check:all:noarg_temp_created&
+ & -coarray&
& -error-limit 1&
& -O0&
& -g&