diff --git a/cime_config/machines/Depends.gnu.cmake b/cime_config/machines/Depends.gnu.cmake index 72ee0e834511..f690c9f88526 100644 --- a/cime_config/machines/Depends.gnu.cmake +++ b/cime_config/machines/Depends.gnu.cmake @@ -13,19 +13,11 @@ if (NOT DEBUG) endif() endif() -list(APPEND ALLOW_INVALID_BOZ_LIST - eam/src/control/cam_history.F90 - elm/src/biogeochem/MEGANFactorsMod.F90 -) list(APPEND NO_INLINE_ARG_PACKING_LIST eam/src/dynamics/se/inidat.F90 ) if (CMAKE_Fortran_COMPILER_VERSION VERSION_GREATER_EQUAL 10) - foreach(ITEM IN LISTS ALLOW_INVALID_BOZ_LIST) - e3sm_add_flags("${ITEM}" "-fallow-invalid-boz") # avoids build error for integer, parameter :: gen_hash_key_offset = z'000053db' - endforeach() - if (NOT DEBUG) # new in gnu10, inline arg packing was causing INF values with SMS_P4x1.ne4pg2_ne4pg2.F-MMFXX foreach(ITEM IN LISTS NO_INLINE_ARG_PACKING_LIST) diff --git a/cime_config/machines/Depends.gnugpu.cmake b/cime_config/machines/Depends.gnugpu.cmake index e75fe5dbdaec..087feda541b2 100644 --- a/cime_config/machines/Depends.gnugpu.cmake +++ b/cime_config/machines/Depends.gnugpu.cmake @@ -11,19 +11,11 @@ if (NOT DEBUG) endif() endif() -list(APPEND ALLOW_INVALID_BOZ_LIST - eam/src/control/cam_history.F90 - elm/src/biogeochem/MEGANFactorsMod.F90 -) list(APPEND NO_INLINE_ARG_PACKING_LIST eam/src/dynamics/se/inidat.F90 ) if (CMAKE_Fortran_COMPILER_VERSION VERSION_GREATER_EQUAL 10) - foreach(ITEM IN LISTS ALLOW_INVALID_BOZ_LIST) - e3sm_add_flags("${ITEM}" "-fallow-invalid-boz") # avoids build error for integer, parameter :: gen_hash_key_offset = z'000053db' - endforeach() - if (NOT DEBUG) # new in gnu10, inline arg packing was causing INF values with SMS_P4x1.ne4pg2_ne4pg2.F-MMFXX foreach(ITEM IN LISTS NO_INLINE_ARG_PACKING_LIST) diff --git a/cime_config/machines/cmake_macros/gnu_anlgce-ub18.cmake b/cime_config/machines/cmake_macros/gnu_anlgce-ub18.cmake index d2d0c4ff4df8..be997d160315 100644 --- a/cime_config/machines/cmake_macros/gnu_anlgce-ub18.cmake +++ b/cime_config/machines/cmake_macros/gnu_anlgce-ub18.cmake @@ -5,7 +5,6 @@ string(APPEND CXX_LIBS " -lstdc++") if (NOT DEBUG) string(APPEND FFLAGS " -O2") endif() -string(APPEND FFLAGS " -fallow-argument-mismatch -fallow-invalid-boz") execute_process(COMMAND $ENV{NETCDF_PATH}/bin/nf-config --flibs OUTPUT_VARIABLE SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE0 OUTPUT_STRIP_TRAILING_WHITESPACE) execute_process(COMMAND $ENV{NETCDF_PATH}/bin/nc-config --libs OUTPUT_VARIABLE SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE1 OUTPUT_STRIP_TRAILING_WHITESPACE) string(APPEND SLIBS " ${SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE0} ${SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE1} -lblas -llapack") diff --git a/cime_config/machines/cmake_macros/gnu_anlgce.cmake b/cime_config/machines/cmake_macros/gnu_anlgce.cmake index d2d0c4ff4df8..be997d160315 100644 --- a/cime_config/machines/cmake_macros/gnu_anlgce.cmake +++ b/cime_config/machines/cmake_macros/gnu_anlgce.cmake @@ -5,7 +5,6 @@ string(APPEND CXX_LIBS " -lstdc++") if (NOT DEBUG) string(APPEND FFLAGS " -O2") endif() -string(APPEND FFLAGS " -fallow-argument-mismatch -fallow-invalid-boz") execute_process(COMMAND $ENV{NETCDF_PATH}/bin/nf-config --flibs OUTPUT_VARIABLE SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE0 OUTPUT_STRIP_TRAILING_WHITESPACE) execute_process(COMMAND $ENV{NETCDF_PATH}/bin/nc-config --libs OUTPUT_VARIABLE SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE1 OUTPUT_STRIP_TRAILING_WHITESPACE) string(APPEND SLIBS " ${SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE0} ${SHELL_CMD_OUTPUT_BUILD_INTERNAL_IGNORE1} -lblas -llapack") diff --git a/cime_config/machines/cmake_macros/gnu_docker-scream.cmake b/cime_config/machines/cmake_macros/gnu_docker-scream.cmake index eb95c7113ce7..713260895c9c 100644 --- a/cime_config/machines/cmake_macros/gnu_docker-scream.cmake +++ b/cime_config/machines/cmake_macros/gnu_docker-scream.cmake @@ -66,6 +66,3 @@ set(SCC "/opt/conda/bin/x86_64-conda-linux-gnu-gcc") set(SCXX "/opt/conda/bin/x86_64-conda-linux-gnu-g++") set(SFC "/opt/conda/bin/x86_64-conda-linux-gnu-gfortran") set(SUPPORTS_CXX "TRUE") -if (CMAKE_Fortran_COMPILER_VERSION VERSION_GREATER_EQUAL 10) - string(APPEND FFLAGS " -fallow-argument-mismatch -fallow-invalid-boz ") -endif() diff --git a/cime_config/machines/cmake_macros/gnu_eddi.cmake b/cime_config/machines/cmake_macros/gnu_eddi.cmake index 4318ecd7e224..9233b9a86846 100644 --- a/cime_config/machines/cmake_macros/gnu_eddi.cmake +++ b/cime_config/machines/cmake_macros/gnu_eddi.cmake @@ -4,10 +4,10 @@ if (COMP_NAME STREQUAL gptl) endif() set(NETCDF_PATH "$ENV{NETCDF_HOME}") if (NOT DEBUG) - string(APPEND FFLAGS " -fno-unsafe-math-optimizations -fallow-argument-mismatch -fallow-invalid-boz") + string(APPEND FFLAGS " -fno-unsafe-math-optimizations ") endif() if (DEBUG) - string(APPEND FFLAGS " -g -fbacktrace -fbounds-check -ffpe-trap=invalid,zero,overflow -fallow-argument-mismatch -fallow-invalid-boz -Wall") + string(APPEND FFLAGS " -g -fbacktrace -fbounds-check -ffpe-trap=invalid,zero,overflow -Wall") endif() string(APPEND SLIBS " -L$ENV{NETCDF_HOME}/lib/ -lnetcdff -lnetcdf -lcurl -llapack -lblas") if (MPILIB STREQUAL mpi-serial) diff --git a/cime_config/machines/cmake_macros/gnu_spock.cmake b/cime_config/machines/cmake_macros/gnu_spock.cmake index 72278098ab7c..a100d549b737 100644 --- a/cime_config/machines/cmake_macros/gnu_spock.cmake +++ b/cime_config/machines/cmake_macros/gnu_spock.cmake @@ -1,5 +1,5 @@ set(SUPPORTS_CXX "TRUE") -string(APPEND FFLAGS " -fallow-argument-mismatch -Wno-implicit-interface -fallow-invalid-boz ") +string(APPEND FFLAGS " -Wno-implicit-interface ") string(APPEND CXX_LIBS " -lstdc++") if (NOT DEBUG) string(APPEND FFLAGS " -O2") diff --git a/components/eam/src/control/cam_history.F90 b/components/eam/src/control/cam_history.F90 index b586d9317edb..c1b66c734d4e 100644 --- a/components/eam/src/control/cam_history.F90 +++ b/components/eam/src/control/cam_history.F90 @@ -260,7 +260,7 @@ module cam_history ! logic in the routine that optimizes character strings of length 8. ! - integer, parameter :: gen_hash_key_offset = z'000053db' + integer, parameter :: gen_hash_key_offset = int(z'000053db') integer, parameter :: tbl_max_idx = 15 ! 2**N - 1 integer, dimension(0:tbl_max_idx) :: tbl_gen_hash_key = & diff --git a/components/elm/src/biogeochem/MEGANFactorsMod.F90 b/components/elm/src/biogeochem/MEGANFactorsMod.F90 index e266e462d04f..38056b6429ef 100644 --- a/components/elm/src/biogeochem/MEGANFactorsMod.F90 +++ b/components/elm/src/biogeochem/MEGANFactorsMod.F90 @@ -268,7 +268,7 @@ integer function gen_hashkey(string) integer :: i integer, parameter :: tbl_max_idx = 15 ! 2**N - 1 - integer, parameter :: gen_hash_key_offset = z'000053db' + integer, parameter :: gen_hash_key_offset = int(z'000053db') integer, dimension(0:tbl_max_idx) :: tbl_gen_hash_key = (/61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1/) hash = gen_hash_key_offset