modifications for ios

This commit is contained in:
Bryce Covert
2017-02-19 19:48:02 -08:00
parent 810db79d8c
commit 27691ae11b
3 changed files with 4 additions and 3 deletions

View File

@@ -117,7 +117,7 @@
(.begin (.getBatch ^Stage (:renderer @screen)))
(swap! screen (fn [s]
(-> s
(assoc :delta-time 0.0167)
(assoc :delta-time d)
(update-in [:total-time] #(unchecked-add (or ^double %1 0) d)))))
(let [r (execute-fn! on-render @screen)]
(.end (.getBatch ^Stage (:renderer @screen)))