status-im/status-mobile
2
0
Fork 0
mirror of https://github.com/status-im/status-mobile.git synced 2025-02-25 23:06:43 +00:00
Code Issues Projects Releases Wiki Activity

Improve hot reloading (#16349)

Browse Source
This commit is contained in:
Parvesh Monu 2023-06-22 16:55:09 +05:30 committed by GitHub
parent 1953137068
commit 8a4cba56f6
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 34 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
shadow-cljs.edn
View File

@ -44,7 +44,8 @@
;; the target files (a.k.a hot reload). When false, you can manually ;; the target files (a.k.a hot reload). When false, you can manually
;; reload by calling `shadow.cljs.devtools.api/watch-compile-all!`. ;; reload by calling `shadow.cljs.devtools.api/watch-compile-all!`.
:devtools {:autobuild #shadow/env ["SHADOW_AUTOBUILD_ENABLED" :default true :as :bool]} :devtools {:autobuild #shadow/env ["SHADOW_AUTOBUILD_ENABLED" :default true :as :bool]}
:dev {:devtools {:after-load status-im2.setup.hot-reload/reload :dev {:devtools {:before-load-async status-im2.setup.hot-reload/before-reload
:after-load-async status-im2.setup.hot-reload/reload
:build-notify status-im2.setup.hot-reload/build-notify :build-notify status-im2.setup.hot-reload/build-notify
:preloads [re-frisk-remote.preload :preloads [re-frisk-remote.preload
;; In order to use component test helpers in ;; In order to use component test helpers in

30
src/status_im2/setup/hot_reload.cljs
View File

@ -3,23 +3,41 @@
[react-native.core :as rn] [react-native.core :as rn]
[reagent.core :as reagent])) [reagent.core :as reagent]))
(def cnt (reagent/atom 0)) (defonce cnt (reagent/atom 0))
(defonce reload-locked? (atom false))
(defonce reload-interval (atom nil))
(defonce warning? (reagent/atom false)) (defonce warning? (reagent/atom false))
(defonce visible (reagent/atom false)) (defonce visible (reagent/atom false))
(defonce timeout (reagent/atom false))
(defonce label (reagent/atom "")) (defonce label (reagent/atom ""))
(defn reload (defn reload
[] []
(when @timeout (js/clearTimeout @timeout)) (js/setTimeout #(reset! visible false) 500)
(reset! timeout (js/setTimeout #(reset! visible false) 500)) (js/setTimeout #(reset! reload-locked? false) 3000)
(reset! warning? false) (reset! warning? false)
(reset! visible true) (reset! visible true)
(reset! label "reloading UI") (reset! label "reloading UI")
(re-frame/clear-subscription-cache!) (re-frame/clear-subscription-cache!)
(swap! cnt inc)) (swap! cnt inc))
(defn build-competed (defn before-reload
[done]
(when @reload-interval (js/clearInterval @reload-interval))
(if @reload-locked?
(reset!
reload-interval
(js/setInterval
(fn []
(when-not @reload-locked?
(js/clearInterval @reload-interval)
(reset! reload-locked? true)
(done)))
500))
(do
(reset! reload-locked? true)
(done))))
(defn build-completed
[] []
(reset! label "reloading code") (reset! label "reloading code")
(reset! warning? false) (reset! warning? false)
@ -47,7 +65,7 @@
(and (= :build-complete type) (seq (:warnings info)))) (and (= :build-complete type) (seq (:warnings info))))
(build-failed (:warnings info)) (build-failed (:warnings info))
(= :build-complete type) (= :build-complete type)
(build-competed))) (build-completed)))
(defn reload-view (defn reload-view
[_] [_]