notid/play-clj
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove assertions

Browse Source
This commit is contained in:
oakes
2014-08-26 21:18:50 -04:00
parent 8b5474fab0
commit c3f74d97f7
1 changed files with 0 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/play_clj/core.clj
View File

@@ -548,11 +548,6 @@ is the atom storing the screen map behind the scenes. Returns the updated
(update! screen :renderer (stage))" (update! screen :renderer (stage))"
[screen & args] [screen & args]
(assert (some? (:update-fn! screen)) "The first argument in update! must be
the screen map.")
(assert (even? (count args)) "You need to give update! your screen followed by
pairs of values, such as
(update! screen :renderer (stage) :camera (orthographic)).")
((:update-fn! screen) assoc args)) ((:update-fn! screen) assoc args))
(defn run! (defn run!
@@ -562,10 +557,6 @@ of key-value pairs, which will be given to the function via its screen map.
(run! my-other-screen :on-show) (run! my-other-screen :on-show)
(run! my-other-screen :on-change-color :color :blue)" (run! my-other-screen :on-change-color :color :blue)"
[screen-object fn-name & options] [screen-object fn-name & options]
(assert (some? (:screen screen-object)) "The first argument in run! must be
a defscreen object.")
(assert (keyword? fn-name) "The second argument in run! must be a keyword.")
(assert (even? (count options)) "Unexpected argument count in run!.")
(let [execute-fn! (-> screen-object :screen deref :execute-fn!) (let [execute-fn! (-> screen-object :screen deref :execute-fn!)
screen-fn (-> screen-object :options (get fn-name))] screen-fn (-> screen-object :options (get fn-name))]
(apply execute-fn! screen-fn options) (apply execute-fn! screen-fn options)