Make Android/iOS versions work

This commit is contained in:
oakes
2013-12-29 21:39:09 -05:00
parent 6b92812ab2
commit 0b34952a93
6 changed files with 15 additions and 9 deletions

View File

@@ -90,11 +90,7 @@
[^Game game ^Screen screen]
(.setScreen game screen))
(defn defgameobj*
(defn create-game
[{:keys [start-screen]}]
(proxy [Game] []
(create [] (when start-screen (set-screen! this start-screen)))))
(defmacro defgameobj
[name options]
`(def ~name (defgameobj* ~options)))