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

Add bang to side-effecting function

Browse Source
This commit is contained in:
oakes
2014-05-01 03:46:20 -04:00
parent 603c73e337
commit 7d10ed7bac
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/play_clj/core_utils.clj
View File

@@ -187,7 +187,7 @@ found."
[type & options] [type & options]
`(proxy [~(resolver-class type)] [] ~@options)) `(proxy [~(resolver-class type)] [] ~@options))
(defn ^:private set-loaders (defn ^:private set-loaders!
[^AssetManager am] [^AssetManager am]
(->> (loader :tmx-map (resolver :internal-file-handle)) (->> (loader :tmx-map (resolver :internal-file-handle))
(.setLoader am TiledMap)) (.setLoader am TiledMap))
@@ -200,9 +200,9 @@ found."
(defn asset-manager* (defn asset-manager*
([] ([]
(doto (AssetManager.) set-loaders)) (doto (AssetManager.) set-loaders!))
([resolver] ([resolver]
(doto (AssetManager. resolver) set-loaders))) (doto (AssetManager. resolver) set-loaders!)))
(defmacro asset-manager (defmacro asset-manager
"Returns an [AssetManager](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/assets/AssetManager.html). "Returns an [AssetManager](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/assets/AssetManager.html).