diff options
| -rw-r--r-- | src/fpm_sources.f90 | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/fpm_sources.f90 b/src/fpm_sources.f90 index c781535..f129878 100644 --- a/src/fpm_sources.f90 +++ b/src/fpm_sources.f90 @@ -201,6 +201,9 @@ subroutine get_executable_source_dirs(exe_dirs,executables) n = 0 do i=1,size(executables) + dirs_temp(i)%s=' ' + enddo + do i=1,size(executables) if (.not.(executables(i)%source_dir .in. dirs_temp)) then n = n + 1 |