You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
105 lines
3.6 KiB
105 lines
3.6 KiB
# Macro that defines variables describing the Fortran name mangling
|
|
# convention
|
|
#
|
|
# Sets the following outputs on success:
|
|
#
|
|
# INTFACE
|
|
# Add_
|
|
# NoChange
|
|
# f77IsF2C
|
|
# UpCase
|
|
#
|
|
macro(FORTRAN_MANGLING CDEFS)
|
|
message(STATUS "=========")
|
|
get_filename_component(F77_NAME ${CMAKE_Fortran_COMPILER} NAME)
|
|
get_filename_component(F77_PATH ${CMAKE_Fortran_COMPILER} PATH)
|
|
set(F77 ${F77_NAME} CACHE INTERNAL "Name of the fortran compiler.")
|
|
|
|
if(${F77} STREQUAL "ifort.exe")
|
|
#settings for Intel Fortran
|
|
set(F77_OPTION_COMPILE "/c" CACHE INTERNAL
|
|
"Fortran compiler option for compiling without linking.")
|
|
set(F77_OUTPUT_OBJ "/Fo" CACHE INTERNAL
|
|
"Fortran compiler option for setting object file name.")
|
|
set(F77_OUTPUT_EXE "/Fe" CACHE INTERNAL
|
|
"Fortran compiler option for setting executable file name.")
|
|
else()
|
|
# in other case, let user specify their fortran configurations.
|
|
set(F77_OPTION_COMPILE "-c" CACHE STRING
|
|
"Fortran compiler option for compiling without linking.")
|
|
set(F77_OUTPUT_OBJ "-o" CACHE STRING
|
|
"Fortran compiler option for setting object file name.")
|
|
set(F77_OUTPUT_EXE "-o" CACHE STRING
|
|
"Fortran compiler option for setting executable file name.")
|
|
set(F77_LIB_PATH "" CACHE PATH
|
|
"Library path for the fortran compiler")
|
|
set(F77_INCLUDE_PATH "" CACHE PATH
|
|
"Include path for the fortran compiler")
|
|
endif()
|
|
|
|
|
|
message(STATUS "Testing FORTRAN_MANGLING")
|
|
|
|
message(STATUS "Compiling Finface.f...")
|
|
|
|
execute_process ( COMMAND ${CMAKE_Fortran_COMPILER} ${F77_OPTION_COMPILE} ${PROJECT_SOURCE_DIR}/lapacke/mangling/Fintface.f
|
|
WORKING_DIRECTORY ${CMAKE_BINARY_DIR}${CMAKE_FILES_DIRECTORY}/CMakeTmp
|
|
OUTPUT_VARIABLE OUTPUT
|
|
RESULT_VARIABLE RESULT
|
|
ERROR_VARIABLE ERROR)
|
|
|
|
if(RESULT EQUAL 0)
|
|
message(STATUS "Compiling Finface.f successful")
|
|
else()
|
|
message(FATAL_ERROR " Compiling Finface.f FAILED")
|
|
message(FATAL_ERROR " Error:\n ${ERROR}")
|
|
endif()
|
|
|
|
message(STATUS "Compiling Cintface.c...")
|
|
|
|
execute_process ( COMMAND ${CMAKE_C_COMPILER} ${F77_OPTION_COMPILE} ${PROJECT_SOURCE_DIR}/lapacke/mangling/Cintface.c
|
|
WORKING_DIRECTORY ${CMAKE_BINARY_DIR}${CMAKE_FILES_DIRECTORY}/CMakeTmp
|
|
OUTPUT_VARIABLE OUTPUT
|
|
RESULT_VARIABLE RESULT
|
|
ERROR_VARIABLE ERROR)
|
|
|
|
if(RESULT EQUAL 0)
|
|
message(STATUS "Compiling Cintface.c successful")
|
|
else()
|
|
message(FATAL_ERROR " Compiling Cintface.c FAILED")
|
|
message(FATAL_ERROR " Error:\n ${ERROR}")
|
|
endif()
|
|
|
|
message(STATUS "Linking Finface.f and Cintface.c...")
|
|
|
|
execute_process ( COMMAND ${CMAKE_Fortran_COMPILER} ${F77_OUTPUT_OBJ} xintface.exe Fintface.o Cintface.o
|
|
WORKING_DIRECTORY ${CMAKE_BINARY_DIR}${CMAKE_FILES_DIRECTORY}/CMakeTmp
|
|
OUTPUT_VARIABLE OUTPUT
|
|
RESULT_VARIABLE RESULT
|
|
ERROR_VARIABLE ERROR)
|
|
|
|
if(RESULT EQUAL 0)
|
|
message(STATUS "Linking Finface.f and Cintface.c successful")
|
|
else()
|
|
message(FATAL_ERROR " Linking Finface.f and Cintface.c FAILED")
|
|
message(FATAL_ERROR " Error:\n ${ERROR}")
|
|
endif()
|
|
|
|
message(STATUS "Running ./xintface...")
|
|
|
|
execute_process ( COMMAND ./xintface.exe
|
|
WORKING_DIRECTORY ${CMAKE_BINARY_DIR}${CMAKE_FILES_DIRECTORY}/CMakeTmp
|
|
RESULT_VARIABLE xintface_RES
|
|
OUTPUT_VARIABLE xintface_OUT
|
|
ERROR_VARIABLE xintface_ERR)
|
|
|
|
|
|
if (xintface_RES EQUAL 0)
|
|
string(REPLACE "\n" "" xintface_OUT "${xintface_OUT}")
|
|
message(STATUS "Fortran MANGLING convention: ${xintface_OUT}")
|
|
set(CDEFS ${xintface_OUT})
|
|
else()
|
|
message(FATAL_ERROR "FORTRAN_MANGLING:ERROR ${xintface_ERR}")
|
|
endif()
|
|
|
|
endmacro()
|
|
|