Skip to content
Browse files

v+ and v- are now mere aliases for core.logic's nonlvaro and lvaro

  • Loading branch information...
1 parent f82fb40 commit 5364fffafbcf27753a957d6953212a768d8c78ba @cderoove committed Feb 4, 2013
View
BIN EkekoPlugin/libs/core.logic-0.8.0-beta5.jar
Binary file not shown.
View
6 EkekoPlugin/src/damp/ekeko/logic.clj
@@ -3,7 +3,7 @@
:author "Coen De Roover"}
damp.ekeko.logic
(:refer-clojure :exclude [==])
- (:use [clojure.core.logic]))
+ (:use [clojure.core.logic]))
(defn-
ekeko-lvar-sym?
@@ -89,13 +89,13 @@
v+
"Non-relational. Verifies that logic variable v is ground."
[v]
- `(project [~v] (succeeds (not (lvar? ~v)))))
+ `(nonlvaro ~v))
(defmacro
v-
"Non-relational. Verifies that logic variable v is not ground."
[v]
- `(project [~v] (succeeds (lvar? ~v))))
+ `(lvaro ~v))
(defmacro

0 comments on commit 5364fff

Please sign in to comment.
Something went wrong with that request. Please try again.