clojure - 如何获取数据数据库中最后一笔交易的日期时间？

Question

我想找到对连接进行的最新交易。以下似乎没有给出正确的日期:

(require '[datomic.api :as datomic])

(-> conn datomic/db datomic/basis-t datomic/t->tx (java.util.Date.))

Answer 1

我想通了:

(defn last-transaction-time [db]
  (let [t (-> db datomic/basis-t)]
    [t (ffirst (datomic/q '[:find ?t
                            :in $ ?tx
                            :where [?tx :db/txInstant ?t]]
                          db
                          (datomic/t->tx t)))]))