Add *compile-files* var

This commit is contained in:
Michiel Borkent 2022-03-13 13:15:50 +01:00
parent 158082e87e
commit 569f62c928

View file

@ -30,6 +30,7 @@
(def data-readers parser/data-readers) (def data-readers parser/data-readers)
(def command-line-args (core-dynamic-var '*command-line-args*)) (def command-line-args (core-dynamic-var '*command-line-args*))
(def warn-on-reflection (core-dynamic-var '*warn-on-reflection* false)) (def warn-on-reflection (core-dynamic-var '*warn-on-reflection* false))
(def compile-files (core-dynamic-var '*compile-files* false))
(def math-context (core-dynamic-var '*math-context*)) (def math-context (core-dynamic-var '*math-context*))
(defn read+string (defn read+string
@ -167,6 +168,7 @@
(apply read+string @common/ctx args))) (apply read+string @common/ctx args)))
'*command-line-args* command-line-args '*command-line-args* command-line-args
'*warn-on-reflection* warn-on-reflection '*warn-on-reflection* warn-on-reflection
'*compile-files* compile-files
'*math-context* math-context '*math-context* math-context
'with-precision (sci/copy-var with-precision clojure-core-ns) 'with-precision (sci/copy-var with-precision clojure-core-ns)
'-with-precision (sci/copy-var -with-precision clojure-core-ns) '-with-precision (sci/copy-var -with-precision clojure-core-ns)