Given a magic form of a query, give back the literal form of its seed
relation
Source
clojure/contrib/datalog/magic.clj:63
top
(defn seed-relation
"Given a magic form of a query, give back the literal form of its seed
relation"
[q]
(let [pred (-> q literal-predicate get-base-predicate)
bnds (-> q literal-predicate get-adorned-bindings)]
(with-meta (assoc q :predicate [pred :magic-seed bnds]) {})))
Comments top
No comments for seed-relation. Log in to add a comment.