Add conj and assoc
This commit is contained in:
parent
015d079d57
commit
1123d82503
|
@ -82,6 +82,18 @@
|
||||||
::data/type ::data/clj
|
::data/type ::data/clj
|
||||||
:body (fn [ms] (Thread/sleep ms))})
|
:body (fn [ms] (Thread/sleep ms))})
|
||||||
|
|
||||||
|
(def conj- {:name "conj"
|
||||||
|
::data/type ::data/clj
|
||||||
|
:body conj})
|
||||||
|
|
||||||
|
(def assoc- {:name "assoc"
|
||||||
|
::data/type ::data/clj
|
||||||
|
:body assoc})
|
||||||
|
|
||||||
|
(def get- {:name "get"
|
||||||
|
::data/type ::data/clj
|
||||||
|
:body get})
|
||||||
|
|
||||||
(def prelude {"eq" eq
|
(def prelude {"eq" eq
|
||||||
"add" add
|
"add" add
|
||||||
"print" print-
|
"print" print-
|
||||||
|
@ -97,4 +109,7 @@
|
||||||
"and" and-
|
"and" and-
|
||||||
"or" or-
|
"or" or-
|
||||||
"sleep" sleep-
|
"sleep" sleep-
|
||||||
|
"assoc" assoc-
|
||||||
|
"conj" conj-
|
||||||
|
"get" get-
|
||||||
})
|
})
|
Loading…
Reference in New Issue
Block a user