Rename functions that are LibGDX-specific

This commit is contained in:
oakes
2013-12-31 14:01:25 -05:00
parent 673e324d48
commit 161e8b0333
2 changed files with 7 additions and 7 deletions

View File

@@ -41,9 +41,9 @@
(defmacro animation
[duration images & args]
`(Animation. ~duration
(utils/into-gdx-array ~images)
(utils/static-field :graphics :g2d :Animation
~(or (first args) :normal))))
(utils/gdx-into-array ~images)
(utils/gdx-static-field :graphics :g2d :Animation
~(or (first args) :normal))))
(defn get-key-frame
([screen ^Animation animation]

View File

@@ -10,7 +10,7 @@
[keys]
(->> keys (map name) (s/join ".") (str "com.badlogic.gdx.")))
(defn static-field*
(defn gdx-static-field*
[args]
(->> (last args)
split-keys
@@ -19,10 +19,10 @@
(str (join-keys (butlast args)) "/")
symbol))
(defmacro static-field
(defmacro gdx-static-field
[& args]
`~(static-field* args))
`~(gdx-static-field* args))
(defn into-gdx-array
(defn gdx-into-array
[a]
(-> a into-array Array.))