[nongnu] elpa/emacsql f5ab473482 2/2: test: Warn about missing dependencies

[ELPA Syncer]

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

    test: Warn about missing dependencies
---
 .github/workflows/test.yml      |  1 +
 tests/emacsql-external-tests.el | 19 +++++++++++++------
 2 files changed, 14 insertions(+), 6 deletions(-)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
index bcb88f2a16..9c5ff0a441 100644
--- a/.github/workflows/test.yml
+++ b/.github/workflows/test.yml
@@ -106,6 +106,7 @@ jobs:
           PSQL_USER: postgres
           PSQL_HOST: 127.0.0.1
           PSQL_PORT: 5432
+          # FIXME(CI) Fix pg.
           # PG_DATABASE: postgres
           # PG_USER: postgres
           # PG_PASSWORD: postgres
diff --git a/tests/emacsql-external-tests.el b/tests/emacsql-external-tests.el
index 087652f73f..e7b52ca308 100644
--- a/tests/emacsql-external-tests.el
+++ b/tests/emacsql-external-tests.el
@@ -9,14 +9,21 @@
 (require 'emacsql)
 
 (require 'emacsql-sqlite)
-;; FIXME(CI) this is currently not tested because the Emacs
-;; snapshot hasn't been compiled with sqlite support.
-(when (require 'sqlite nil t) (require 'emacsql-sqlite-builtin))
-(when (require 'sqlite3 nil t) (require 'emacsql-sqlite-module))
+(if (require 'sqlite nil t)
+    (require 'emacsql-sqlite-builtin)
+  (message "WARNING: Forgo testing `%s' because `%s' is unavailable"
+           'emacsql-sqlite-builtin 'sqlite))
+(if (require 'sqlite3 nil t)
+    (require 'emacsql-sqlite-module)
+  (message "WARNING: Forgo testing `%s' because `%s' is unavailable"
+           'emacsql-sqlite-module 'sqlite3))
 (require 'emacsql-mysql)
 (require 'emacsql-psql)
-;; FIXME(CI) broken and thus disabled in test.yml.
-(when (require 'pg nil t) (require 'emacsql-pg))
+;; FIXME(CI) Broken and thus disabled in test.yml.
+(if (require 'pg nil t)
+    (require 'emacsql-pg)
+  (message "WARNING: Forgo testing `%s' because `%s' is unavailable"
+           'emacsql-pg 'pg))
 
 (defvar emacsql-tests-timeout 4
   "Be aggressive about not waiting on subprocesses in unit tests.")