diff options
-rw-r--r-- | fpm/src/fpm.f90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/fpm/src/fpm.f90 b/fpm/src/fpm.f90 index aabcfd1..846082f 100644 --- a/fpm/src/fpm.f90 +++ b/fpm/src/fpm.f90 @@ -91,6 +91,7 @@ select case (get_os_type()) end select if (stat /= 0) then print *, "execute_command_line() failed" + error stop end if open(newunit=u, file="fpm_ls.out", status="old") allocate(files(number_of_rows(u))) |