[nongnu] elpa/emacsql 93885039e9 1/2: Signal an error if emacsql-sqlite fails immediately

[ELPA Syncer]

branch: elpa/emacsql
commit 93885039e99cf7b6bdcefa0fbe8fa69b34c57f71
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Signal an error if emacsql-sqlite fails immediately
---
 emacsql-sqlite.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/emacsql-sqlite.el b/emacsql-sqlite.el
index 7b8876fe92..1500c6f860 100644
--- a/emacsql-sqlite.el
+++ b/emacsql-sqlite.el
@@ -84,6 +84,8 @@ used.")
     (setf (slot-value connection 'process) process)
     (setf (process-sentinel process)
           (lambda (proc _) (kill-buffer (process-buffer proc))))
+    (when (memq (process-status process) '(exit signal))
+      (error "%s has failed immediately" emacsql-sqlite-executable))
     (emacsql-wait connection)
     (emacsql connection [:pragma (= busy-timeout $s1)]
              (/ (* emacsql-global-timeout 1000) 2))