Fix: collision between app and example executables of the same name

Use a separate example subdirectory in 'build' to store example executables.

Author: LKedward

ci/run_tests.bat

@@ -116,6 +116,9 @@ del /q /f build
 %fpm_path% build
 if errorlevel 1 exit 1
 
+.\build\gfortran_debug\example\demo-prog
+if errorlevel 1 exit 1
+
 .\build\gfortran_debug\app\demo-prog
 if errorlevel 1 exit 1
 

ci/run_tests.sh

@@ -52,6 +52,7 @@ cd ../hello_complex_2
 
 cd ../with_examples
 "${f_fpm_path}" build
+./build/gfortran_debug/example/demo-prog
 ./build/gfortran_debug/app/demo-prog
 
 cd ../auto_discovery_off

example_packages/with_examples/app/demo-prog.f90

@@ -0,0 +1,3 @@
+program demo
+  write(*, '(a)') "This is a simple program"
+end program demo

example_packages/with_examples/demo/prog.f90

@@ -3,10 +3,5 @@ build.auto-examples = false
 
 [[example]]
 name = "demo-prog"
-source-dir = "demo"
-main = "prog.f90"
-
-[[example]]
-name = "example-prog"
 source-dir = "example"
 main = "prog.f90"

example_packages/with_examples/fpm.toml

@@ -62,7 +62,7 @@ subroutine targets_from_sources(model,sources)
     type(srcfile_t), intent(in) :: sources(:)
 
     integer :: i
-    character(:), allocatable :: xsuffix
+    character(:), allocatable :: xsuffix, exe_dir
     type(build_target_t), pointer :: dep
     logical :: with_lib
 
@@ -99,18 +99,24 @@ subroutine targets_from_sources(model,sources)
                         source = sources(i) &
                         )
 
-            if (any(sources(i)%unit_scope == [FPM_SCOPE_APP, FPM_SCOPE_EXAMPLE])) then
-                call add_target(model%targets,type = FPM_TARGET_EXECUTABLE,&
-                            link_libraries = sources(i)%link_libraries, &
-                            output_file = join_path(model%output_directory,'app', &
-                            sources(i)%exe_name//xsuffix))
+            if (sources(i)%unit_scope == FPM_SCOPE_APP) then
+
+                exe_dir = 'app'
+
+            else if (sources(i)%unit_scope == FPM_SCOPE_EXAMPLE) then
+
+                exe_dir = 'example'
+
             else
-                call add_target(model%targets,type = FPM_TARGET_EXECUTABLE,&
+
+                exe_dir = 'test'
+
+            end if
+
+            call add_target(model%targets,type = FPM_TARGET_EXECUTABLE,&
                             link_libraries = sources(i)%link_libraries, &
-                            output_file = join_path(model%output_directory,'test', &
+                            output_file = join_path(model%output_directory,exe_dir, &
                             sources(i)%exe_name//xsuffix))
-            
-            end if
 
             ! Executable depends on object
             call add_dependency(model%targets(size(model%targets))%ptr, model%targets(size(model%targets)-1)%ptr)