diff options
Diffstat (limited to 'src/clojure/contrib/datalog/rules.clj')
| -rw-r--r-- | src/clojure/contrib/datalog/rules.clj | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/clojure/contrib/datalog/rules.clj b/src/clojure/contrib/datalog/rules.clj index 9e58115d..bcfe5c4c 100644 --- a/src/clojure/contrib/datalog/rules.clj +++ b/src/clojure/contrib/datalog/rules.clj @@ -198,5 +198,10 @@ (do (trace-datalog (println bs)) (project-literal db-2 head bs))))) +(defn apply-rules-set + [db rs] + (reduce (fn [rdb rule] + (apply-rule db rdb rule)) db rs)) + ;; End of file
\ No newline at end of file |