如何在本地开发期间删除xtdb中的所有数据

Question

在开发过程中，我发现有很多资源被"遗弃"了。在我的本地XTDB服务器上。

在不重新启动repl的情况下本地清除这些数据的最佳方法是什么?

Answer 1

在提出问题的时候我想到了答案:

;; Given some `xtdb-node`
(let [res (xt/q (xt/db xtdb-node)
'{:find [id]
:where [[id :xt/id _]]})
ids (map first res)]
(->> ids
(mapv (fn [id] [::xt/delete id]))
(xt/submit-tx xtdb-node)))

只搜索具有:xt/id键的所有文档，因为这是xtdb的要求。