remove thread kibit
This commit is contained in:
parent
964cec7f4c
commit
8f89fac6ab
2 changed files with 25 additions and 25 deletions
|
@ -1,4 +1,4 @@
|
||||||
(defproject yogsototh/kibit "0.1.3"
|
(defproject yogsototh/kibit "0.1.4"
|
||||||
:description "There's a function for that!"
|
:description "There's a function for that!"
|
||||||
:url "https://github.com/yogsototh/kibit"
|
:url "https://github.com/yogsototh/kibit"
|
||||||
:license {:name "Eclipse Public License - v 1.0"
|
:license {:name "Eclipse Public License - v 1.0"
|
||||||
|
|
|
@ -75,7 +75,7 @@
|
||||||
(logic/== % `(~(symbol (str klass "/" static-method)) ~@args))))])
|
(logic/== % `(~(symbol (str klass "/" static-method)) ~@args))))])
|
||||||
|
|
||||||
;; Threading
|
;; Threading
|
||||||
(let [form (logic/lvar)
|
#_(let [form (logic/lvar)
|
||||||
arg (logic/lvar)]
|
arg (logic/lvar)]
|
||||||
[#(logic/all (logic/== % (list '-> arg form)))
|
[#(logic/all (logic/== % (list '-> arg form)))
|
||||||
(fn [sbst]
|
(fn [sbst]
|
||||||
|
@ -88,7 +88,7 @@
|
||||||
(logic/project [form]
|
(logic/project [form]
|
||||||
(logic/== sbst (list* (first form) arg (rest form)))))]))])
|
(logic/== sbst (list* (first form) arg (rest form)))))]))])
|
||||||
|
|
||||||
(let [form (logic/lvar)
|
#_(let [form (logic/lvar)
|
||||||
arg (logic/lvar)]
|
arg (logic/lvar)]
|
||||||
[#(logic/all (logic/== % (list '->> arg form)))
|
[#(logic/all (logic/== % (list '->> arg form)))
|
||||||
(fn [sbst]
|
(fn [sbst]
|
||||||
|
|
Loading…
Reference in a new issue