Clojure和/或集合 (defn getvaluesfromwhere命令 “从Where命令返回值列表” [查询表名] (让[values(re-seq#“[0-9a-zA-Z#=]+”((re-find#“WHERE(.*)”查询)1)) 按位(重新查找#“和|或”查询) 圣殿骑士(参考{}) ] ;第一个循环将查找运算符= (doseq[项目值] (让[result(case)(re find#“[=>

Clojure和/或集合 (defn getvaluesfromwhere命令 “从Where命令返回值列表” [查询表名] (让[values(re-seq#“[0-9a-zA-Z#=]+”((re-find#“WHERE(.*)”查询)1)) 按位(重新查找#“和|或”查询) 圣殿骑士(参考{}) ] ;第一个循环将查找运算符= (doseq[项目值] (让[result(case)(re find#“[=>,clojure,functional-programming,Clojure,Functional Programming,您应该取消所有内部集合的引用,并对新集合应用并集。) 应该是这样的: #<Ref@5a4e229e: #{#<Ref@3fc2e163: #{0}> #<Ref@63280c85: #{0 1}>}> #<Ref@5a4e229e: #{#<Ref@3fc2e163: #{0}> #<Ref@63280c85: #{0 1}>}> (let [newList (ref #{})] (doseq [item @your_r

您应该取消所有内部集合的引用,并对新集合应用并集。) 应该是这样的:

#<Ref@5a4e229e: #{#<Ref@3fc2e163: #{0}> #<Ref@63280c85: #{0 1}>}>
#<Ref@5a4e229e: #{#<Ref@3fc2e163: #{0}> #<Ref@63280c85: #{0 1}>}>
(let [newList (ref #{})] (doseq [item @your_ref_to_set_of_refs] (dosync (alter newList conj @item))) (apply union @newList))