1

我正在尝试使用 Clojure 的 BaseX 的内部数据类型构建 XML 结构。

(defn basex-elem [token-name dict]
  (let [elem (org.basex.query.item.FElem.
                (org.basex.query.item.QNm. token-name))]
    (for [[k v] dict]
      (do
        (println "THIS IS REACHED")
        (let [k-name (org.basex.query.item.QNm. (.getName k))
              k-attr (org.basex.query.item.FAttr.
                        k-name 
                        org.basex.util.Token/token v))]
          (.add elem k-attr))))
    elem))

当使用它来创建元素时，永远不会打印“THIS IS REACHED”：

(def test-elem (basex-elem "element-name" {:key1 "value1", :key2 "value2"}))
; => #'user/test-elem

因此该值在没有任何属性的情况下返回：

test-elem
; => #<FElem <element-name/>>

但是添加属性会起作用。

(.add test-elem
      (org.basex.query.item.FAttr.
        (org.basex.query.item.QNm. "foo")
        (org.basex.util.Token/token "bar")))
; => #<FElem <element-name foo="bar"/>>

因此，大概我在循环中做错了什么。任何指针？

4

1 回答 1

6

for不是 clojure 中的循环构造，而是列表理解并产生惰性序列。

doseq当有副作用时使用。

于 2012-04-12T23:41:56.103 回答