3

我正在使用Monger在 MongoDB 中存储数据。我想存储一个 Clojure 集。读取和写入集合确实有效,但它以列表的形式返回。我怀疑 MongoDB 实际上并不支持 set 数据类型,所以 Monger 客户端也不支持,但希望我错了。

有什么方法可以让 Monger 以正确的类型返回我存储的集合吗?

下面是最小的 Leiningen 示例(这只是最基本的 Monger 示例):

> lein new mongo-test
> cd mongo-test

编辑 project.clj 以添加 Monger 依赖项:

(defproject mongo-test "0.1.0-SNAPSHOT"
  :dependencies [[org.clojure/clojure "1.5.1"]
                 [com.novemberain/monger "2.0.0-rc1"]])

启动 REPL:

> lein repl

插入并读回一个集合 - 注意找到的值是一个列表,而不是一个集合:

user=> (require '[monger.core :as mg])
nil
user=> (require '[monger.collection :as mc])
nil
user=> (def conn (mg/connect))
#'user/conn
user=> (def db (mg/get-db conn "monger-test"))
#'user/db
user=> (mc/remove db "things")
#<WriteResult { "serverUsed" : "127.0.0.1:27017" , "n" : 1 , "connectionId" : 248 , "err" :  null  , "ok" : 1.0}>
user=> (mc/insert db "things" {:set #{"A" 1}})
#<WriteResult { "serverUsed" : "127.0.0.1:27017" , "n" : 0 , "connectionId" : 248 , "err" :  null  , "ok" : 1.0}>
user=> (.next (mc/find db "things"))
{"_id" #<ObjectId 537ce43130045df5b9ff1102>, "set" [1 "A"]}
user=> (get (.next (mc/find db "things")) "set")
[1 "A"]
user=> (type (get (.next (mc/find db "things")) "set"))
com.mongodb.BasicDBList
user=> (set (get (.next (mc/find db "things")) "set"))
#{1 "A"}
user=> (type (set (get (.next (mc/find db "things")) "set")))
clojure.lang.PersistentHashSet

显然我可以将结果传递给设置,就像最后两行一样,但我不想为每个特定的键调用它。有没有办法让这种情况透明地发生?

4

1 回答 1

1

不幸的是,您并没有错,MongoDB 没有内置的集合数据类型。您的最后一个示例是一种非常有效的处理方式,就像调用一样

(update-in results [..path.here.. "set"] set) 

在您确实需要使用集合的情况下。

于 2014-05-21T21:58:34.643 回答