From 2870a6754085b981d72236c3b716627929e2d9b4 Mon Sep 17 00:00:00 2001 From: Ben Boeckel Date: Fri, 21 Jul 2023 16:46:06 -0400 Subject: Tests/FortranOnly: add a test case for issue #25112 Add a test case for Fortran `OBJECT` libraries providing modules to consumers. --- Tests/FortranOnly/CMakeLists.txt | 6 ++++++ Tests/FortranOnly/objmain.f90 | 5 +++++ Tests/FortranOnly/objmod.f90 | 7 +++++++ 3 files changed, 18 insertions(+) create mode 100644 Tests/FortranOnly/objmain.f90 create mode 100644 Tests/FortranOnly/objmod.f90 diff --git a/Tests/FortranOnly/CMakeLists.txt b/Tests/FortranOnly/CMakeLists.txt index ed2a440..b092c42 100644 --- a/Tests/FortranOnly/CMakeLists.txt +++ b/Tests/FortranOnly/CMakeLists.txt @@ -184,3 +184,9 @@ if(CMAKE_Fortran_COMPILE_OPTIONS_PREPROCESS_OFF AND set_property(TARGET no_preprocess_target PROPERTY Fortran_PREPROCESS OFF) set_property(SOURCE no_preprocess_source_upper.F no_preprocess_source_fpp.fpp PROPERTY Fortran_PREPROCESS OFF) endif() + +# Issue 25112 +set(CMAKE_Fortran_MODULE_DIRECTORY "${PROJECT_BINARY_DIR}/include") +add_library(objmod OBJECT objmod.f90) +add_executable(objmain objmain.f90) +target_link_libraries(objmain PRIVATE objmod) diff --git a/Tests/FortranOnly/objmain.f90 b/Tests/FortranOnly/objmain.f90 new file mode 100644 index 0000000..d41d454 --- /dev/null +++ b/Tests/FortranOnly/objmain.f90 @@ -0,0 +1,5 @@ +program main + use objmod, only : hello + implicit none + call hello() +end program diff --git a/Tests/FortranOnly/objmod.f90 b/Tests/FortranOnly/objmod.f90 new file mode 100644 index 0000000..6b79cc7 --- /dev/null +++ b/Tests/FortranOnly/objmod.f90 @@ -0,0 +1,7 @@ +module objmod + implicit none +contains + subroutine hello() + print '(a)', "hello world" + end subroutine hello +end module objmod -- cgit v0.12