sci: set! for CLJS
This commit is contained in:
parent
6bcc0e4a3f
commit
3eafacac2b
2 changed files with 2 additions and 2 deletions
2
sci
2
sci
|
|
@ -1 +1 @@
|
||||||
Subproject commit 4de7c78024bfdb5c52e273be372144d46228939a
|
Subproject commit caf2337833fb265190a1cd332804e2999db13dc6
|
||||||
|
|
@ -20,7 +20,7 @@
|
||||||
(def log-level (sci/new-dynamic-var '*-log-level* default-log-level {:ns sci-ns}))
|
(def log-level (sci/new-dynamic-var '*-log-level* default-log-level {:ns sci-ns}))
|
||||||
;; (def task-name (sci/new-dynamic-var '*-task-name* nil {:ns sci-ns}))
|
;; (def task-name (sci/new-dynamic-var '*-task-name* nil {:ns sci-ns}))
|
||||||
(def task (sci/new-dynamic-var '*task* nil {:ns sci-ns}))
|
(def task (sci/new-dynamic-var '*task* nil {:ns sci-ns}))
|
||||||
(def current-task (sci/new-dynamic-var 'current-task (fn [] @task) {:ns sci-ns}))
|
(def current-task (sci/new-var 'current-task (fn [] @task) {:ns sci-ns}))
|
||||||
(def state (sci/new-var 'state (atom {}) {:ns sci-ns}))
|
(def state (sci/new-var 'state (atom {}) {:ns sci-ns}))
|
||||||
|
|
||||||
(defn log-info [& strs]
|
(defn log-info [& strs]
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue