From fc03a11ebd76a089fc5191ac0fa064e87b17d0ff Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ond=C5=99ej=20=C4=8Cert=C3=ADk?= <ondrej@certik.us>
Date: Wed, 22 Jul 2020 14:01:02 -0600
Subject: Recover from `src/` not existing

---
 fpm/src/fpm.f90 | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/fpm/src/fpm.f90 b/fpm/src/fpm.f90
index 846082f..bf99641 100644
--- a/fpm/src/fpm.f90
+++ b/fpm/src/fpm.f90
@@ -90,8 +90,10 @@ select case (get_os_type())
         error stop
 end select
 if (stat /= 0) then
-    print *, "execute_command_line() failed"
-    error stop
+    print *, "execute_command_line() failed, but continuing"
+    ! Not erroring out here, as sometimes the `dir` might not exist
+    allocate(files(0))
+    return
 end if
 open(newunit=u, file="fpm_ls.out", status="old")
 allocate(files(number_of_rows(u)))
-- 
cgit v1.2.3