Make Android/iOS versions work

android/src/play_clj/android.clj

@@ -1 +0,0 @@
-(ns play-clj.android)

android/src/play_clj/native.clj

@@ -0,0 +1,6 @@
+(ns play-clj.native
+  (:require [play-clj.core :refer :all]))
+
+(defmacro defgame
+  [name & {:keys [] :as options}]
+  `(def ~name (create-game ~options)))

common/src/play_clj/core.clj

@@ -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)))

desktop/src/play_clj/native.clj

@@ -1,4 +1,4 @@
-(ns play-clj.desktop
+(ns play-clj.native
   (:require [play-clj.core :refer :all])
   (:import [com.badlogic.gdx.backends.lwjgl LwjglApplication]
            [org.lwjgl.input Keyboard]))
@@ -10,7 +10,7 @@
         width (or width 800)
         height (or height 600)]
     `(do
-       (defgameobj ~name ~options)
+       (def ~name (create-game ~options))
        (defn ~'-main
          []
          (LwjglApplication. ~name ~title ~width ~height true)

ios/src/play_clj/ios.clj

@@ -1 +0,0 @@
-(ns play-clj.ios)

ios/src/play_clj/native.clj

@@ -0,0 +1,6 @@
+(ns play-clj.native
+  (:require [play-clj.core :refer :all]))
+
+(defmacro defgame
+  [name & {:keys [] :as options}]
+  `(def ~name (create-game ~options)))