Skip to content

Commit

Permalink
Merge commit/db67f301adf78574ff12dd0e1bfd37073e373ea7 of master branch
Browse files Browse the repository at this point in the history
  • Loading branch information
crazyzlj committed Nov 29, 2023
1 parent 7805ea7 commit 0a523ec
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 2 deletions.
9 changes: 8 additions & 1 deletion src/CMakeLists.txt
Original file line number Diff line number Diff line change
Expand Up @@ -23,10 +23,14 @@ elseif(${CMAKE_Fortran_COMPILER_ID} STREQUAL "Cray")
set(FLAG_L72 -N72)
set(FLAG_L80 -N80)
set(FLAG_LLONG -N132)
elseif(${CMAKE_Fortran_COMPILER_ID} STREQUAL "Flang")
set(FLAG_L72 -Mextend)
set(FLAG_L80 -Mextend)
set(FLAG_LLONG -Mextend)
else() # gfortran tested only
set(FLAG_L72 -ffixed-line-length-72)
set(FLAG_L80 -ffixed-line-length-80)
set(FLAG_LLONG -ffree-line-length-none)
set(FLAG_LLONG -ffixed-line-length-none)
endif()

## Special sources that have fixed length of 72
Expand Down Expand Up @@ -78,8 +82,11 @@ if((NOT MSVC) AND (${First_Line_Of_Main_File} MATCHES " include 'modparm.f'
set(Format_Flag ${FLAG_LLONG})
endif()
list(FIND LEN72_SRCS ${CORENAME} _FOUND_LEN72)
list(FIND LENLONG_SRCS ${CORENAME} _FOUND_LENLONG)
if(${_FOUND_LEN72} GREATER -1)
set(Format_Flag ${FLAG_L72})
elseif(${_FOUND_LENLONG} GREATER -1)
set(Format_Flag ${FLAG_LLONG})
endif()
add_custom_command(OUTPUT ${CORENAME}.o
COMMAND ${CMAKE_Fortran_COMPILER} ${Compile_Flags_List} ${Format_Flag} -c
Expand Down
2 changes: 1 addition & 1 deletion src/header.f
Original file line number Diff line number Diff line change
Expand Up @@ -93,7 +93,7 @@ subroutine header
& " WTMPdegc"," Salt1 "," Salt2 ",
& " Salt3 "," Salt4 "," Salt5 ",
& " Salt6 "," Salt7 "," Salt8 ",
& " Salt9 "," Salt10 "," SAR ",
& " Salt9 "," Salt10 "," SAR ",
& " EC "/)

!! numbers printed to VB interface reach output file
Expand Down

0 comments on commit 0a523ec

Please sign in to comment.