Improvements on backend application initialization.

On repl and on production environment.
This commit is contained in:
Andrey Antukh 2020-02-01 01:13:50 +01:00
parent f245656c0c
commit 566fa9cb91
5 changed files with 11 additions and 13 deletions

View file

@ -16,17 +16,18 @@
(let [m (System/getProperty "uxbox.enable-asserts")]
(or (nil? m) (= "true" m))))
;; Set value for current thread binding.
(set! *assert* (enable-asserts nil))
;; Set value for all new threads bindings.
(alter-var-root #'*assert* enable-asserts)
;; Set value for current thread binding.
(set! *assert* (enable-asserts nil))
;; --- Entry point
(defn -main
[& args]
(load "uxbox/config"
"uxbox/migrations"
"uxbox/http")
(require 'uxbox.config
'uxbox.migrations
'uxbox.http
'uxbox.tasks)
(mount/start))