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

Make functions pure

Browse Source
This commit is contained in:
oakes
2014-01-03 10:06:47 -05:00
parent 7fe9000f39
commit 77081f74f9
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/play_clj/core_2d.clj
View File

@@ -41,14 +41,14 @@
(defn image-width (defn image-width
([^TextureRegion img] ([^TextureRegion img]
(.getRegionWidth img)) (.getRegionWidth img))
([^TextureRegion img val] ([img val]
(.setRegionWidth img val))) (doto ^TextureRegion (image img) (.setRegionWidth val))))
(defn image-height (defn image-height
([^TextureRegion img] ([^TextureRegion img]
(.getRegionHeight img)) (.getRegionHeight img))
([^TextureRegion img val] ([img val]
(.setRegionHeight img val))) (doto ^TextureRegion (image img) (.setRegionHeight val))))
(defn split-image (defn split-image
([val size] ([val size]