From 341f078ad3f8c4cd5cec076b5935cbfae1bf2cc2 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Mon, 8 Aug 2016 08:26:51 -0700 Subject: [PATCH] faster? --- src/play_clj/core.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/play_clj/core.clj b/src/play_clj/core.clj index 68dc39e..115f514 100755 --- a/src/play_clj/core.clj +++ b/src/play_clj/core.clj @@ -118,7 +118,7 @@ (swap! screen (fn [s] (-> s (assoc :delta-time d) - (update-in [:total-time] #(+ (or %1 0) d))))) + (update-in [:total-time] #(unchecked-add (or ^double %1 0) ^double d))))) (execute-fn! on-render @screen)) :hide #(execute-fn! on-hide) :pause #(execute-fn! on-pause)