0.8.4-SNAPSHOT Arrow_down_16x16

handle-cclause

clojure.core.logic.dcg

  • (handle-cclause fsym osym cclause)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source clojure/core/logic/dcg.clj:101 top

(defn handle-cclause [fsym osym cclause]
  (let [c (count-clauses cclause)
        r (range 2 (clojure.core/inc c))
        lsyms (conj (into [fsym] (map lsym r)) osym)
        clauses (mark-clauses cclause)
        clauses (handle-clauses lsyms clauses)]
    `(fresh [~@(butlast (rest lsyms))]
       ~@clauses)))
Vars in clojure.core.logic.dcg/handle-cclause:
Used in 0 other vars

Comments top

No comments for handle-cclause. Log in to add a comment.