jdbc - 无法理解 clojure 中的 SQLException 异常

Question

我创建了一些 clojure 函数来访问数据库，如下面的代码片段所示:

(defn get-dg [date]
  (let [query (str "......")
        ]
    (jdbc/with-connection db
      (jdbc/with-query-results rows 
          [query date date date date]
          (.debug log rows)
          (if (not (seq rows)) 
           nil
           rows))))
)

一切正常。该查询返回一个结果集，然后我可以对其进行处理。现在，如果我注释掉(.debug 日志行)，我会得到这个:

java.lang.RuntimeException: java.sql.SQLException: Closed Resultset: next

知道为什么吗？

谢谢

Answer 1

“行”是懒惰的。似乎“(.debug log rows)”评估了“行”。只需明确地做到这一点:

(defn get-dg [date]
  (let [query (str "......") ]
    (jdbc/with-connection db
      (jdbc/with-query-results rows [query date date date date]
        (comment .debug log rows)
        (if (empty? rows) nil (doall rows))))))