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

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