如何编写使用sqlite连接到数据库并在Lisp中查询数据的函数

Question

我已经编写了此功能：

(defun load-db (filename)
  (with-open-file (in filename)
    (with-standard-io-syntax
      (setf *db* (read in)))))

我在本地有一个名为xx.db的数据库，我想使用sqlite进行连接，并且可以查询如下内容：

(defvar *db* (connect "~/xx.db"))
(execute-single *db* "select ss_type from capitalization where lemma = ?" "A")

我该怎么办？ 它不会针对上述查询运行，并且我已经包含了SQLite程序包，并提供了xx.db的路径

Answer 1

您尝试使用哪个数据库库？

使用clsql，您可以执行以下操作：

(ql:quickload "clsql")
(clsql:connect "xx" :database-type :sqlite)
(clsql:execute-command "from ...")

其他数据库库：https://github.com/CodyReichert/awesome-cl#database