sqlite - 在 Common Lisp 中从 SQLite 捕获错误

Question

我正在使用来自 Quicklisp 的 SQLite 包装器，描述为 here .我注意到，例如，execute-non-query , 什么也不返回，但会抛出 sqlite-error s。但是，我不确定如何处理它们——据我所知，catch需要一个显式标记，我不确定包装器如何标记它们。

基本上，我想做这样的事情:

(if (no-error (execute-non-query *db* query-string))
    (do-happy-thing)
    (report-error))

我该怎么做呢？

Answer 1

handler-case是你的 friend 。

(handler-case 
    (progn
      (execute-non-query *db* query-string)
      (do-happy-thing))
  (sqlite-error (err) (report-error err))) ; err contains additional information