[nongnu] elpa/emacsql 1becb00945 419/427: Define a few constants as such

[ELPA Syncer]

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

    Define a few constants as such
---
 emacsql-mysql.el  | 2 +-
 emacsql-psql.el   | 2 +-
 emacsql-sqlite.el | 4 ++--
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/emacsql-mysql.el b/emacsql-mysql.el
index 9927b561ac..dbc7c44233 100644
--- a/emacsql-mysql.el
+++ b/emacsql-mysql.el
@@ -28,7 +28,7 @@
 (defvar emacsql-mysql-sentinel "--------------\n\n--------------\n\n"
   "What MySQL will print when it has completed its output.")
 
-(defvar emacsql-mysql-reserved
+(defconst emacsql-mysql-reserved
   (emacsql-register-reserved
    '(ACCESSIBLE ADD ALL ALTER ANALYZE AND AS ASC ASENSITIVE BEFORE
      BETWEEN BIGINT BINARY BLOB BOTH BY CALL CASCADE CASE CHANGE CHAR
diff --git a/emacsql-psql.el b/emacsql-psql.el
index 14a74aed8a..6f7187492a 100644
--- a/emacsql-psql.el
+++ b/emacsql-psql.el
@@ -43,7 +43,7 @@
                 nil)))
         (error :cannot-execute)))))
 
-(defvar emacsql-psql-reserved
+(defconst emacsql-psql-reserved
   (emacsql-register-reserved
    '(ALL ANALYSE ANALYZE AND ANY AS ASC AUTHORIZATION BETWEEN BINARY
      BOTH CASE CAST CHECK COLLATE COLUMN CONSTRAINT CREATE CROSS
diff --git a/emacsql-sqlite.el b/emacsql-sqlite.el
index dd0812c21d..337a8c7f16 100644
--- a/emacsql-sqlite.el
+++ b/emacsql-sqlite.el
@@ -48,7 +48,7 @@
                        user-emacs-directory)))
   "Path to the EmacSQL backend (this is not the sqlite3 shell).")
 
-(defvar emacsql-sqlite-reserved
+(defconst emacsql-sqlite-reserved
   (emacsql-register-reserved
    '(ABORT ACTION ADD AFTER ALL ALTER ANALYZE AND AS ASC ATTACH
      AUTOINCREMENT BEFORE BEGIN BETWEEN BY CASCADE CASE CAST CHECK
@@ -128,7 +128,7 @@ buffer. This is for debugging purposes."
     (process-send-string process message)
     (process-send-string process "\n")))
 
-(defvar emacsql-sqlite-condition-alist
+(defconst emacsql-sqlite-condition-alist
   '(((1 4 9 12 17 18 20 21 22 25) emacsql-error)
     ((2)                          emacsql-internal)
     ((3 8 10 13 14 15 23)         emacsql-access)